单项选择题

下列程序的运行结果是( )。 Private Function myfun(m, n) Do While m > n Do While m>n:m=m-n:Loop Do while n>m:n=n-m:Loop Loop myfun=m End Function Private Sub Command1_Click() Print myfun(9, 8) End Sub

A.2
B.1
C.4
D.3
<上一题 目录 下一题>
热门 试题

单项选择题
在窗本上放置一个命令按钮Command1, 并编写下列单击事件的程序: Option Base 1 Private Sub Command1_Click() Dim c As Integer, d As Integer d=0 c=6 X=Array(2, 4, 6, 8, 10, 12) For i=1 To 6 If X(i)>c Then d=d+X(i) c=X(i) Else d=d-c End If Next i Print d End Sub
A.10
B.12
C.16
D.20
单项选择题
有下列二叉树,对此二叉树中序遍历的结果为( )。
A.BDYEACFXZ
B.DYBEAFCZX
C.ABCDEFXYZ
D.ABDYECFXZ
相关试题
  • 下列是一个体操评分程序。设满分为10分,...
  • 假设有以下程序段:For i= 1 To 3Fo...
  • 滚动条的最小值属性是______,最大值...
  • 下列程序段的功能是:从文本框中输入一个数...
  • 在程序的空白行处填写适当的语句,完成下列...