استرجاع بيانات حسب الرقم المكتوب في صندوق النص

تم عرض الموضوع في المنتدى ولكن بحثت عليه ولم اجدة واعتقد ان الموضع هو للاخ

Adel_N

والمطلوب هو نفس الكود التالي ولكن ليس للنص بل للارقام

 Dim MyRows() As DataRow = DS.Tables("main").Select("name like '%" & TextBox3.Text & "%'")
		Dim FoundRows As DataTable = DS.Tables("main").Clone
		Dim dr As DataRow
		For Each dr In MyRows
			FoundRows.ImportRow(dr)
		Next
		DataGridView1.DataSource = FoundRows
		DataGridView1.AutoResizeColumns()