主题：怎么修改系统菜单？

最后修改菜单中的"用户管理"和"切换用户"按钮的代码，启用"用户管理"按钮的代码为：

Forms("用户管理").Open()

"切换用户"按钮的代码为：

Forms("用户登录").Open()

你可以先应用系统菜单“system.ribbon”，然后再修改。怎么修改系统菜单？我一修改就变成了用户菜单

导入系统菜单模版,基于这个模版生成的用户菜单,就和系统菜单一样的.修改它即可

导入后运行报错：Items collection cannot be modified when the DataSource property is set.

 呃，导入模板，是不会报你3楼那个错的。

 

 怎么操作报错？

 

导入后按帮助修改了两个按钮的代码

.NET Framework 版本：2.0.50727.3053
Foxtable 版本：2014.11.11.1
错误所在事件：窗口,用户登录,AfterLoad
详细错误信息：
Items collection cannot be modified when the DataSource property is set.

Dim cmd As New SQLCommand
Dim dt As DataTable
Dim cmb As WinForm.ComboBox = e.Form.Controls("UserName")
cmd.C

dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
    cmb.Items.Add(dr("Name"))
Next
cmb.SelectedIndex = 0

你要干什么,上例子吧

加一个判断

 

dt = cmd.ExecuteReader()
For Each dr As DataRow In dt.Datarows
    cmb.Items.Add(dr("Name"))
Next

If dt.DataRows.Count > 0 Then
    cmb.SelectedIndex = 0

End If