📄 19197.html
字号:
<html> <head> <title>Re: ~SOS~请问有谁知道功能表的物件集合是什么？</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>Re: ~SOS~请问有谁知道功能表的物件集合是什么？</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by AndyLin on September 20, 1999 at 19:17:50:<p>In Reply to: <a href="19149.html">~SOS~请问有谁知道功能表的物件集合是什么？</a> posted by 小宛 on September 20, 1999 at 00:10:07:<p>: 请问有谁知道功能表的物件集合是什么？我要做一个控制，控制表单开启时的功能表项目的显示与不显示，请问应如何做呢？可否请各位帮帮忙，先谢谢了！<br>: Menu项目：<br>: Test munTest<br>: ......Test1 mnuTest1<br>: ......Test2 mnuTest2<p>: Private Sub Command1_Click()<br>: Dim mnu As Menu<br>: For Each mnu In Form1.Controls '这里错了<br>: Debug.Print mnu.Name<br>: Next<br>: End Sub<p>: 我要的答案是<br>: mnuTest<br>: mnuTest1<br>: mnuTest2<p>你可能要加上 If TypeOf ... Is ... Then<br>来判断所取之物件型态才不会发生错误<br> <br><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 19197--><!--top: 19199--><li><a href="19199.html">AndyLin是否请您说明白些，我还是不太清楚，谢谢！</a> <b>小宛</b> <i>19:40:47 9/20/99</i>(<!--responses: 19199-->2)<ul><!--insert: 19199--><!--top: 19266--><li><a href="19266.html">Re: AndyLin是否请您说明白些，我还是不太清楚，谢谢！</a> <b>AndyLin</b> <i>20:56:42 9/23/99</i>(<!--responses: 19266-->1)<ul><!--insert: 19266--><!--top: 19413--><li><a href="19413.html">AndyLin谢谢了！我已找到解决方法</a> <b>小宛</b> <i>22:57:42 9/28/99</i>(<!--responses: 19413-->0)<ul><!--insert: 19413--></ul><!--end: 19413--></ul><!--end: 19266--></ul><!--end: 19199--></ul><!--end: 19197--><br><hr size=7 width=75%><p></body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -