单项选择题

单击命令按钮时，下列程序代码的运行结果为　　Private Sub Command1_Click()　　　　print MyFunc(20，18)　　End Sub　　Public Function MyFunc (m As Integer，n As Integer)As Integer　　　　Do While m <>n　　　　　　Do While m ＞ n：m=m - n：Loop　　　　　　Do While m ＜ n：n=n - m：Loop　　　　Loop　　　　MyFunc=m　　End FunCtion

A．0
B．2
C．4
D．6

<上一题目录下一题>

热门试题

单项选择题

下列程序段的执行结果为 m=1 n=1 Select Case m Case 1 Select Case n Case 0 Print * * 0 * * Case 1 Print * * 1 * * End Select Case 2 print * * 2 * * End Select

A．* * 0 * *
B．* * 1 * *
C．* * 2 * *
D．0

单项选择题

在窗体上画一个通用对话框，其名称为CommonDialogl，然后画一个命令按钮，并编写如下事件过程： Private Sub Commandl_Click() CommonDialogl，Flags=vbOFNHideReadOnly CommontDialogl．Filter= All Files(*．*)|*．*|Text Files (*.*)|*．txt| _ & Batch Files (*．bat) |*．bat CommonDialogl．Filterlndex=1 CommonDialogl．Showopen MsgBox CommonDialogl．FileName End Sub 程序运行后，单击命令按钮，将显示一个“打开”对话框，此时在“文件类型”框中显示的是

A．All Fries(*.*)
B．Text Files(*.*)
C．Batch Files(*．bat)
D．All Files (*．*)|Text Files(*．*)

相关试题