[new_programer]

(14-04-23, 04:22 AM)ابو انس كتب : وعليكم السلام
تفضل التعديل في المرفقات

شكرا   لك اخي الكريم 

عفوا كنت محتاج الكمبو بوكس كما بالمثال    داخل الداتا جريد .

---

(14-04-23, 08:50 AM) كتب :

كود :

Dim dtUint As New DataTable
Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
   Dim sda As New SqlDataAdapter("SELECT * FROM Uint_NameTbl", conn)
   sda.Fill(dtUint)
   With TryCast(dvg_UintPrice.Columns(0), DataGridViewComboBoxColumn)
       .DataSource = dtUint
       .DisplayMember = "UintName"
       .ValueMember = "id"
   End With
End Sub
Private Sub dvg_UintPrice_CellEndEdit(sender As Object, e As DataGridViewCellEventArgs) Handles dvg_UintPrice.CellEndEdit
   If e.ColumnIndex = 0 Then
       Dim UintID = dvg_UintPrice.Item(0, e.RowIndex).Value
       If Not IsNothing(UintID) Then
           Dim v = dtUint.Rows.Cast(Of DataRow).Where(Function(r) r("id") = UintID).First
           dvg_UintPrice.Item(1, e.RowIndex).Value = v("UintQty").ToString
       End If
   End If
End Sub

---

ملاحظة:
النتيجة تظهر بعد الانتقال لخلية أخرى

شكرا    جدا  جدا   

 الكود   يعمل   كما  المطلوب  


شكرا جدا لك  

ربنا يجعلة فى موازين حسناتك   - ويزيدك علم وفضل

---

---

------------

اريد نقل التركيز على الخلية سعر الشراء فى نفس السطر بعد اختيار الوحدة