为什么vb不支持这样的语句?

Question

构造一个Create Table的SQL语句不就可以了吗

Answer 1

curCreateSql = "create table " & curTableName & "("
    For i = 0 To 字段数
        If i > 0 Then
            curCreateSql = curCreateSql & ","
        End If
        curCreateSql = curCreateSql & "字段名"
        curCreateSql = curCreateSql & " " & "字段定义信息")
    Next i
    curCreateSql = curCreateSql & ")"
    gConnection.Execute curCreateSql
这样根据用户的选择来动态构造Sql语句就可以了！

Answer 2

为什么我 的这条语句"insert into a10(aa,bb) select date_time,s132ma_ana from 1001"在visdata中可以通过,而在程序中报语法错误呢? 
Dim cnn1 As ADODB.Connection 
Dim strcon, mystr As String 
strcon = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=cur" 
Set cnn1 = New ADODB.Connection 
cnn1.Open strcon 
mystr = "insert into a10(aa,bb) select date_time,s132ma_ana from 1001" 
cnn1.Execute mystr,这是我的程序,错在哪儿呢 (其中1001为一张vfp表,a10也为vfp自由表.