UC知道几个VB问题
来源：百度知道 编辑：UC知道 时间：2024/06/20 19:01:38
1.Private Sub Form_Click()
X=1
Y=4
Do Until Y>4
x=x*y
y=y+1
Loop
Print x
End Sub
输出结果为什么是4？
2．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+c
Loop
Print a
End Sub
程序结束后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，－1，输出结果为什么是3？
3．Private Sub Command1_Click()
x=0
Do While x<50
x=(x+2)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
程序运行后，单击命令按钮，则在两个文本框中分别显示的值为2和72?
4.s=5
For i=2.6 To 4.9 Step 0.6
s=s+1
Next i
之后，s的值为什么是9？
X=1
Y=4
Do Until Y>4
x=x*y
y=y+1
Loop
Print x
End Sub
输出结果为什么是4？
2．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+c
Loop
Print a
End Sub
程序结束后，单击命令按钮，依次在输入对话框中输入5，4，3，2，1，－1，输出结果为什么是3？
3．Private Sub Command1_Click()
x=0
Do While x<50
x=(x+2)*(x+3)
n=n+1
Loop
Text1.Text=Str(n)
Text2.Text=Str(x)
End Sub
程序运行后，单击命令按钮，则在两个文本框中分别显示的值为2和72?
4.s=5
For i=2.6 To 4.9 Step 0.6
s=s+1
Next i
之后，s的值为什么是9？
1.
开始 X=1 Y=4
此时 Y>4 不成立, 进入循环.
X=X*Y=1*4=4
Y=Y+1=4+1=5
此时 Y>4 成立, 不进入循环.
输出此时的X, 即4
2.
开始 X=0
此时 X=-1 不成立, 进入循环.
A=5
B=4
X=3
A=A+B+C=5+4+0=9
此时 X=-1 不成立, 进入下一循环.
A=2
B=1
X=-1
A=A+B+C=2+1+0=3
此时 X=-1 成立, 不进入循环.
输出此时的A, 即3
3.
开始 X=0
此时 X<50 成立, 进入循环.
X=(X+2)*(X+3)=2*3=6
N=N+1=1
此时 X<50 成立, 进入循环.
X=(X+2)*(X+3)=8*9=72
N=N+1=2
此时 X<50 不成立, 不进入循环.
输出此时的N, 即2
输出此时的X, 即72
4.
开始 S=5
进入循环 i=2.6 (i<=4.9 成立)
S=S+1=6
进入循环 i=i+0.6=3.2 (i<=4.9 成立)
S=S+1=7
进入循环 i=i+0.6=3.8 (i<=4.9 成立)
S=S+1=8
进入循环 i=i+0.6=4.4 (i<=4.9 成立)
S=S+1=9
跳出循环 i=i+0.6=5 (i<4.9 不成立)
此时S=9
==========================================
这些是基本功，好好看看书。