单项选择题

假定有如下的Sub过程： Sub Func(x As Single， y As Single) t=x x=t/y y=t Mod y End Sub 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Single Dim b As Single a=6 b=5 Func(a, b) Print a, b End Sub 程序运行后，单击命令按钮，输出结果为 ______。

A．6 5
B．1 1
C．1.2 5
D．1.2 1
<上一题 目录 下一题>
热门 试题

填空题
下列程序实现的功能是：在窗体上单击时，将在窗体上输出c:=a1.txt文件中的所有小写字母。Private Sub Form Click()Dim Ch As String * 1Open c: a1.txt For Input As #10Do While 【8】 Ch= Input(1, #10)If 【9】 ThenPrint Ch;End IfLoop【10】 End Sub
单项选择题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 Do Until x=-1 a=InputBox( 请输入a的值 ) a=Val(a) b=InputBox( 请输入b的值 ) b=Val(b) x=InputBox( 请输入x的值 ) x=Val(x) a=a+b+x Loop Print a End Sub 程序运行后，单击命令按钮，依次在输入对话框中输入10、8、9、2、11、-1，则输出结果为 ______。
A．15
B．14
C．13
D．12
相关试题