VB代码求救,出现问题啦
数据成员我设置的数据库里已经有了啊,不知道什么回事,求解:下面的代码编译时出现错误,红的标记
Private Sub cmdAMod_Click(Index As Integer)
'Open the add/edit form. Display current record values in form if modifying.
On Error Resume Next
With frmssAE
.AddState = Index // 提示编译错误:未找到方法与数据成员
.OldID = RS.Fields(0)
If Index = 0 Then
.msdID.Text = RS.Fields(0)
.txt1.Text = RS.Fields(0)
.txt2.Text = RS.Fields(1)
.txt3.Text = RS.Fields(2)
.txt4.Text = RS.Fields(3)
End If
.Show vbModal
End With
cmdRefresh_Click
DisplayRecords
End Sub