用InputBox函数输入10个数与数组A中,输入后将这10个数显示在文本框中,并统计正数的个数,正数的和,负数的个数,负数的和.用Print方法将结果打印在窗体上,设计界面、运行结果如图所示.

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 04:11:26
用InputBox函数输入10个数与数组A中,输入后将这10个数显示在文本框中,并统计正数的个数,正数的和,负数的个数,负数的和.用Print方法将结果打印在窗体上,设计界面、运行结果如图所示.

用InputBox函数输入10个数与数组A中,输入后将这10个数显示在文本框中,并统计正数的个数,正数的和,负数的个数,负数的和.用Print方法将结果打印在窗体上,设计界面、运行结果如图所示.
用InputBox函数输入10个数与数组A中,输入后将这10个数显示在文本框中,并统计正数的个数,正数的和,负数的个数,负数的和.用Print方法将结果打印在窗体上,设计界面、运行结果如图所示.

用InputBox函数输入10个数与数组A中,输入后将这10个数显示在文本框中,并统计正数的个数,正数的和,负数的个数,负数的和.用Print方法将结果打印在窗体上,设计界面、运行结果如图所示.
Private Sub form_load()
Dim i As Integer,zs As Integer
Dim zsum As Single,fsum As Single
Dim A(1 To 10) As Single
Me.AutoRedraw = True
Text1 = ""
For i = 1 To 10
A(i) = Val(InputBox("输入第" & i & " 个数"))
If A(i) >= 0 Then
zs = zs + 1:zsum = zsum + A(i)
Else
fsum = fsum + A(i)
End If
Text1 = Text1.Text & Space(5) & A(i)
Next i
Me.CurrentY = Text1.Top + Text1.Height
Print
Print "正数的个数= " & zs & " 正数的和= " & zsum
Print "负数的个数= " & 10 - zs & " 负数的和= " & fsum
End Sub

用InputBox函数输入10个数与数组A中,输入后将这10个数显示在文本框中,并统计正数的个数,正数的和,负数的个数,负数的和.用Print方法将结果打印在窗体上,设计界面、运行结果如图所示. VB试题:输入x,y,z三个数,按从小到大的次序显示.用InputBox函数输入3个数 问题一、输出1000——2000之间能被17整除的数.问题二、已知数组有二十个数,求其中的最大者.问题三、用InputBox函数输入三个数,选出其中的最大数与最小数,显示于窗体上.(不好意思,没分了, vb编写程序:一个具有10个元素的一维数组,下标从1到10,要求用inputbox从键盘上输入其元素值,并找出最小的那个数. 编写窗体的单击事件,利用InputBox函数输入1个数,判断该数的奇偶性 编写用指针变量作为函数参数求数组的最小值、最大值和平均值的函数,主函数输入个数都为10的数组,调用所编写的函数并输出该数组的最小值、最大值和平均值. VB程序设计:判断任意的三条边长能否构成三角形并计算其面积应用InputBox()函数和MsgBox语句与函数的使用方法,单击判断按钮调用InputBox函数,分别将任意的三个数字输入,输入完毕后将三个数 VB程序设计:判断任意的三条边长能否构成三角形并计算其面积应用InputBox()函数和MsgBox语句与函数的使用方法,单击判断按钮调用InputBox函数,分别将任意的三个数字输入,输入完毕后将三个数 c语言编程 在整型数组a[10]中找出最大值和最小值,并将最大值与数组中第一个数交换,最小值与数组中最后一个数交换,其它值不变,数组中的值要求输入. 随机产生20个10~99之间的整数,要求:1) 用冒泡法排序(降序) 2) 用InputBox( )函数输入一整数X 随机产生20个10~99之间的整数,要求:1) 用冒泡法排序(降序) 2) 用InputBox( )函数输入一整数X 要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数. 要求用inputbox输入一个正实数,用msgbox输出它的平方和平方根,要求每个数保留三个小数. VFP编程:输入十个数,求其最大数和最小数.用数组.可以用MAX MIN函数吗 求教VFP编程:输入十个数,求其最大数和最小数.用数组和MAX MIN函数 VB用inputbox函数输入一个摄氏温度 根据华氏温度=9/5*摄氏温度+32算出华氏温度 vb 用inputbox函数输入3个任意整数,安从大到小顺序输出 (块if语句) 用选择法对10个整数排序.10个整数用scanf函数输入.程序提示:输入10个整数存放到数组a的a[1]到a[10]中输出10个数for(i=1;i