تحديد خطأ في جملة Sql

لديك كود يحتوي على جملة SQL لقراءة عدد السجلات لكن يعطينا رسالة خطأ كما في الصورة المرفقة

Dim count As Integer
				Dim StrSQL_MealTime As String = "SELECT Count(*) FROM Patient LEFT JOIN Meal_Patient ON Patient.USER_FILE_ID = Meal_Patient.USER_FILE_ID" & _
				"WHERE Meal_Patient.MealTime='" & ddlMealTime.SelectedItem.Text & "' AND Patient.WARD='" & ddlWard.SelectedItem.Text & "' AND Meal_Patient.SDATE ='" & txtEventDate.Text & "' "
				Dim cmd2 As New SqlCommand(StrSQL_MealTime, cnAccess)
				count = cmd2.ExecuteScalar
				If count > 0 Then
					Page.ClientScript.RegisterStartupScript(Me.GetType(), "myscript", "alert('البيانات مكرره');", True)

				End If