单项选择题

设a、b都是自然数．为求a除以b的余数，某人编写了以下函数：
Function fun(a As Integer，b As Integer)
While a＞b
a＝a-b
Wend
fun＝a
End Function
在调试时发现函数是错误的。为使函数能产生正确的返回值，应做的修改是( )

A．把a＝a-b改为a=b-a
B．把a＝a-b改为a＝a\b
C．把While a＞b改为while a＜b
D．把While a＞b改为While a＞＝b

<上一题目录下一题>

热门试题

单项选择题

在利用菜单编辑设计菜单时，为了把组合键“Alt+X”设置为“退出(X)”菜单项的访问键，可以将该菜单项的标题设置为( )

A．退出(X&)
B．退出(&X)
C．退出(X#)
D．退出(#X)

单项选择题

在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command1_Click() Dim a(3,3) For m=1 To 3 For n=1 To 3 If n=m or n=4-m Then a(m,n)=m+n Else a(m,n)=0 End If Print a(m,n)； Next n Ptint Next m End Sub 运行程序，单击命令按钮，窗体上显示的内容为( )

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

相关试题