Question

VB中删除listview控件中的单个数据行

我的代码：
Private Sub cmdDelete_Click()
If ListView1.SelectedItem.Selected Then
Call main
strsql = "delete from [User] where UserID='" & ListView1.SelectedItem.Text & "'"
conn.Execute strsql
conn.Close
ListView1.ListItems.Remove ListView1.SelectedItem.Index
End If
End Sub

错误提示【标准表达式中数据类型不匹配】
其中Call main是连接数据库哈~ 我在模块中定义的一个方法
求高手帮忙~
显示的错误行提示的是conn.Execute strsql
其他方法中用过call main 是正确的~

Answer 1

ListView1.SelectedItem.Text 返回的是String
请确认UserID在你的数据库中是String类型

如果UserID是Integer类型，SQL语句就要修改下：
strsql = "delete from [User] where UserID=" & ListView1.SelectedItem.Text

追问

您好 的确是这个样子 换成您修改的就好了 谢谢啦~~ 我是初学者 还麻烦您给我解释下
"delete from [User] where UserID=" & ListView1.SelectedItem.Text
SQL语句不是都应该在引号中吗？
& ListView1.SelectedItem.Text 这句话是转化数据类型吗？
谢谢您的解答~

追答

SQL语句不是都应该在引号中吗？
sql语句是字符串类型，一般赋值时会用引号引起来，因此给你的感觉是sql语句都在引号中。
实际上，ListView1.SelectedItem.Text 这个返回值就是字符串类型，可以直接赋值。
建议多看些入门的书籍，谢谢。