如何在运行时控制控件(事先不知的)是否可用?

ybcaa 2003-03-05 06:26:49
如从某一处取得一按钮的名称“command1",此名保存在字符串变量 cmdName 中,如何使此按钮不可见或不可用?
...全文
55 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
northwolves 2003-03-05
  • 打赏
  • 举报
回复
好象只能遍历吧。
Cooly 2003-03-05
  • 打赏
  • 举报
回复
上面是对窗体及窗体中的对象进行遍历,虽然能实现你的要求,可是效率比较低.

关注好的方法.....
Cooly 2003-03-05
  • 打赏
  • 举报
回复
呵呵

dim m as object
dim f as form

on error resume next

for each f in forms
if ucase(trim(f.name))=ucase(frmName) then
for each m in f.controls
if ucase(trim(f.name)=ucase(cmdName) then
m.visible=true
'm.enabled=false
end if
next
end if
next
ybcaa 2003-03-05
  • 打赏
  • 举报
回复
对不起,我说漏了一点,就是窗体的名字也是存在字符串frmName中的。
ybcaa 2003-03-05
  • 打赏
  • 举报
回复
多谢!但如有多个控件且在不同的窗体时呢?
Cooly 2003-03-05
  • 打赏
  • 举报
回复
dim m as object
for each m in me.controls
if ucase(trim(m.name)=ucase(cmdName) then
me.visible=true
'me.enabled=false
end if
next

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧