Private Sub cmdAdd_Click()
Drug_Store.rsSysUsers.AddNew '添加新纪录
cmbStatus.ListIndex = 1 '设置默认权限 -------这里出错 运行时提示无效属性值!
txtNews = "记录:" & Drug_Store.rsSysUsers.AbsolutePosition _
& "/" & Drug_Store.rsSysUsers.RecordCount
isAdding = True
cmdAdd.Enabled = False '在保存新纪录之前禁用控件
cmdDelete.Enabled = False: picNavigation.Enabled = False
End Sub各位大侠帮帮忙!
Drug_Store.rsSysUsers.AddNew '添加新纪录
cmbStatus.ListIndex = 1 '设置默认权限 -------这里出错 运行时提示无效属性值!
txtNews = "记录:" & Drug_Store.rsSysUsers.AbsolutePosition _
& "/" & Drug_Store.rsSysUsers.RecordCount
isAdding = True
cmdAdd.Enabled = False '在保存新纪录之前禁用控件
cmdDelete.Enabled = False: picNavigation.Enabled = False
End Sub各位大侠帮帮忙!
解决方案 »
- VB连access数据的问题
- 再问Timer(),个人认为有点深度
- 求急助!help!(简单代码)
- 串口通讯和进程问题,寻解决方案!
- 一个 shell() 函数问题,请高手指点。谢谢。
- 请问哪位大虾知道《VB 和 SQL Server 编程指南(第五版)》的配书光盘资料哪里有下啊?先谢谢了!
- 在VB当中如何用SendMessage来发送一个消息来关掉一个窗体呢(试了怎么都不行)
- 在VB.NET里面有没有实现对COM+“对象存储池”的支持?
- VB版Office2007风格仿Vista窗体及TAB选项卡 应用问题
- 讨厌的Bug呢,高手们看看
- 本人刚学Vb请大虾们耐心指教!谢谢!
- 请问大侠如何设置line控件的长度?
.Update呢?cmbStatus 里面有什么?
如果里面有东西,列表中的第一项是 ListIndex = 0,否则为缺省值-1