题目内容
（请给出正确答案）
假定有如下的Sub过程： Sub S(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=5 b=4 S a，b Print a，b End Sub程序运行后，单击命令按钮，输出结果为______ 。
A．5 4
B．1 1
C．1.25 4
D．1.25 1
如果结果不匹配，请 联系老师 获取答案
更多“假定有如下的Sub过程：Sub S（x As Single，…”相关的问题
Private Sub Command1_Click()
s = 0
For i = 0 To 15
X = 2 * i - 1
If X Mod 3 = 0 Then s = s + 1
Next i
Label
1.Caption = s
End Sub
程序运行后， 单击命令按钮， 则标签中显示的内容为
A.1
B.5
C.27
D.45
在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程： Private Sub Command1_Click() s=0 For i=1 To 15 x=2*i-1 if x Mod 3=0 Then s=s+1 Next i LabeCaption=s End Sub 程序运行后，单击命令按钮，则标签中显示的内容是______。
A．1
B．5
C．27
D．45
假定有下面的过程： Function Func(a As Integer,b As Integer)As Integer Static m As Integer,i As Integer m=0 i=2 i=i+m+1 m=i+a+b Func=m End Function 在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command 1_Click() Dim k As Integer，m As Integer Dim p As Integer k=4 m=1 p=Func(k，m) Print p； p=Func(k，m) Print p End Sub 程序运行后，单击命令按钮，输出结果为()。
A．8 17
B．8 16
C．8 20
D．8 8
一个窗体单击事件过程如下：
Private Sub Form_Click()
X = Val(Text1.Text):Y = Val(Text2.Text)
If X = 0 Or Y = 0 Then Print "不在任何象限内": Exit Sub
If X ＞ 0 And Y ＞ 0 Then Print "IN A"
If X ＞ 0 And Y ＜ 0 Then Print "IN D"
If X ＜ 0 And Y ＞ 0 Then Print "IN B"
If X ＜ 0 And Y ＜ 0 Then Print "IN C"
End Sub
在窗体上添加一个命令按钮(名为Command1)，然后编写如下事件过程：
Private Sub Command1_Click()
For i＝1 To 4
x＝4
For j＝1 To 3
x＝3
Fork＝1 To 2
x＝x+6
Next k
Next j
Next i
MsgBox x
End Sub
打开窗体后，单击命令按钮，消息框的输出结果是()。
A．7
B．15
C．157
D．528
若有如下程序： void sub() {static int x＝6； x／＝2；printf("%d"，x)； } main() {int m； for(m=0；m＜=2；m++) sub()； } 则程序运行后的输出结果是【 】。
若有如下程序： main() { int x＝4，y＝1； printf("%d\n"，sub(x，sub(x，y)))； } sub(int i，int j) { static int a＝0； int b＝2； a+＝i+b； b+＝j+a； } 则程序运行后的输出结果是【 】。
若有如下程序： void sub() { static int x=8; x/=2;printf("%d",x); } main() { int m; for(m=0;m＜2;m++) sub();} 则程序运行后的输出结果是【 】.
