高校问答古希腊美神是谁:VB的问题
来源：百度文库 编辑：高校问答 时间：2024/04/27 21:49:15
Private Sub HScroll1_Change()
a = HScroll1.Value
Label4.Caption = a
s = 1
For i = 1 To a
s = s * i
Next i
Text1.Text = s
End Sub
谁能解释一下什么意思..我尤其不明白next那块是什么意思..
谁比较明白+偶qq 我还是不明白 309314212
a = HScroll1.Value
Label4.Caption = a
s = 1
For i = 1 To a
s = s * i
Next i
Text1.Text = s
End Sub
谁能解释一下什么意思..我尤其不明白next那块是什么意思..
谁比较明白+偶qq 我还是不明白 309314212
Private Sub HScroll1_Change()
a = HScroll1.Value '取滚动条的值赋给a
Label4.Caption = a '显示a的值
s = 1 's赋值给1
For i = 1 To a for循环开始
s = s * i '循环体
Next i ‘循环体结束
Text1.Text = s '输出s的值
End Sub
'Next i 就是标志循环体结束，i表示循环变量
'整个程序的意思是算阶乘
Private Sub HScroll1_Change()
' a 取 HScroll1 滚动条的位置数值
a = HScroll1.Value
' 将 a 显示在 Label4 标签中
Label4.Caption = a
' 计算 a 的阶乘（1 x 2 x 3 x 4 x ... x a）
s = 1
For i = 1 To a
s = s * i
Next i
' 输出 a 的阶乘结果到 Text1 中
Text1.Text = s
End Sub
for ....next 是循环指令
For i = 1 To a
s = s * i
Next i
在做一个阶乘
例如a=3
结果是 s=1*2*3
在输出s