填空题

在窗体上面画一个命令按钮,然后编写如下程序: Function M(x As Integer,y As Integer)As Integer M=IIf(x>y,x,y) End Function Private Sub Command1_Click() Dim a As Integer,b As Integer a=1 b=2 Print M(a,B) End Sub 程序运行后,单击命令按钮,输出结果为 【11】 。

【参考答案】

B
<上一题 目录 下一题>
热门 试题

填空题
下面的程序用“冒泡”法将数组a中的10个整数按升序排列,请将程序补充完整。Option Base 1Private Sub Command1_Click()Dim aa=Array(678,45,324,528,439,387,87,875,273,823)For i= 【8】 For j= 【9】 If a(i) 【10】 a(j)Thena1=a(i)a(i)=a(j)a(j)=a1End IfNext jNext iFor i=1 To 10Print a(i)Next iEnd Sub
填空题
在窗体上画一个命令按钮,然后编写如下事件过程:Private Sub Command1_Click()a=0For i=1 To 2For j=1 To 4If j Mod 2<>0 Thena=a+1End Ifa=a+1Next jNext iPrint aEnd Sub程序执行后,单击命令按钮,输出结果是 【7】 。
相关试题
  • 在窗体上画一个名称为Command1的命令按钮...
  • 为了在按下Esc键时执行某个命令按钮的事件...
  • 执行下面的语句后,所产生的信息框的标题是...
  • 在菜单编辑器中,菜单-项前面的4个小点的...