单项选择题
阅读下面的程序: Private Sub Form_Click() Dim m,n As Integer m=InputBox("请输入M的值") m=Val(m) m1=m n=InputBox("请输入N的值") n=Val(n) n1=n Do While n<>0 remin=m Mod n m=n n=remin Loop Print m1,n1,m End Sub 程序运行后,单击窗体,在对话框中分别输入16和24,则程序在窗体上的输出结果为
A.16 24 4
B.16 24 8
C.24 16 6
D.24 16 8
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体中画一个命令按钮,然后编写以下事件过程: Private Sub Command1_Click() For i=1 To 4 x=4 For j=1 To 3 x = 3 For k=1 To 2 x = x + 6 Next k Next j Next i Print x End Sub 程序运行后,单击命令按钮,输出结果是
A.7
B.15
C.157
D.538
点击查看答案&解析
单项选择题
设有如下通用过程: Public Function f(x As Integer) Dim y As Integer x = 10: y = 5 f = x * y End Function 在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程: Private Sub Command1_Click() Static x As Integer x = 2:y = 6 y = f(x) Print x; y End Sub 程序运行后,如果单击命令按钮,则在窗体上显示的内容是
A.2 6
B.10 5
C.10 50
D.6 10
点击查看答案&解析
相关试题
在窗体上画一个名称为Command1的命令按钮...
要想在文本框中显示垂直滚动条,必须将 【...
要打印出50个在-100~100之间不同...
组合框有3种不同的类型,这3种类型是下拉...
设有如下程序:Private Sub Form_Click...