06-09-22, 06:09 PM
السلا عليكم ورحمة الله وبركاته
انا عايز الوقوف على سطر معين في داتا قريد فيجو DGV
على سبيل المثال انا مثلا في فورم المبيعات
دخلت رقم الزبون مثلا 2
هلا لمن بضغط دبل كليك على TEXTBOX الخاص ب رقم الزبون بيفتح فورم الزبائن بشكل طبيعي
انا عايز ادا كان يوجد رقم في التكس بوكس يقوم بالبحث عنه في داتا قريد ويحدد عليه مثال
هلا انا في فورم المبيعات بضغط دبل كليك على TEXTBOX الخاص ب رقم الزبون بكون موجود هدا الكود
Private Sub TXT_CUSTOMER_DoubleClick(sender As Object, e As EventArgs) Handles TXT_CUSTOMER.DoubleClick
IF TEXTBOX.TEXT = NOTHING
Dim F As New FORM_CUSTOMER
F.ShowDialog
If F.ACCEPT = True Then
Dim R As Integer = F.DGV.CurrentRow.Index
TXT_NUM_CUSTOMER.Text = F.DGV.Rows®.Cells("COL_NUMBER").Value
TXT_CUSTOMER.Text = F.DGV.Rows®.Cells("COL_NAME").Value
End If
ELSEIF TEXTBOX.TEXT <> NOTHING
Dim F As New FORM_CUSTOMER
F.ShowDialog
هنا كيف يمكن اجعله يقف على نفس الرقم والسطر الموجود في التكس بوكس مثلا كان رقم 2 يكون المؤشر هنا على زبون رقم 2 وشكرا لكم
END IF
End Sub
وبارك الله فيكم جميعا نرجو منكم ان تفيدونا
انا عايز الوقوف على سطر معين في داتا قريد فيجو DGV
على سبيل المثال انا مثلا في فورم المبيعات
دخلت رقم الزبون مثلا 2
هلا لمن بضغط دبل كليك على TEXTBOX الخاص ب رقم الزبون بيفتح فورم الزبائن بشكل طبيعي
انا عايز ادا كان يوجد رقم في التكس بوكس يقوم بالبحث عنه في داتا قريد ويحدد عليه مثال
هلا انا في فورم المبيعات بضغط دبل كليك على TEXTBOX الخاص ب رقم الزبون بكون موجود هدا الكود
Private Sub TXT_CUSTOMER_DoubleClick(sender As Object, e As EventArgs) Handles TXT_CUSTOMER.DoubleClick
IF TEXTBOX.TEXT = NOTHING
Dim F As New FORM_CUSTOMER
F.ShowDialog
If F.ACCEPT = True Then
Dim R As Integer = F.DGV.CurrentRow.Index
TXT_NUM_CUSTOMER.Text = F.DGV.Rows®.Cells("COL_NUMBER").Value
TXT_CUSTOMER.Text = F.DGV.Rows®.Cells("COL_NAME").Value
End If
ELSEIF TEXTBOX.TEXT <> NOTHING
Dim F As New FORM_CUSTOMER
F.ShowDialog
هنا كيف يمكن اجعله يقف على نفس الرقم والسطر الموجود في التكس بوكس مثلا كان رقم 2 يكون المؤشر هنا على زبون رقم 2 وشكرا لكم
END IF
End Sub
وبارك الله فيكم جميعا نرجو منكم ان تفيدونا