程序设备语言VB程序阅读题

来源：百度知道 编辑：UC知道 时间：2024/06/17 05:54:05
2、阅读下列程序段
Private Sub Command2_Click()
For i = 1 To 3
x = 1
For j = 1 To 3
x = 3 + j
For k = 1 To 3
x = x + 3
Next k
Next j
Next i
Print x
End Sub
运行程序后，单击命令按钮，输出结果是 。
2、阅读下面程序段
Private Sub Command1_Click()
Dim i As Integer
Dim x As Integer
i = 1
x = 2
Do
i = i + 1
x = x + i
Loop Until i >= 7
Print i , x
End Sub
单击命令按钮后，i和x的值分别是 、 。

Private Sub Command2_Click() 定义一个按键
For i = 1 To 3 从i=1 到 3 之前执行循环
x = 1 给x赋值为1
For j = 1 To 3 从j=1 到 3 之前执行循环
x = 3 + j 给x赋值为3+j
For k = 1 To 3 从i=k 到 3 之前执行循环
x = x + 3 给x赋值为3+x
Next k j加1 返回（For k = 1 To 3）循环判断
Next j j加1 返回（For j = 1 To 3）循环判断
Next i i加1 返回（For i = 1 To 3）循环判断
Print x 输出 x 自己算吧，我刚吃完饭，大脑缺氧。*_*
End Sub 结束定义
===============================================================

Private Sub Command1_Click() 定义按键
Dim i As Integer 定义整数变量i
Dim x As Integer 定义整数变量x

i = 1 这两行不解释了吧？
x = 2
Do 开始循环
i = i + 1 这两行也不解释了
x = x + i
Loop Until i >= 7 在i>=7之前一直进行循环操作
Print i , x 输出i,x
End Sub