क्षमा करें एना मुझे नहीं लगता कि आप खंड से तालिका का नाम छोड़ सकते हैं। यदि आप वास्तव में 30 अलग-अलग तालिकाओं को खोजना चाहते हैं (जिनमें सभी के कॉलम समान हैं...?)
आप प्रत्येक तालिका से डेटा प्राप्त करने के लिए प्रत्येक (तालिका नाम) लूप के लिए कर सकते हैं। एडेप्टर सभी नई जानकारी को डेटाटेबल में जोड़ता है ताकि आपके पास अंत में सभी 30 तालिकाओं के परिणामों के साथ सिर्फ 1 डेटाटेबल हो।
Dim query As String
Dim dt as new Datatable
For each tablename in (tablenamelist)
query = "select * from " & tablename & " where (Item_Description LIKE '%" & TextBox11.Text & "%' or Vendor LIKE '%" & TextBox11.Text & "%' OR S_N LIKE '%" & TextBox11.Text & "%' or Tag_num LIKE '%" & TextBox11.Text & "%')"
command = New MySqlCommand(query, mysqlconn)
sda.SelectCommand = command
sda.Fill(dt)
next
जहां tablenamelist आपके सभी डेटाटेबल नामों की एक सूची है। इससे काम हो जाएगा, लेकिन यहां कई सुधार किए जाने हैं।