xx="select 字段1 from 表1 where  字段1 in (select 字段11  from 表2)"
xx="select 字段111 from 表3 where  字段1 in (" & xx & ")"怎样用动态数组来替换 in 后的语句

解决方案 »

  1.   

    xx="select 字段1 from 表1 where  字段1 in (select 字段11  from 表2)"
    這個句子寫得很好,你的動態數組數據是從哪時來的?如果從數據庫裡出來那就不必了。
    用數組:
    dim arr as  varient
    dim sss as string
    sss="............."
    arr=split(sss,",")
    xx="select 字段111 from 表3 where  字段1 in (" & arr & ")"
    請你試用第二種方法一下
      

  2.   

    dim str as string
    dim arraya() as string
    dim i as integer
    redim arraya(10) as string 
    for i=0 to 10
      arraya(i)="a"+cstr(i)
      str=str+"'"+arraya(i)+"',"
    '注意:如果为数值型 的就不要加那两个'号
    nextstr= left(str,len(str)-1)
    xx="select 字段111 from 表3 where  字段1 in (" & str & ")"
      

  3.   

    xx = "select 字段111 from 表3 where  字段1 in (select 字段1 from 表1 where  字段1 in (select 字段11  from 表2))"就可以,用数组不见得更快