VB2008 อยากได้โค้ดเวลาเราพิมพ์รหัสสินค้าแล้วไม่มีในฐานข้อมูลให้ขึ้น Error คับ

			Dim intNumRows As Integer
			strSQL = "SELECT COUNT(*) FROM product WHERE ProductID = '"& Me.txtProductID.Text &"' "		
			objCmd = New OleDbCommand(strSQL, objConn)
			intNumRows = objCmd.ExecuteScalar()

			IF intNumRows <= 0 Then

				Me.lblStatus.Text = "ProductID not exists."
			Else		


			End IF