填空题
阅读程序: Option Base1 Private Sub Form_Click( ) Dim a(3)As Integer Print“输入的数据是:”; For i=1 To 3 a(i)=InputBox(“输人数据”) Print a(i); Next Print If a(1)
a(3) Then m=a(2) Else If a(1)>a(3)Then m=【 】 Else m=【 】 End If Print“中间数是:”;m End Sub 程序运行后,单击窗体,在输入对话框中分别输人三个整数,程序将输出三个数中的中间数,如图所示。请填空。
【参考答案】
t
点击查看答案
<上一题
目录
下一题>
热门
试题
填空题
下面的程序用于根据文本框Test中输入的内容进行以下处理:若Text为1,则打印“您的成绩为优秀!”;若Text为2,则打印“您的成绩为良好!”;若Text 为3,则打印“您的成绩为一般”;否则打印“您的成绩一般以下!”,请填空。Private Sub Command1_Click( ) Selct Case Val(Text1.Text) Case【 】 Print 您的成绩为优秀! Case【 】 Print 您的成绩为良好! Case【 】 Print 您的成绩为一般! Case ElsePrint 您的成绩为一般以下! End SelectEnd Sub
点击查看答案&解析
填空题
下面的程序的作用是利用随机函数产生10个100-300(不包含300)之间的随机整数,打印其中7的倍数的数,井求它们的总和,请填空。Sub TOF( )RandomizeDim s As DoubleDim a(10) As lntegerFor i=0 To 9【 】NextFor i=0 To 9If【 】ThenPrint a(i)s=s+a(i)【 】 Next iPrintPrint S= ; sEnd Sub
点击查看答案&解析
相关试题
软件工程的出现是由于【 】。
用的黑箱测试有等价分类法、【 】、因果图...
一个类可以从直接或间接的祖先中继承所有属...
当数据的物理结构(存储结构、存取方式等)...
一个项目具有一个项目主管,一个项目主管可...