vb.net简单计算错误,代码如下:
Public Class Form1
Dim qiu As Integer = 0, jin As Integer = 0, ming As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
TextBox1.Text = qiu
TextBox2.Text = jin
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ming = qiu + jin
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
ming = qiu - jin
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
ming = qiu * jin
End Sub
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
ming = qiu / jin
End Sub
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
Label1.Text = ming
End Sub
End Class
------解决方法--------------------------------------------------------
注意类型,textbox里来的是字符型 ,要计算就要转换一下。
------解决方法--------------------------------------------------------
Ctype(TextBox1.Text.Trim,Integer)
------解决方法--------------------------------------------------------
qiu 和jin都是0,其他地方也没有赋值,做除法运算的话肯定会出错
------解决方法--------------------------------------------------------