主题：请问SQL查询的问题

Dim ssw As String = "客户表"
Dim lst As List(Of String)
lst = Connections("彬阳数据").GetTableNames
For Each nm As String In lst
    If ssw = nm Then
        Output.Show(nm)
    Else
        Dim Builder As New ADOXBuilder("彬阳数据") '要指定数据源名称
        Dim tbl As ADOXTable
        Builder.Open()
        tbl = Builder.NewTable("客户表") '创建表
        With tbl
            .AddColumn("客户编号" ,ADOXType.String, 50)
            .AddColumn("客户税号" ,ADOXType.String, 60)
            .AddColumn("客户名称" ,ADOXType.String, 120)
            .AddColumn("客户地址" ,ADOXType.String, 120)
            .AddColumn("备注" ,ADOXType.Text)
        End With
        Builder.AddTable(tbl, True, True) '增加表
        Builder.Close()
    End If