关于vb语句的解释!!!急!

发布网友发布时间：2023-05-24 22:13

共4个回答

热心网友时间：2024-01-20 18:07

意思楼上已说，作用就是用VB操作数据库，当程序结束或不再进行操作的时候，关闭数据库连接，同文件操作中的 Close #1

你这段程序中使用For循环更新记录集内容，但是更新的语句是
mdbrs.Open "update......
如果没有mdbrs.Close语句，For循环第二次的时候就会造成数据库重复打开而出错，所以添加了判断语句，关闭数据库

还有一个问题，这段语句在更新每一条记录的时候都会执行一次记录集的打开、关闭，明显造成程序的臃肿，不稳定，建议重新设置update语句

热心网友时间：2024-01-20 18:08

如果状态=已打开，则：
关闭

这是说不能同时打开两个或两个以上。

热心网友时间：2024-01-20 18:08

如果 mdrs (一个recordset 变量名) 处于打开状态，那么关闭。

If gridedit1 = False Then
MsgBox "当前修改操作不被允许!", vbInformation, "非使用对象"
Exit Sub
End If

如果 grideedit1(应该是个gride控件吧) ＝false 那么弹出框，当前修改操作不被允许。

For i = 1 To Grid1.Rows - 1
    If mdbrs.State = adStateOpen Then '表状态
        mdbrs.Close
    End If
    mdbrs.Open "update 工资 set 姓名='"conn, adOpenStatic, adLockReadOnly, adCmdText
Next
MsgBox "修改的数据己经完成", vbInformation, "完成操作"
Call callmain
Exit Sub
finish:
MsgBox Err.Description
End Sub

循环grid 内所有数据
  如果mdbrs打开，关闭mdbrs (recordset关闭状态不允许再次open)
  结束if
  执行 "update 工资 set 姓名='"conn 语句（这个语句好像有问题，更新姓名为XX的人的工资。）
  结束循环
   弹出窗口“修改数据完成”
  应用 callmain 过程
退出过程

热心网友时间：2024-01-20 18:09

判断当前数据库链接情况，如果当前状态是打开的，则关闭

adStateOpen 当前状态 open
mdbrs.State 实际状态
mdbrs.Close 实际状态关闭链接