ขึ้นerror Incorrect syntax near แก้ไขยังไงบอกทีนะครับ Incorrect syntax near 'byCategoryCarName'.

Imports System.Data
Imports System.Data.SqlClient
Imports System.IO
Imports System.Linq
Imports System.Text
Imports System.Collections.Generic
Imports System.Drawing
Imports System.Drawing.Image
Imports System.Windows.Forms
Imports System.Drawing.Printing
Imports System.Reflection
Public Class frmCar
    Public Conn As SqlConnection 'สำหรับต่อ DB
    Public com As SqlCommand ' สำหรับเรียกใช้คำสั่งsql
    Public strConn As String ' สำหรับเก็บชุดคำสั่ง sql
    Public tr As SqlTransaction 'สำหรับตรวจสอบความซ้ำซ้อนของข้อมูลไม่ไห้ซ้ำกัน
    Public sb As New StringBuilder() ' ใช้ต่อ string สำหรับเก็บชุดคำสั่ง sql หากคำสั่งยาว
    Public bs As New BindingSource() ' ตัวเก็บชุดคำสั่งไว้รอการใช้งาน
    Public IsFind As Boolean = False ' มีค่าเป็นจริงและเท็จไว้อ้างอิงว่าต่อDBได้ไหม

    Public tb_Name As String = "tbCar"
    Public fieldId As String = "CarID"
    Public field1 As String = "CarName"
    Public field2 As String = "CustomerID"
    Public field3 As String = "CategoryID"
    Public field4 As String = "BrandID"
    Public field5 As String = "ModelID"
    Public field6 As String = "ColorID"

    Public car As String = "รถ"
    Public cm As String = "ลูกค้า"

    Public tb_NameCategory As String = "tbCategoryCar"
    Public fieldIdCategory As String = "CategoryCarID"
    Public field1Category As String = "CategoryCarName"

    Public tb_NameBrand As String = "tbBrand"
    Public fieldIdBrand As String = "BrandID"
    Public field1Brand As String = "BrandName"

    Public tb_NameModel As String = "tbModel"
    Public fieldIdModel As String = "ModelID"
    Public field1Model As String = "ModelName"

    Public tb_NameColor As String = "tbColor"
    Public fieldIdColor As String = "ColorID"
    Public field1Color As String = "ColorName"

    Dim da, da2, da3, da4, da5 As SqlDataAdapter
    Dim ds, ds2, ds3, ds4, ds5 As New DataSet() 

    Sub CtrlSelectComboBoxCategoryCar() 'เรียกคำนำหน้าชื่อมาจาก ฐานข้อมูล
        ReadConnectSQLServer()
        Dim sqlComboBoxCategory As String
        sqlComboBoxCategory = "SELECT * FROM " & tb_NameCategory & " Order by" & field1Category & " DESC"
        da = New SqlDataAdapter(sqlComboBoxCategory, Conn)
       da.Fill(ds, "tbCategoryCar")

        If ds.Tables("tbCategoryCar").Rows.Count <> 0 Then
            With cbCategoryCar
                .DisplayMember = field1Category
                .ValueMember = fieldIdCategory
                .DataSource = ds.Tables("tbCategoryCar")
            End With
        End If
    End Sub