السلام عليكم إخواني الأعزاء ورحمة الله وبركاته
أقدم لكم شرح بالفيديو حول طريقة البحث في DataGridView
الرابط:http://youtu.be/reKIkYMz3Sk
السلام عليكم إخواني الأعزاء ورحمة الله وبركاته
أقدم لكم شرح بالفيديو حول طريقة البحث في DataGridView
الرابط:http://youtu.be/reKIkYMz3Sk
الله يعطيك العافية استاذ
شفت هالفيديو تبعك
وطبقت نفس الكود تبع الإضافة للداتا قريد
بس ما بينضاف كسجل جديد, اللي بيصر انو بيمحي سجل ويجي بداله
يعني عدد السجلات 19 ما بيزيد
Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click
Try
Dim con As New OleDb.OleDbConnection
Dim SavInto As New OleDb.OleDbCommand(SQLstr2, con)
SavInto.Parameters.AddWithValue("@Student_ID", Student_IDTextBox.Text)
Dim constring As String = " Provider=Microsoft.ACE.OLEDB.12.0; Data Source =" & _
Application.StartupPath & "\Project.accdb"
SavInto.Connection = con
SavInto.CommandType = CommandType.Text
con.Open()
MyReader = SavInto.ExecuteReader
While MyReader.Read
Dim v1 = MyReader.Item("Student_ID")
Dim v2 = MyReader.Item("SFirst_Name")
Dim v3 = MyReader.Item("SSecond_Name")
Dim v4 = MyReader.Item("SLast_Name")
Dim v5 = MyReader.Item("Faculty")
Dim v6 = MyReader.Item("Major")
Dim v7 = MyReader.Item("S_email")
Dim v8 = MyReader.Item("Mobile_Number")
Me.STUDENTDataGridView.Rows.Add(v1, v2, v3, v4, v5, v6, v7, v8)
End While
MyReader.Close()
con.Close()
MsgBox("تمت عملية الإضافة والحفظ بنجاح ")
Catch ex As Exception
Exit Sub
End Tryنقطة ثانية إذا بتسمح
البحث عن الداتا اللي بتكون انتجر مثل الاي دي بيصير بنفس طريقة النص
ولا طريقة ثانية لانو ما زبط تبع النص
السلام عليكم أختي العزيزة ورحمة الله وبركاته
هناك عدة أنواع من criteria في عملية ال filter منها ما هو رقمي ونصي وتاريخ
أعتقد أننا تناولنا طريقة البحث عن قيمة نصية في المشاركات السابقة أما البحث عن قيمة رقمها نوعي فهي على الشكل التالي:
Me. Table1bindingsource. Filter = "id = " & me. Textbox2.text
والسلام عليكم ورحمة الله وبركاته
الله يعطيك العافية اخوي
جربت هذا الكود وزبط معي
Me.TableBindingSource.Filter = "Convert(ID, 'System.String') LIKE '" + Textbox1.Text + "%'"
السلام عليكم أختي العزيزة ورحمة الله ويركاته
أرفقي المشروع للعمل على معالجته