题目内容
(27 ) 在窗体上画 3 个标签 、 3 个文本框 (名称分别为 Text1 、 Text2 和 Text3 ) 和 1 个命令按钮 (名称 为Command1 ),外观如图 4 所示。
编写下列程序:
Private Sub Form_Load()
Text1.Text=" "
Text2.Text=" "
Text3.Text=" "
End Sub
Private Sub Command1_Click()
x=Val(Text1.Text)
y=Val(Text2.Text)
Text3.Text=f(x,y)
End Sub
Function f(ByVal x As Integer,ByVal y As Integer)
Do While y<>0
tmp=x Mod y
x=y
y=tmp
Loop
f=x
End Function
运行程序 , 在 Text1 文本框中输入 36 , 在 Text2 文本框中输入 24 , 然后单击命令按钮 , 则在 Text 3
文本框中显示的内容是()。
A ) 4
B ) 6
C ) 8
D ) 12
查看答案
搜索结果不匹配?点我反馈