Ta上传的资源 (0)

Dim Sql As String Dim RS As ADODB.Recordset Private Sub cmdFind_Click() '查找 Dim i As Integer If Trim(Me.txtData.Text) "" Then Sql = "se