اخواني الكرام ماعم تضبط معي
عاوز لما اضغط زر اضافة ينزل بالتكست بوكس ( المعرف ) الرقم الافتراضي تلقائيا يعني لو كان اخر اسم عندي رقمه 10 لما اضغط زر اضافة ينزل رقم 11 تلقائيا في تكست بوكس المعرف مو -1
(08-11-19, 03:42 PM)اسامه الهرماوي كتب : [ -> ]السلا عليكم...
الحل موجود هنا
http://vb4arb.com/vb/showthread.php?tid=26843
اخي الكريم عذرا منك لم تتضح لي الفكرة بعد
عندي
قاعدة البيانات اكسس
اسم القاعدة AA
اسم الجدول ee
اسم العمود المعرف
فكيف يصبخ الكود واين اضعه هل في زر بوتن اضافة ام ماذا
(08-11-19, 05:11 PM)EMADSSS كتب : [ -> ] (08-11-19, 03:42 PM)اسامه الهرماوي كتب : [ -> ]السلا عليكم...
الحل موجود هنا
http://vb4arb.com/vb/showthread.php?tid=26843
اخي الكريم عذرا منك لم تتضح لي الفكرة بعد
عندي
قاعدة البيانات اكسس
اسم القاعدة AA
اسم الجدول ee
اسم العمود المعرف
فكيف يصبخ الكود واين اضعه هل في زر بوتن اضافة ام ماذا
Dim MaxID As Integer = AADataSet.Tables("ee").AsEnumerable().Max(Function(Row) Convert.ToInt32(Row("المعرف")))
Dim NewID As Integer = MaxID + 1
MsgBox(NewID)
جربت هذا الكود اصبحت النتيجة تضهر في رسالة انا عاوز النتيجة تنزل فورا في التكست بوكس
(08-11-19, 11:06 PM)ابراهيم ايبو كتب : [ -> ]السلام عليكم اخي الكريم
اكتب التالي
كود :
TextId.text=MaxId+1
شكرا اخي لكن مامشي الحال اذا بتقدر تضيفلي الكود على المشروع المرفق وكلك ذوق
اخي نفس الكود الذي اظهر الرقم في مسج بوكس استبدل المسج بوكس
باسم مربع النص الذي سيظهر فيه الماكس اي دي