VB中SQL语句种变量的写法（2）***

Question

dim sql as string
dim tablename as string
dim fieldname as string程序中，tablename等于某控件（text,combo....)的值，fieldname相同也是某控件的值。
注：取值过程如下
tablename=combo1.text fieldname=combo2.text------变量赋值
或者tablename="员工表",fieldname="姓名"----直接赋值等等
如下语句怎样写
sql="select fieldname from tablename"    还是
sql="select " & fieldname & "from" & tablename等等？如果我想选择更多的字段到一个表中，也就是如下
*******当fieldname是一个数组的情况下又怎样写？************

Answer 1

select 表里的字段名 from 表明 where 条件
例
  select 编号，姓名 from bbb where 编号='"& 变量（字符型的) &"'
select 编号，姓名 from bbb where 编号='& 变量（数值型的) 

Answer 2

sql="select "& combo1.text & "from "& combo2.text

Answer 3

sql="select "& combo1.text & " from "& combo2.text
不好意思，上面的form左边差个空格

Answer 4

搞反了
sql="select "& combo2.text & " from "& combo1.text
先是字段名，后是表名

Answer 5

sql="select "& trim(fieldname)  & " from "& trim(tablename) &"

Answer 6

'fieldname为数组的情况
Dim i As Long, tempFields As String
tempFields = ""
For i = LBound(fieldname) To UBound(fieldname)
    If tempFields <> "" Then tempFields = tempFields & ","
    tempFields = tempFields & fieldname(i)
Next i
'后续程序中用tempFields代替fieldname

Answer 7

同意 DaiLM() 的做法
但是在选择最后一个字段是记得把","去掉.