vb 怎样删除datagrid中光标所在的那条记录?

一个按扭,一个datagrid.datagrid已经连接好了数据库,怎样通过按扭删除datagrid中光标所在的那条记录?下面是我的代码,请各位帮我看看应该怎样改?Private Sub Command2_Click()Dim conn As New ADODB.ConnectionDim rs As New ADODB.RecordsetDim Str1 As StringDim Str2 As StringDim Str3 As StringDim strSQL As StringStr1 = "Provider=Microsoft.Jet.OLEDB.4.0;"Str2 = "Data Source = " & App.Path & "尀dd.mdb" & ";"Str3 = "Jet OLEDB:Database Password="conn.Open Str1 & Str2 & Str3strSQL = "select * from tt"rs.Open strSQL, conn, 3, 3rs.Deleters.Closeconn.CloseMsgBox ("删除记录成功！")Adodc1.RefreshEnd sub按照我这段代码只系删除第一条记录,但我的目的是想删除选定的那条记录,又或者是光标所在的那条记录?应该怎样写?请大家帮我看看