14-12-19, 02:10 AM
السلام عليكم اخي الكريم
لماذا تستخدم مربعات النصوص فقط بدون داتاغرايد فيو ؟
الداتا غرايد افضل للعرض وحرية البرمجة
اليك مثال كود عرض السجلات في التكست بوكسات طبعا سيجلب لك اول سجل وهو السجل ذو الاندكس 0
لماذا تستخدم مربعات النصوص فقط بدون داتاغرايد فيو ؟
الداتا غرايد افضل للعرض وحرية البرمجة
اليك مثال كود عرض السجلات في التكست بوكسات طبعا سيجلب لك اول سجل وهو السجل ذو الاندكس 0
كود :
Private Sub loddata()
Try
Dim da As New OleDbDataAdapter(" SELECT * From ITEMS ", con)
Dim dt As New DataTable
If da.Fill(dt) > 0 Then
Txt_Itm_ID.Text = dt.Rows(0)(0).ToString
Txt_Itm_Name.Text = dt.Rows(0)(1).ToString()
Txt_Itm_Marka.Text = dt.Rows(0)(2).ToString()
Txt_Itm_Price.Text = dt.Rows(0)(3).ToString()
End If
Catch ex As Exception
MsgBox("خطأ في جلب البيانات")
End Try
End Sub
'loddata() وفي حدث فورم لود نستدعي الصب
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
loddata()
End Subاعمل الخير وأجرك لا تنتظره فالله خير من إليك يرده
البرمجة ليست مجرد كود بل هي منهج تفكير منطقي لحل المشكلات
