qxmc是从数据库获得的字段名,字段名+ToolStripMenuItem 为menustrip下的ToolStripMenuItem的Name,但是获yhqx是boolean值,编写如下来控制是否显示但是运行后并没有实现,求大神帮忙看下问题出在哪?
Dim uuu As String
For i = 1 To JCXX.Columns.Count - 4
qxmc(i) = JCXX.Columns(i + 3).ColumnName
yhqx(i) = JCXX.Rows(0).Item(qxmc(i))
uuu = qxmc(i) & "ToolStripMenuItem"
Dim kjmc As New Control
kjmc.Name = uuu.ToString
kjmc.Visible = yhqx(i)
Next
权限控制ToolStripMenuItem显示无效
- 写回答
- 好问题 0 提建议
- 追加酬金
- 关注问题
- 邀请回答
-
0条回答 默认 最新
悬赏问题
- ¥20 腾讯企业邮箱邮件可以恢复么
- ¥15 有人知道怎么将自己的迁移策略布到edgecloudsim上使用吗?
- ¥15 错误 LNK2001 无法解析的外部符号
- ¥50 安装pyaudiokits失败
- ¥15 计组这些题应该咋做呀
- ¥60 更换迈创SOL6M4AE卡的时候,驱动要重新装才能使用,怎么解决?
- ¥15 让node服务器有自动加载文件的功能
- ¥15 jmeter脚本回放有的是对的有的是错的
- ¥15 r语言蛋白组学相关问题
- ¥15 Python时间序列如何拟合疏系数模型