Question

VB简单小程序 (正在考试)急急急急1!!!!!!!!

一、 编制子程序或函数：
计算100以内的偶数和。
要求：按如下格式设计窗体，在窗体中设置一个标签、一个文本框和一个命令按钮，当点击命令按钮时，计算偶数和，显示在文本框中。文本框只做显示用，不能录入信息。（30分）

Answer 1

Private Sub Command1_Click()
Dim i As Integer
Dim sum As Integer

sum = 0

For i = 2 To 100 Step 2
sum = sum + i
Next

Text1.Text = sum
End Sub