13809.html

来自「VB技巧问答10000例,是一个教程」· HTML 代码 · 共 23 行

HTML
23
字号
<html>
  <head>
    <title>Re: 急救 !! 如何判断 MDI 的 child form 是否已经 active !!</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>Re: 急救 !! 如何判断 MDI 的 child form 是否已经 active !!</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by 飞云 on June 03, 1999 at 19:38:38:<p>
In Reply to: <a href="13783.html">急救 !! 如何判断 MDI 的 child form 是否已经 active !!</a> posted by gg on June 03, 1999 at 10:08:42:<p>
dim I as integer<br>        For I = 0 To Forms.Count - 1<br>            If TypeOf Forms(I) Is Frmusr Then<br>               If Forms(I).Tag = 自定的tag Then<br>                  Forms(I).Show<br>                  Forms(I).SetFocus<br>                  Forms(I).WindowState = 0<br>                  Exit Sub<br>               End If<br>            else<br>                dim J as integer<br>                redim FrmNew as Frmusr<br>                FrmNew.show<br>            End If<br>        Next I<br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 13809-->
</ul><!--end: 13809-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?