تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة ال Function
#1
السلام عليكم ..
الاخوة ماسبب ظهور خط اخضر متعرج تحت عبارة
End Function
مرفق الكود:

Public Function IsConnected(ByVal strQry As String, ByVal ver As Boolean)
Try

If Conn.State = ConnectionState.Open Then Conn.Close()
Conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\database.mdb;"
Conn.Open()

Cmd.CommandText = strQry
Cmd.Connection = Conn

If ver = False Then
DR = Cmd.ExecuteReader()
Else
Cmd.ExecuteNonQuery()
End If

Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
End Try

End Function

End Module

الرد }}}}
تم الشكر بواسطة:
#2
وعليكم السلام ورحمة الله وبركاته

لانك لم تقم بإرجاع قيمة
إذا كنت لا تريد ارجاع قيمة استبدل كلمة Function بكلمة Sub
Big Grin
<---------------------------------------------------------------->

الرد }}}}
تم الشكر بواسطة:
#3
وفقك الله كيف ارجع قيمة المشروع كله قائم على الموديل
الرد }}}}
تم الشكر بواسطة:
#4
فقط إستبدل Function ب Sub
منقطع .. للدراسة Confused
الرد }}}}
تم الشكر بواسطة:
#5
الف شكر تم الاستبدال بدون مشاكل
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة عند تحديث البيانات بالداتا جريد فيو محمد اسماعيل 6 91 13-12-17, 02:13 AM
آخر رد: محمد اسماعيل
Exclamation [VB.NET] مشكلة بسيطة في طباعة Textbox CoderMM 1 63 12-12-17, 09:54 PM
آخر رد: طالب برمجة
  [VB.NET] مشكلة عند تحديث البيانات بالداتا جريد فيو محمد اسماعيل 0 47 09-12-17, 03:28 AM
آخر رد: محمد اسماعيل
  مشكلة في تثبيت اداة Oracle Developer Tools for Visual Studio Marwan9990 9 152 04-12-17, 06:38 PM
آخر رد: Marwan9990
  [VB.NET] طلب مساعدة في حل مشكلة فراس الغزي 8 115 03-12-17, 09:41 PM
آخر رد: طالب برمجة
  [VB.NET] مشكلة فيجوال بيزك ( تهنيج وتخريب ) سارة احمد 6 163 30-11-17, 10:30 PM
آخر رد: سارة احمد
  مشكلة في الريستور abdulla2 0 60 30-11-17, 10:14 PM
آخر رد: abdulla2
  مشكلة في عملية الجمع VB.NET 5 64 26-11-17, 04:09 PM
آخر رد: حريف برمجة
  مشكلة في تحميل فورم يحتوي على كريستال ريبورت تناسيم 2 219 26-11-17, 10:43 AM
آخر رد: السيد الجوهري
  [كود] حل مشكلة عبدالرحمن المكاوي 1 65 25-11-17, 05:11 PM
آخر رد: ibraheam

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم