03-11-18, 04:37 AM
اخي العزيز وحدة وحدة . ركز في الشرح الآن :
أولا جملة الاتصال كالتالي حسب كودك ولكن اكفتي باسم القاعدة وحدة :
انت قمت بتعبئة الكومبو بوكس بأسماء الجداول .
كود تعبئة الكومبو كالتالي :
سيكون الكومبو وقت تشغيل البرنامج هكذا :
1
2
3
4
5
6
7
وجملة السيليكت تكون كالتالي :
إذا الجملة تحتوي على شروط مثل Where
تضعها هنا
كود :
أولا جملة الاتصال كالتالي حسب كودك ولكن اكفتي باسم القاعدة وحدة :
كود :
conn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + IO.Directory.GetCurrentDirectory + "\h1.accdb"انت قمت بتعبئة الكومبو بوكس بأسماء الجداول .
كود تعبئة الكومبو كالتالي :
كود :
ComboBox1.Items.Add("1")
ComboBox1.Items.Add("2")
ComboBox1.Items.Add("3")
ComboBox1.Items.Add("4")
ComboBox1.Items.Add("5")
ComboBox1.Items.Add("6")
ComboBox1.Items.Add("7")سيكون الكومبو وقت تشغيل البرنامج هكذا :
1
2
3
4
5
6
7
وجملة السيليكت تكون كالتالي :
كود :
Dim cmd As New OleDbCommand("select * from" & ComboBox1.Text & " ", conn)إذا الجملة تحتوي على شروط مثل Where
تضعها هنا
كود :
كود :
Dim cmd As New OleDbCommand("select * from" & ComboBox1.Text & " هنا ", conn)
يا رحمن الدنيا والآخرة ورحيمهما

