-1

这是我的代码。这是我第一次在 vb.net。

Private Sub Accountnum_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Accountnum.KeyPress
    Dim index As Long = 0
    If Asc(e.KeyChar) = 13 Then
        Do While index <= 111000
            If Accountnum.Text = ds.Tables("dbo.AccountMaster").Rows(index).Item("AccountNumber").ToString Then
                Nameconsumer.Text = ds.Tables("dbo.AccountMaster").Rows(index).Item("ConsumerName")
                Address.Text = ds.Tables("dbo.AccountMaster").Rows(index).Item("ConsumerAddress")
            End If
        Loop
    End If

End Sub
4

1 回答 1

0

Null Reference 错误仅表示您正试图对尚未设置值的对象执行某些操作。人们在使用带有方便点符号的语言时忽略这些错误的来源并不少见。

看一下片段中第 5 行的示例: ds.Tables("dbo.AccountMaster").Rows(index).Item("AccountNumber").ToString

这并不少见,但您在这里将四个引用链接在一起并假设它们都是有效的。查看发生错误的行并检查语句中的每个组件的值。在上面的行中,您需要检查: - ds - ds.Tables("dbo.AccountMaster") - ds.Tables("dbo.AccountMaster").Rows(index) - 等等。

如果其中任何一个为空,那么您尝试对其结果执行的后续操作(例如 ToString)将导致空引用异常。

于 2013-04-18T03:12:37.007 回答