如何将这段VPF的程序翻译成VB程序？？

[cowbaby]

在VPF中有这么一段程序：
SELE 1
USEV DATABASE\DB1
SET uniq on
INDE ON FIELD1+FIELD2 TO ind
COPY to tmp
SET INDE TO
SET uniq off
INDE ON FIELD1+FIELD2 TO ind

请问如何将这段VPF的程序翻译成VB程序？？

[westbulls]

你的主要目的是排序,vb没有后台数据库,你用的是什么数据库?

[cowbaby]

我用的是access,
COPY to tmp这句话我不知道如何翻译成vb代码，
表DB1是已经存在的表。

[westbulls]

copy to tmp 是将按定义顺序的表输出为一个临时表,在access中不需要使用临时表,你将后台的表生成两个查询视图,每个按不同的顺序排序不就可以了吗.

[cowbaby]

非常感谢westbulls！
问题：
trim(field1) + trim(field2)
trim(field1) 和 trim(field2)之间有个 +
但是为什么没有"
为什么不写成 "trim(field1)" + "trim(field2)"

[cowbaby]

问题1
先看一段vb代码：
用的是ADO模型连接数据库

SqlInfo = "select a,b,from db1 where a =" + "'" + va + "' and c =" + "'" + vb + "' and gauge =" + "'" + vc + "' and d <> 0"
rss.Open SqlInfo, cn, adOpenDynamic, adLockOptimistic, adCmdText

其中a,b ,c是字段名，va,vb,vc是变量名
大家是不是觉得写这句SqlInfo很麻烦啊，用那么多 + 号连接变量和字符串，如果是字符串
变量还得用 ' 号，有没有简便的方法？？

问题2
先看一段VFP代码：
SELE 1
USE DATABASE\DB1
LOCA for a = trim(field1) + trim(field2)
其中 a 是变量名，field1,field2 是字段名，
如果转化为vb代码，采用的是问题1中代码的写法，那么SqlInfo该如何写？？
有没有更好的写法，但必须是ADO模型关联Access数据库。

[westbulls]

sqlinfo="select * from db1 where a="+"'"+trim(field1)+trim(field2)+"'"
没有什么更好的写法,已经比较简单了.