单项选择题

有如下程序：
Private Sub Command1_Click()
Dim a As Single
Dim b As Single
　　a=5:b=4
　　Call Sub1(a,b)
End Sub
Sub Sub1(x As Single，y As Single)
　　t=X
　　X=t\Y
　　Y=t Mod y
End Sub
在调用运行上述程序后，a和b的值分别为

A．0 0
B．1 1
C．2 2
D．1 2
<上一题 目录 下一题>
热门 试题

单项选择题
在窗体中添加一个命令按钮，编写如下程序： Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print subl: ;p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print Main: ;a1;b1;c1 End Sub 程序运行后，输出结果为
A．
Sub：2 6 4
Main：2 6 4
B．
Sub：2 6 4
Main：2 6 4
C．
Sub：2 6 4
Main：1 2 3
D．
Sub：2 6 4
Main：2 2 3
单项选择题
在窗体上画一个文本框，其名称为Text1，然后编写如下事件过程： Private Sub Text1_KeyPress(KeyAscii As Integer) Dim str As String Str=Chr(KeyAscii) KeyAscii=Asc(UCase(str)) Text1.Text=String(2,KeyAscii) End Sub 程序运行后，如果在键盘上输入字母 b ，则在文本框Text1中显示的内容是
A．bbb
B．BBB
C．BB
D．bb
相关试题