Dim a As Byte = 3, b As Byte = 7
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
TextBox1.Text = "a=" & a & " ,b=" & b
a = b - a
b -= a
a += b
TextBox2.Text = "a=" & a & " ,b=" & b
End Sub
运行结果:

本文展示了VBScript中如何在Button1_Click事件处理程序中进行变量a和b的算术运算,并将结果更新到TextBox1和TextBox2中的代码片段,最终运行结果显示为a=+a+,b=

被折叠的 条评论
为什么被折叠?



