Question

用VB按要求编程，要流程图！谢谢

Answer 1

第一个
Private Sub Command1_Click()
Dim s As Double‘定义累加变量s来储存结果
Dim i As Double’定义i为计数变量。
For i = 1 To 10
s = s + 1 / i ^ 2
Next i
Print s
End Sub
第二个
Private Sub Command1_Click()
Dim s As Double
Dim i As Double
For i = 1 To 99 step 2
s = s + i
Next i
Print s
End Sub
流程图高中学过的。

追问

亲 能帮我画一个流程图吗？我不是学VB程序的，我考试要用，想参考着怎么画的，以前学的都忘了。

追答

http://wenku.baidu.com/view/8b53d1eb551810a6f524865a.html

这儿有个课件。