+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] سؤال في عدم تمكين احد خلايا الداتا جريد (/showthread.php?tid=38393)
سؤال في عدم تمكين احد خلايا الداتا جريد - ismaeel - 03-05-21
لدي داتا جريد مكونة من أربعة حقول Column4 - Column3 -Column2-Column1
اريد كود يقوم بعدم تمكين احد حقول الداتا جريد وليكن مثلا الحقل الثالث(Column3)
فلو كان مؤشر الكتابة على الحقل الثاني (Column2)عند الضغط على زر tab ينتقل التركيز الى الحقل الرابع (Column4)
RE: سؤال في عدم تمكين احد خلايا الداتا جريد - ahmed mohamedh - 03-05-21
السلام عليكم
انا محتاج اسأل عن موضوع اخر لكن مش عارف اسأل فين
عندى قاعدة بيانات اكسيس انشأتها وعاوز ابعثها لحضراتكم علشان محتاج لمساعدة وهى
انشأت نموذج ومن ضمن ما به عدد 2 listBox وعاوز اضع البيانات التى تظهر بهم فى listBoxt اخر يشتمل على بياناتهم معا
كيف ابعث ذلك
معذرى اننى دخلت على هذا السؤال لأوصل سؤالى
المطلوب بعد اذن حضراتكم
عند فتح البرنامج ستظهر نافذة اختار منها الدخول على التقارير
ثم اختار فترة بين سنتين وليكن 2016، 2017 واختار نوع السوق ثم اختار الفترة بين الشهور وستظهر بعض البيانات
المراد العمل على ال listBox كما يلى
ال listBox الاول والثانى اسمائهم bmo11, bmo1 واريد ان اضع قيمهم فى ال listBox الثالث واسمه good
وذلك بعد اختيار السنة من واختيار السنة إلى ثم اختيار نوع السوق واختيار الشهور من وإلى وذلك حتى تظهر القيم المراد فى العمل عليها
ملحوظة: تم ارفاق ملف الاكسيس المراد العمل عليه مع هذه الرسالة ليتم التعديل عليه بما طلبته من حضراتكم
برجاء معرفتى كيف اتلقى الاجابة
مع جزيل الشكر لحضراتكم
RE: سؤال في عدم تمكين احد خلايا الداتا جريد - mrfenix93 - 03-05-21
(03-05-21, 01:25 AM)ismaeel كتب : لدي داتا جريد مكونة من أربعة حقول Column4 - Column3 -Column2-Column1
اريد كود يقوم بعدم تمكين احد حقول الداتا جريد وليكن مثلا الحقل الثالث(Column3)
فلو كان مؤشر الكتابة على الحقل الثاني (Column2)عند الضغط على زر tab ينتقل التركيز الى الحقل الرابع (Column4)
كيف تقوم تملء ال داتا جريد
ممكن الكود الذي تملء به ال بيانات
RE: سؤال في عدم تمكين احد خلايا الداتا جريد - ismaeel - 03-05-21
(03-05-21, 01:31 PM)mrfenix93 كتب : كيف تقوم تملء ال داتا جريد
ممكن الكود الذي تملء به ال بيانات
كود :
Dim sql = ("select * from AC_Mark ")
Dim adp As New SqlClient.SqlDataAdapter(sql, sqlconn)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
DGV1.AutoGenerateColumns = False
DGV1.DataSource = dtRE: سؤال في عدم تمكين احد خلايا الداتا جريد - mrfenix93 - 03-05-21
كود :
Dim sql = ("select * from AC_Mark ")
Dim adp As New SqlClient.SqlDataAdapter(sql, sqlconn)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
DGV1.AutoGenerateColumns = False
DGV1.DataSource = dt
DGV1.Columns["???????"].ReadOnly = falseوحضرتك تحدد الحقل الذي تريد
RE: سؤال في عدم تمكين احد خلايا الداتا جريد - ismaeel - 03-05-21
(03-05-21, 02:59 PM)mrfenix93 كتب :ظهرت المشكلة التاليةكود :
Dim sql = ("select * from AC_Mark ")
Dim adp As New SqlClient.SqlDataAdapter(sql, sqlconn)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
DGV1.AutoGenerateColumns = False
DGV1.DataSource = dt
DGV1.Columns["???????"].ReadOnly = false
RE: سؤال في عدم تمكين احد خلايا الداتا جريد - a7med saba - 05-05-21
(03-05-21, 10:53 PM)ismaeel كتب :(03-05-21, 02:59 PM)mrfenix93 كتب :ظهرت المشكلة التاليةكود :
Dim sql = ("select * from AC_Mark ")
Dim adp As New SqlClient.SqlDataAdapter(sql, sqlconn)
Dim ds As New DataSet
adp.Fill(ds)
Dim dt = ds.Tables(0)
DGV1.AutoGenerateColumns = False
DGV1.DataSource = dt
DGV1.Columns["???????"].ReadOnly = false
المقصود هنا في الكود التالي اسم العمود كمثال عمود الهاتف.
Columns["phone"].readonly
أما اذا اردت تحديد رقم العمود
Columns(3).readonly
وهذا هو حل المشكلة الجديدة التي ظهرت