[VB.NET] السلام عليكم... سؤال حول البحث

كود :
Imports System.Data.SqlClient



Public Class Form1

    Dim connectionString As String = "Data Source=اسم_الخادم;Initial Catalog=اسم_قاعدة_البيانات;User ID=اسم_المستخدم;Password=كلمة_المرور;"

    Dim connection As SqlConnection

    Dim dataAdapter As SqlDataAdapter

    Dim dataTable As DataTable



    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        ' إعداد اتصال القاعدة بيانات واستعداد DataTable

        connection = New SqlConnection(connectionString)

        dataTable = New DataTable()

        DataGridView1.DataSource = dataTable

    End Sub



    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

        Dim searchName As String = TextBox1.Text.Trim()



        ' التحقق من صحة اسم البحث

        If String.IsNullOrEmpty(searchName) Then

            MessageBox.Show("الرجاء إدخال اسم للبحث.")

            Return

        End If



        Try

            ' إعداد وتنفيذ الاستعلام

            Dim query As String = "SELECT * FROM اسم_الجدول WHERE اسم_العمود LIKE '%" & searchName & "%'"

            dataAdapter = New SqlDataAdapter(query, connection)

            dataTable.Clear()

            dataAdapter.Fill(dataTable)



            ' عرض النتائج في DataGridView

            DataGridView1.DataSource = dataTable

        Catch ex As Exception

            MessageBox.Show("حدث خطأ أثناء البحث: " & ex.Message)

        End Try

    End Sub

End Class