[ZEEN4ZEEN]

السلام عليكم
كيف كتابة اكتر من 10 استعلامات فى جملة IF 
وتنفيد الاستعلام حسب الرقم المكتوب فى التكسة بكس

 Dim sql As String

IF TextBox1.Text = 100 Then
"SQL = "SELECT * FROM BT WHERE carno IN (6350,6924)

ElseIf TextBox1.Text = 200 Then

"SQL = "SELECT * FROM BT WHERE carno IN (5550,655)

ElseIf TextBox1.Text = 300 Then

"SQL = "SELECT * FROM BT WHERE carno IN (3330,614)

وهاكدا
كيف كتابة هدا الاستعلام
وشكرا