+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : مساعده فى تعديل كود لو سمحتوا (/showthread.php?tid=23128)
مساعده فى تعديل كود لو سمحتوا - نبيل فتحى - 30-12-17
PHP كود :
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged
cmd = New OleDb.OleDbCommand(String.Format("select id from MAKH where I_ITEM = '{0}'", ComboBox1.Text), con)
con.Open()
Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader
If dr.Read() Then
TextBox5.Text = dr(0)
TextBox1.Focus()
End If
con.Close()
End Sub
Private Sub ComboBox2_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox2.SelectedIndexChanged
cmd = New OleDb.OleDbCommand(String.Format("select id from MAKH where I_ITEM = '{0}'", ComboBox2.Text), con)
con.Open()
Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader
If dr.Read() Then
TextBox4.Text = dr(0)
TextBox7.Focus()
End If
con.Close()
End Sub
بمجرد انى افتح الفورم بياخد قيمته ويحطها فى TextBox5.Text ولو بغير فى الكومبو بوكس بيتغير
المشكله فى الـ sup التانى TextBox4.Text مش بياخد قيمه الا لما اختار اى قيمه من الكومبو بوكس مع العلم ان فى قيمه فى الكومبو بوكس اصلا
RE: مساعده فى تعديل كود لو سمحتوا - zinom - 30-12-17
ا/ نبيل الكود الي حضرتك ارفقته يعتبر ناقص
- بنأً علي كلام حضرتك (بمجرد انى افتح الفورم بياخد قيمته ويحطها فى TextBox5.Text)
شوف حضرتك - حدث الفورم لود وراجع الاكواد الموجوده فيه
اكيد هتلاقي انك قمت بتمرير قيمة الكومبوبوكس للتيكست بوكس 5
وده معني كلام حضرتك
اذا كان كده - يبقي طبق نفس الفكره علي البوكس التاني
واذا لم يكن - ارجو من حضرتك ارفاق مثال لمراجعة الكود مع حضرتك
[attachment=16522]
RE: مساعده فى تعديل كود لو سمحتوا - نبيل فتحى - 02-01-18
(30-12-17, 08:48 PM)zinom كتب :بشكر حضرتك على الرد انا دمجت الصفحتين مع بعض وحلتها بكده مدام فى واحد شغال وقللت بكده من مساحة البرنامج والكودا/ نبيل الكود الي حضرتك ارفقته يعتبر ناقص- بنأً علي كلام حضرتك (بمجرد انى افتح الفورم بياخد قيمته ويحطها فى TextBox5.Text)
شوف حضرتك - حدث الفورم لود وراجع الاكواد الموجوده فيه
اكيد هتلاقي انك قمت بتمرير قيمة الكومبوبوكس للتيكست بوكس 5
وده معني كلام حضرتك
اذا كان كده - يبقي طبق نفس الفكره علي البوكس التاني
واذا لم يكن - ارجو من حضرتك ارفاق مثال لمراجعة الكود مع حضرتك