我改成这样为什么还是会提示那个错误Private Sub Cmdok_Click()
If Txtname.Text = "" Then
MsgBox "请输入姓名"
Exit Sub
End If
Adodc1.AddNew
Adodc1.Fields("姓名") = Txtname.Text
Adodc1.Update
end sub说是
编译错误:
未找到方法或数据成员
是什么错误?
If Txtname.Text = "" Then
MsgBox "请输入姓名"
Exit Sub
End If
Adodc1.AddNew
Adodc1.Fields("姓名") = Txtname.Text
Adodc1.Update
end sub说是
编译错误:
未找到方法或数据成员
是什么错误?
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货