『壹』 vb 数据库 如何删除当前记录 给个例子最好
xx.Delete(0)'删除当前行
简单,如上所示。
『贰』 vb 删除SQL数据库中一条记录 SQL语句
delete
from
user
where
username=text1.text
最后数据库进行更新
数据库名.refreshz
这个单词应该是这么写
『叁』 VB数据库删除操作
不太清楚你的意思.
你的意思是不是不一个表中有
两个字段A和B
,当A和B的数据相同时候删除B.?
如果是这样的话用SQL语句就可以了.
Cn.Execute(update
表
set
B=''
where
A=B)
『肆』 关于vb中删除数据库记录的语句
Sql = "select * from 班级信息where 姓名='" & Trim(Text1.Text) & "'"
rsd.Open Sql, conn, adOpenStatic, adLockOptimistic
YN = MsgBox("确定删除", vbYesNo)
If YN = 6 Then
rsd.Delete
End If
rsd.Close
conn.Close
如果有多条张三的记录,只能删除第一条记录。
如果想删除查询到的多条记录,请做一个循环。
『伍』 vb 删除SQL数据库中一条记录 SQL语句 无法执行
SQLstmt = "Delete From yhgl Where 用户编号='" + Text1.Text + "'"
应该是SQLstmt = "Delete yhgl Where 用户编号='" + Text1.Text + "'"
没有from
『陆』 求助,如何用VB删除某一行记录
Private Sub Command2_Click()
Dim xlApp As New Excel.Application '定义EXCEL类
Dim xlBook As New Excel.Workbook '定义工件簿类
Dim xlsheet As New Excel.Worksheet '定义工作表类
xlApp.Visible = True '设置EXCEL可见
Set xlBook = xlApp.Workbooks.Open("d:\book1.xls")
Set xlsheet = xlBook.Worksheets(1)
For i = 1 To 9700
For j = 2 To 4
xlsheet.Rows(i).Delete 'Shift:=xlUp '删除第2行就是"2:2",删除1-3行就是"1:3"
Next
Next
End Sub
『柒』 用vb怎样删除sql server数据库中一条数据
在添加记录时rsTable.Fields(0)='"&text1.text
你的什么地方写的这个语句.如果是在上面代码中那肯定错误,因为你的rsTable的查询语句是"delete from ..."不可能有记录集填充你的rsTable也就不能用rsTable.Fields(0)
"delete from Goods where GoodsID='" & Text1.Text & "'"
"delete from Goods where GoodsID=" & Text1.Text
如楼一所写
你的错误好明显.还是补出来.
照你的那样写Text1.Text和Text2.text在语句并不能得到文本框的值,而是这两个字符串.
在你用GoodsID字段时由于是数值型要把Text1.Text(你语句给的值)转化为数值型int(后台进行)而出那样的错误."
『捌』 vb如何删除access数据库指定记录
通过SQL语句删除:
SQL 有专门的删除查询,格式为:
Delete from [表名称] where [条件]
例如删除女同学的成绩:Delete from 成绩单 where [性别]= "女"
以上是SQL的用法,如果在vb中使用,就在前面加上“DoCmd.RunSQL”就可以了。
DoCmd.RunSQL "Delete from 成绩单 where [性别]= '女' "
『玖』 VB如何删除数据库的记录
Delete * From 表名称 //这是清空表中所有数据
delete from 表名称 where 字段名称 ='" & Trim(指定的值) & "' //这是删专除一行指定的数属据
『拾』 vb 如何删除access数据库指定记录
有两种办法:
1、通过语句删除:
SQL 有专门的删除查询,格式为:
Delete from [表名称] where [条件]
例如删除女同学的成绩:Delete from 成绩单 where [性别]= "女"
以上是SQL的用法,如果在vb中使用,就在前面加上“DoCmd.RunSQL”就可以了。
DoCmd.RunSQL "Delete from 成绩单 where [性别]= '女' "
2、通过ADO实现
首先用ADO建立与数据库的链接:
Dim rs As New ADODB.Recordset
rs.open " 数据表名称", CurrentProject.Connection, , adLockOptimistic
然后遍历所有数据,删除符合条件的项目:
rs.movefirst ---------跳到第一个数据
While rs.EOF = False -------设定循环条件
if rs![条件字段] = **** then rs.Delete ---------删除符合条件的记录
rs.movenext ----------跳跃到下一条记录
wend ---------结束循环
两种方法相比,第一种方法速度更快,效率更高。