下面那段VB我有些不明白,请高人指教一下!~

2026年09月11日 18:46
有4个网友回答
网友(1):

Execute(“insert into Table_user values(“& Text6 &”,“& Text1 &”,
“& Text2 &”,“& Check1 &”,“& Check2 &”)”)
你得分开来看,并不是你看到的"& Check1 &” ,正确的应该是"," | & Check1 & | "," 。
其中“&”并不是取地址,而是字符串连接符,是字符“,” 与 Check1 与 “,” 三个字符串的连接!仔细看看SQL语组成结构吧。

If Adodc1.Recordset.RecordCount>0 Then 这句是什么意思?:这句是判断当前数据库中记录总数
Adodc1.Recordset.MoveLast ':这句是将当前游标移动到最后一条记录
Text6.Text=Val(Adodc1.Recordset.Fields(“ID”))+1 还要这句不懂:这句是将最后一条记录的ID值加1后放到Text6中
Else
Text6.Text=1 ,1是什么意思:这句是前面的判断条件不成立(即数据库当前无记录)时给Text6赋值"1” .

网友(2):

汗,在VB里面&不是取地址,在C里面才是。在VB里面是连接字符串的符号。跟+是一样的,不过有些区别。
这段代码是操作数据库的

网友(3):

这里&不是取地址, 而是连接字符串, 直接写Check1 默认指的是 check1.value属性的值
If Adodc1.Recordset.RecordCount>0 这一句是判断结果集是否为空, 如果结果集中一条记录也没有, 那么调用Adodc1.Recordset.Fields(“ID”) 会报错, 所以这里判断一下
Text6.Text=Val(Adodc1.Recordset.Fields(“ID”))+1 这一句应该是得到最后一条注册的记录, 取它的ID值再加1, 为产生下一条注册记录做准备
Text6.Text=1 这一句要结合前面的If来看, If返回假才会执行它, If什么时候返回假呢, 就是结果集中没有记录, 这也就意味着Table_user表中没有记录, 要插入第一条记录时, 那么ID值应该是1

网友(4):

查找
一般是这样的
定义一个动态数组
先根据文件大小和记录大小得到记录总数,然后Redim刚才那个动态数组,然后在用For语句在动态数据里进行查询,而不用再对那个文件进行操作了,直接操作文件比较太麻烦
如果对于大容量数据,建议使用数据库系统,而不使用文件系统.