Question

VB.net出现变量“myRow”在赋值前被使用，可能会在运行时导致null引用失常的警告

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox5.Text = "" Then
MsgBox("身份证号不能为空")
Else
Dim myRow As DataRow
myRow("姓名") = TextBox1.Text
myRow("性别") = TextBox2.Text
myRow("年龄") = TextBox3.Text
myRow("联系方式") = TextBox4.Text
myRow("身份证号") = TextBox5.Text
myRow("所选科室") = ComboBox1.Text
myRow("所选医生等级") = ComboBox2.Text()
myRow("病人状态") = "待诊"
myRow = hospitalDataSet.Tables("patient").NewRow
hospitalDataSet.Tables("patient").Rows.Add(myRow)
SqlDataAdapter1.Update(hospitalDataSet, "patient")
End If
End Sub

VB.net出现变量“myRow”在赋值前被使用，可能会在运行时导致null引用失常的警告，求大神帮忙消除这个警告，我是新手，请尽量告知具体步骤
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox5.Text = "" Then
MsgBox("身份证号不能为空")
Else
Dim myRow As DataRow = hospitalDataSet.Tables("patient").NewRow
myRow("姓名") = TextBox1.Text
。。。。。
。。。。。
这样也会出现问题，写好检查时没错误，运行时就会卡住并在Dim myRow As DataRow = hospitalDataSet.Tables("patient").NewRow这行出现问题。

Answer 1

这个是个警告，如果不负责任点的话其实可以忽略不管的。

之所以提示这个警告是因为你没有对myRow进行初始化。你可以这么定义myRow，这样就不会出现警告了。

        Dim dt As DataTable = New DataTable()
        dt.Columns.Add("姓名")
        dt.Columns.Add("性别")
        dt.Columns.Add("年龄")
        dt.Columns.Add("联系方式")
        dt.Columns.Add("身份证号")
        dt.Columns.Add("所选科室")
        dt.Columns.Add("所选医生等级")
        dt.Columns.Add("病人状态")

        Dim myRow As DataRow = dt.NewRow()

上面只是个简单的例子，你可以从DataTable里创建新的DataRow对象。

至于第二个问题的话你没有提供给我异常详情或者截图，在下无能为力。