# 其实我真正想作的是 .......

Posted by gg on July 01, 1999 at 20:00:45:

In Reply to: Re: 参数传递的问题 !! posted by Sandy on July 01, 1999 at 16:36:38:

我真正的问题是 , MDI 有多个子表单,我希望 user 若要
操作一个已建立且存在的子表单,只显示而不需重新建立表单
,故我采取了下面的作法

Private Sub mnuFileMember_Click()
Screen.MousePointer = vbHourglass
Dim i As Integer
For i = 0 To Forms.Count - 1
If Forms(i).caption = "form1" Then
Screen.MousePointer = vbNormal
Forms(i).WindowState = vbMaximized
Forms(i).ZOrder 0
Else
form1.Show
End If
Next
因为每一个选单选项多作同样的事,故希望作成副程式
,供程式中的每个选使用.

你有更好的想法吗 ?

Follow Ups:

- Re: 其实我真正想作的是 ....... 金鱼势力 23:13:31 7/01/99 (2)
  - Re: 可否明示 ....... gg 08:28:03 7/02/99 (1)
    - 哪有那样复杂 Honey 20:04:52 7/02/99 (0)