مشکل این کد چیه ؟

[ali.m.a]

با سلام خدمت اساتید محترم
مشکل کد زیر چی هست که خطای (Object reference not set to an instance of an object.) رو میده؟؟

پیشاپیش از راهنمائیتون ممنونم ...
Private Sub BtnRegMem_Click(sender As Object, e As EventArgs) Handles BtnRegMem.Click
Try
Dim Dt As DataTable = AccountDs.Tables("Tbl_BankData")
Dim NewRow As DataRow = AccountDs.Tables("Tbl_BankData").NewRow

NewRow("PerNO") = txtPerNo.Text
NewRow("TopicsCode") = "101"
NewRow("SpecificCode") = "1011"
NewRow("HesabType") = txtHesabType.Text
NewRow("HesabNo") = txtHesabNo.Text
NewRow("txtHesabDate ") = txtHesabDate.Text
AccountDs.Tables("Tbl_BankData").Rows.Add(NewRow)

MsgInfo("ok")

Catch ex As Exception
MsgInfo(ex.Message)
End Try
End Sub

[shadi khanum]

کجای کد خطا میده؟ اگر خط 3 باشه در accountDs جدولی به اسم Tbl_BankData نیست. اگر در خط 11 باشه چون اسم فیلدی که نوشتید space داره
در ضمن خط 3 رو برای چی نوشتید؟!

[ali.m.a]

خط سه اشتباهی نوشتم. که یادم رفته پاکش کنم
Space خط یازده رو هم تصحیح کردم.
ولی متاسفانه همون خطا رو تو این خط میده :
Dim NewRow As DataRow = AccountDs.Tables("Tbl_BankData").NewRow

فک کنم مشکل مربوط به نبود کانکشن استرینگ هست که من بلد نیستم کجا و چطوری فراخوانی کنم .... اگه امکان داره در این باره هم راهنمائی کنید.
ممنون

[parvizwpf]

باید دید چه آبجکتی تو این خط نال هست.

[shadi khanum]

شما تو برنامه یه کاری کن، سر همین خط یه breakPoint بذار با F9، حالا برنامه رو اجرا کن، سر این خط که رسید توی Watch چک کن ببین اولا اصلا AccountDS داری یا nothing ، اگه nothing نبود مرحله بعد ببین AccountDs.Tables("Tbl_BankData")داری یا nothing.. اگه این دو تا رو داشته باشی نباید Err بده. حتما یکی از اینا nothing بود باید بری جایی رو تست کنی که این جدول رو به دیتاست اضافه میکنی. اونجا رو چک کن