问题

阅读下面的程序:Private Sub Form_Click() Dim m n As Integer m=InputBox(请输入M的值) m=Val

阅读下面的程序： 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 Commandl_click（)Dim a As Integer，b As Integera=InputBox（“

答案解析
（33 ）某人编写了下面的程序，希望能把 Text1 文本框中的内容写到 out.txt 文件中Private Sub Com

答案解析
（34 ）窗体上有一个名为 Command1 的命令按钮，并有下面的程序：Private Sub Comand1_Click （）Dim

答案解析
（34）为了从当前文件夹中读入文件File l .txt,某人编写了下面的程序：Private Sub Command 1_CLick

答案解析
执行下面的程序段，x的值为。private Sub Command1_Click（)For i=1 To 5 a=a＋iNext iX=Val（i)m

答案解析
阅读程序： Sub p（b （) As Integer)For i =1To 4 b（i) = 2（iNext i End Sub Private Sub Comm

答案解析