تصحيح كود

السلام عليكم

شباب انا عامل كود لعملية البحث عن مهمةمعينه لموظف حيث تتم العملية بادخال موضوع المهمة بالكامل أو حتى كلمة واحدة في Textbox2.Text

من حقل موضوع المهمة واسترجاع هذه البيانات الى اداه القريد فيو

كتبت الكود التالي لكن ما يرجع شيء

ارجوا المساعدة في تصحيحة حيث واني اعتقد ان الخطأ في جملة الاستعلام select وتحديدا بعد كلمة like في نهاية السطر الثاني

sql = "select task.t_no,users.u_name,task.t_name,task.t_sdate,task.t_udate,task.t_type,d_name from task,users,department where users.u_no=task.t_to and department.d_no=task.d_no and task.t_name like '% TextBox2.text %' and task.t_type<" & 2 & "ORDER BY [u_name],[t_no]"

sqlcon.Open()

cmd = New SqlCommand(sql, sqlcon)

dread = cmd.ExecuteReader

If dread.Read = False Then

dread.Read()

sqlcon.Close()

Label4.Text = "موضوع المهمة غير موجودة"

Exit Sub

End If

dread.Close()

sqlcon.Close()

da = New SqlDataAdapter(sql, sqlcon)

Dim ds As New DataSet

da.Fill(ds, "task,users,department")

Dim dr As DataRow = ds.Tables(0).Rows(0)

GridView1.DataSource = ds.Tables(0)

GridView1.DataBind()