PHP كود :
Imports System.Data.OleDb
Public Class saudform
Dim con As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Nationality.accdb")
Dim da As OleDbDataAdapter ' جدول مصدر المعلومات
Dim dt As DataTable ' مكان التخزين
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
da = New OleDbDataAdapter("select * from Nationality where [Gender]='Male' and [Age]>=25", con)
dt = New DataTable
da.Fill(dt)
DataGridView1.DataSource = dt
End Sub
End Class
اضفت فورم saudform جديد انظر للحدثين Load و حدث النقر لزر الامر
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
