19199.html
来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 31 行
HTML
31 行
<html> <head> <title>AndyLin是否请您说明白些,我还是不太清楚,谢谢!</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>AndyLin是否请您说明白些,我还是不太清楚,谢谢!</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:maylu@ficnet.net">小宛</a> on September 20, 1999 at 19:40:47:<p>In Reply to: <a href="19197.html">Re: ~SOS~请问有谁知道功能表的物件集合是什么?</a> posted by AndyLin on September 20, 1999 at 19:17:50:<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>: <p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><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--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?