错误不一定是文本框,很有可能是数据库操作,建议你把Catch这句改为Catch(ex as exception) ErrMsg("ex.Message") 这样就可以显示出真正的错误了。靠猜很累的。
写错了,应该是ErrMsg(ex.Message)
你先去掉 try catch end try 看看到底是那里出错!!
With MyCom11.Parameters .Add("@cfrom", txtFrom.Text) .Add("@pname", txtPm.Text) 的问题吧 scom.Parameters.Add(new SqlParameter("@vchBrow",txtFrom.Text); C#的,希望对你有帮助
Private Sub Add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdd.Click Dim MyCom11 As New SqlClient.SqlCommand("insert into price (cfrom,pname) values (@cfrom,@pname)", MyCls.PsConn) With MyCom11.Parameters .Add("@cfrom", txtFrom.Text) .Add("@pname", txtPm.Text) End With Try MyCls.PsConn.Open()'是这句吗? MyCom11.ExecuteNonQuery() txtMemo.Text = "" txtPm.Text = "" ErrMsg("恭喜,发布成功!") Catch ErrMsg("添加失败,请核对您的输入!") End Try End Sub
ErrMsg("ex.Message")
这样就可以显示出真正的错误了。靠猜很累的。
.Add("@cfrom", txtFrom.Text)
.Add("@pname", txtPm.Text)
的问题吧
scom.Parameters.Add(new SqlParameter("@vchBrow",txtFrom.Text);
C#的,希望对你有帮助
Dim MyCom11 As New SqlClient.SqlCommand("insert into price (cfrom,pname) values (@cfrom,@pname)", MyCls.PsConn)
With MyCom11.Parameters
.Add("@cfrom", txtFrom.Text)
.Add("@pname", txtPm.Text)
End With
Try
MyCls.PsConn.Open()'是这句吗?
MyCom11.ExecuteNonQuery()
txtMemo.Text = ""
txtPm.Text = ""
ErrMsg("恭喜,发布成功!")
Catch
ErrMsg("添加失败,请核对您的输入!")
End Try
End Sub