منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : لم يتم أرجاع كائن مثيل
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السـلام عليكم روحمة الله وبركاته 
أتشـرف بأن أتقدم لكم وأقول كل عام وأنتم وجميع المسلمون بألف خيـر ونسأل الله أن يعيده علينا أعواماً عديده وأزمنة مديده

عندي مشـكله وهي أنني عملت أجراء ستورد برستجر وكلاس وفورم 
هذا الأجراء لحذف أستورد برستجر
كود :
ALTER proc [dbo].[DeletMokof]
@Num_ID Nvarchar (15)
as
delete from All_Data
where Num_ID = @Num_ID

وهذه الداله موجوده في الكلاس 
كود :
Public Sub DeletMokof(ByVal IDNUM As String)
       cls.Open()
       Dim param(1) As SqlParameter
       param(0) = New SqlParameter("@IDNUM", SqlDbType.NVarChar)
       param(0).Value = IDNUM


       cls.SendData("DeletMokof", param)

       cls.Clos()
   End Sub

هذا الأجراء لزر 
كود :
   sen.DeletMokof(TextBox1.Text)

يعطيني خطأ لم يتم أرجاع كائن مثيل وش المشكله