VB里执行SQL语句，并显示结果
SQL里的查询语句为

VB code

SELECT RdRecord.cBusType AS 类型, RdRecord.dDate AS 日期,       RdRecord.cCode AS 单据编码, RdRecords.cInvCode AS 存货编码,       Inventory.cInvName, RdRecords.iQuantity AS 数量, RdRecords.iUnitCost AS 单价,       RdRecords.iPrice AS 金额FROM RdRecord INNER JOIN      RdRecords ON RdRecord.ID = RdRecords.ID LEFT OUTER JOIN      Inventory ON RdRecords.cInvCode = Inventory.cInvCodeWHERE (RdRecord.cBusType = '普通采购') AND (RdRecord.cCode = '2011060434')

连接SQL代码为

SQL code

Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=UFDATA_002_2011;Data Source=192.168.1.6;Connect Timeout=30

VB程序里一个text1、一个Command1、一个DataGrid1

在text1里面输入单号（SQL语句里RdRecord.cCode = '2011060434'中2011060434为单号）

点击Command1即在DataGrid1里显示出查询的结果

SQL语句是别人写给我的，不知道在VB里怎么使用，望各大侠帮写下完整代码，多谢！

[解决办法]
先预付100分，
[解决办法]
好吧，自已动手，丰衣足食~~~~
[解决办法]
哦 接分～