实时错误'-2147217900(80040e14)':语法错误（逗号）在查询表达式'(上级类别编号,编号,类别名)'中。

Question

Private Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
       
       Text5.Text = TreeView1.SelectedItem.Text         '得到所选节点的text
       Text6.Text = TreeView1.SelectedItem.Key          '得到所选节点的key
       n = Len(Text6.Text)
  End SubPrivate Sub Command2_Click()
Dim rs3 As ADODB.Recordset
Set rs3 = New ADODB.Recordset
Dim str5 As String
If TreeView1.SelectedItem.Key = Text6.Text Then
'str5 = "delete  for 编号=" & Mid(Text6.Text, 2, n - 1)
str5 = "delete 上级类别编号,编号,类别名 from cs where 编号= " & Mid(Text6.Text, 2, n - 1) 
rs3.Open str5, conn, 1, 1
rs3.Close
TreeView1.Nodes.Remove TreeView1.SelectedItem.Key '删除选定节点
End If
End Sub错误如题所示，我实在是不会改了。

Answer 1

str5 = "delete * from cs where 编号= " & Mid(Text6.Text, 2, n - 1) & ""