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

نسخة كاملة : مساعده بهذا المشروع
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
ارجو المساعده بكود الحفظ  والبحث بقاعدة البيانات
مع العلم انني مبتدء وسارفق المشورع مع الشكر
حضرتك انا فتحت المشروع
المفروض انك تعمل ترقيم تلقائى فى حدث load form
وعند الضغط على حفظ تعمل نفس الترقيم التلقائى بعد كود حفظ الفاتورة
كود الترقيم التلقائى
Dim cmd As New OleDbCommand
       cmd.Connection = con
       cmd.CommandType = CommandType.Text
       cmd.CommandText = "select max(invno)from [inv]"
       con.Open()
       Dim a As Integer = cmd.ExecuteScalar
       con.Close()
       txtinvno.Text = a + 1