[أبو خالد الشكري]

(09-11-23, 01:52 PM)Ashraf10 كتب : اعمل تبديل بين الشهر واليوم
11-06-2023

عشان متتلخبطش استعمل DateTimePicker

وده كود مختصر

كود :

Dim Con As New OleDbConnection("PROVIDER=Microsoft.ACE.OLEDB.12.0;Data Source =" & Application.StartupPath & "\DB2tbale.accdb;User ID=Admin;jet oledb:database password=;")
Dim cmd As New OleDbCommand("select Tab1.Name1 as [الاسم] from Tab1 where Tab1.Name1 not in (select Tab2.Name2 from Tab2 where Tab2.Date2=@d)", Con)
cmd.Parameters.Add("@d", OleDbType.Date).Value = CDate(TextBox1.Text)
Dim dt As New DataTable
Dim da As New OleDbDataAdapter(cmd)
da.Fill(dt)
Me.DataGridView1.DataSource = dt

 شكرًا جزيلا لك أخي Ashraf10 

الآن النتيجة مضبوطة 100%