填空题
在窗体上面画一个命令按钮,然后编写如下程序:
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 = 2
b = 5
Print M(a, b)
End Sub
程序运行后,单击命令按钮,输出结果为
【5】
。
【参考答案】
E
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在窗体上画一个名称为command 1的命令按钮,然后编写如下程序: Option Base 1 Private Sub Colilinand1 Click() Dim a(10) As Integer For i = 1 To 10 a(i) = i Next call Swap(a) For i = 1 To 10 Print a(i); Next End Sub Sub Swap(b() As Integer) n = 【6】 For i = 1 To n 2 t = b(i) b(i) = b(n) b(n) = t 【7】 Next End Sub 上述程序的功能是,通过调用过程Swap,调换数组中数值的存放位置,即a(1)与a(10)的值互换,a(2)与a(9)的值互换,……,a(5)与a(6)的值互换。请填空。
点击查看答案&解析
单项选择题
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码: Private Sub Command1_Click() Dim arr1(10)As Integer, arr2(10)As Integer n=3 For i=1 To 6 arr1(i)=i arr2(n)=2*n+i Next i Print arr2(n); arr1(n) End Sub 程序运行后,单击命令按钮,输出结果是 ______。
A.12 3
B.3 12
C.14 3
D.3 14
点击查看答案&解析
相关试题
下列程序实现的功能是:当在窗体上单击时,...
在窗体上画1个名称为Command1的命令按钮...