MsHflexGrid删除某一行的问题-vb

发布网友 发布时间：2024-10-24 14:23

我来回答

共4个回答

热心网友 时间：2024-10-30 03:20

Private Sub sc_Click()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sql As String
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\数据库编辑器\sjkbj.mdb;Persist Security Info=False"/////数据库的链接
sql = "select * from jsqbj where son='" & mshf.TextMatrix(g, 1) & "'"
///////要删除行的记录集 g为点击时的鼠标纵轴坐标 ‘参考mshf.MouseRow
rs.Open sql, cn, 3, 2
rs.Delete
rs.Requery
Adodc1.Refresh
mshf.Refresh
End Sub

热心网友 时间：2024-10-30 03:24

SQL = "DELETE FROM 用户表 "
SQL = SQL & " WHERE 用户名 = '" & MsHflexGrid.TextMatrix(MsHflexGrid.Row, 1) & "' "
CN.Execute SQL

热心网友 时间：2024-10-30 03:26

首先要从数据库中删除数据
用：rs.excute "delete from 表 where 查询条件 "
然后 再将数据重新导入表格中

热心网友 时间：2024-10-30 03:21

是用记录集recordset打开表的吗?
rs.Delete adAffectCurrent