vb 点击按钮后text1=？+1

来源：百度知道 编辑：UC知道 时间：2024/06/09 22:49:03
RT 我现在有一个按钮 点击后 form2的text1会变成1 可我想再次点击这个按钮，使form2的text1=2（1+1） 怎么使？

Private Sub Btn1_Click(ByVal sender As Object,ByVal e As EventArgs) Handle Btn1.Click
text1.Text = CStr( CInt(text1.Text) + 1 )
End Sub

对YXZ0539的回答进行一点补充，需要注意代码中的所有“Bth1”都要和你的按钮名字改为一致。