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

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

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
就是显示在标签中了的。

温馨提示:答案为网友推荐,仅供参考