请教两个 弱弱 的问题

Question

1、 怎样才能完全卸载一个多窗口的工程？用unload只能卸载一个窗体，有时候某些窗体开着忘了卸载！用什么函数？2、从MSCOMM接收字符串到文本框里显示。现在想从这字符串里提取一个子串。收到的字符串中间有一点是这样的：  ......
  Filename = sss
  Wrote /tmp/sss (35 bytes)
  ......
其中，sss是一个文件名，35是其大小，这连个字段都是可变的,而且不知道文件名sss的长度。怎么才能把sss这个子串提取出来呢？
谢谢回帖！

Answer 1

1：有两种方法，一是可以将后打开的窗口设置为子窗口，这样当主窗口关闭的时候会自动关闭子窗口。二是可以用FORMS集合，枚举出工程中的所有窗口，把他们关闭掉。2：可以根据Filename = 这个关闭字进行查找，不知道你这个文件的的其他内容是什么，是不是INI类型的文件，如果是的话，可以到网上找一下INI的操作类，可以直接根据域名读出内容。

Answer 2

我是这样做的：
i=InStr(strinput,"Filename =")
j=InStr(strinput,"Wrote /tmp/")filename=Mid(strinput,i+11,j-i-11)可运行时，总是j=0！！！！

Answer 3

射天狼解答的第一个问题的实现方法Option ExplicitPrivate Sub Command1_Click()
   '在窗体集合中循环并卸载每个窗体。
    Dim i As Integer
    For i = 0 To Forms.Count - 1
      Unload Forms(i)
    Next i
End Sub