Question

VB中有2个文本框，在两个文本框中分别输出A.B，求A到B之间的偶数之和，显示在标签框当中

另外还要写出从A到B之间偶数判断的那个程序

Answer 1

Private Sub Command1_Click()

For i = Val(Text1.Text) To Val(Text2.Text)

  If i Mod 2 = 0 Then s = s + i

Next

Label1.Caption = Text1.Text & "..." & Text2.Text & "之间的偶数和=" & s

End Sub

追问

这样子就是显示在标签框当中了么？

追答

是的，请看代码：
Label1.Caption = Text1.Text & "..." & Text2.Text & "之间的偶数和=" & s
就是显示在标签中了的。