VB高手帮忙,VB代码分析

来源:百度知道 编辑:UC知道 时间:2024/06/02 13:39:12
采用Listview读取数据库的内容时, 以下三局是怎么理解的?
sql = "select 编号,流水号,图号,名称,规格,材料,供应商,特性,注明,单价 from 元件"
sql = sql & " where 流水号='" & Me.Txthao.Text & "' ORDER BY 编号 ASC"
Call OpenConn
rs.Open sql, cn, 1, 1 '这里我不能理解后面的数字是什么意思?

为什么这样做无法通过编译?
当我把前面两句改成
sql = "select * from 元件"
却可以通过编译.

我的目的是只想读取与"流水号"相同的数据库里面的一条内容,
全部代码如下,请高手帮我把这段代码修改成一下,能实现我需要的功能.

Private Sub Form_Load()

With Me.ListView1
.FullRowSelect = True '(允许整行选择)
.Gridlines = True '(显示网格)
.CheckBoxes = True '显示checkboxes框
.View = 3 '以报表形式显示
.ColumnHeaders.Add = "流水号"
.ColumnHeaders.Add = "图号"
.ColumnHeaders.Add = "名称"
.ColumnHeaders.Add = "规格"
.ColumnHeaders.Add = "材料"
.ColumnHeaders.Add = "数量"
.ColumnHeaders(1).Width = 1200
.ColumnHeaders(2).Width = 2000
.ColumnHe

sql = "select 编号,流水号,图号,名称,规格,材料,供应商,特性,注明,单价 from 元件"
sql = sql & " where 流水号='" & Me.Txthao.Text & "' ORDER BY 编号 ASC"
Call OpenConn
rs.Open sql, cn, 1, 1 '这里我不能理解后面的数字是什么意思?

为什么这样做无法通过编译?
当我把前面两句改成
sql = "select * from 元件"
却可以通过编译.

--编译应该是没有问题的 vb不会去检查sql语法的 应该是运行时有错误 把所有的标点符号全部改成半角符号,不能使用中文的全角符号(比较一下: ,和 ,)

rs.Open sql, cn, 1, 1 '这里我不能理解后面的数字是什么意思?

--baidu一下ado帮助文件 ,然后看一下关于open的语法 如果实在找不到可以发邮件给我

gggbvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv

vnbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb

bnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn
<