VB数据库添加之后怎么样才能显示刚刚添加或删除的数据

来源：百度知道编辑：UC知道时间：2024/06/27 20:22:46

比方说
Dim adduser As New ADODB.Recordset
Dim sqlstr As String
Dim userid As String
If Me.Text1.Text = "" Then
MsgBox "请输入需要创建的用户!"
End If
userid = Text1.Text
sqlstr = "select * from login where username ='" & userid & "'"
DataEn.conLK.Execute sqlstr
Set adduser = DataEn.conLK.Execute(sqlstr)
If Not adduser.BOF Then
MsgBox "该用户已经存在"
adduser.Close
Exit Sub
End If
strsql = "insert into login (username ) values (" & userid & ")"
DataEn.conLK.Execute strsql
Text1.Text = ""
MsgBox "添加成功"
中间缺少什么代码？才能使得刚刚添加的数据或者删除的数据显示
我的数据库是SQL的.谢谢大侠的指教.

新添加的你就用Text1.Text接收到的值输出显示就可以了。
比如：
userid = Text1.Text
执行"insert into login([username]) values('"&userid&"')"
MsgBox "您已成功添加了用户名为 "&userid&" 的用户"

至于删除的，那就根据你删除的条件，去select查询这条记录
然后将你要显示出来的字段取到变量中。
比如：username=rs("username")
然后执行delete,
MsgBox "您已成功删除了用户名为"& username&" 的用户."

VB数据库添加之后怎么样才能显示刚刚添加或删除的数据 VB数据库添加字段问题? 在VB中添加不了数据库 VB向数据库添加数据(有代码) vb如何添加信息到access数据库~? 怎样用VB添加数据库表，删除记录 VB 的添加数据库问题 ...急啊... VB数据库如何定时自动添加数据？ vb中怎么样才能把数据库里面的行与行，列与列进行运算怎么样才能学习VB?