VB Tips: Form, Window
Private Sub Form_Activate () Dim I ' Declare variable. lstForms.Clear ' Clear list box. named 'lstForms' For I = 0 To Forms.Count - 1 lstForms.AddItem Forms(I).Caption Next I End Sub
Copyright (c) 1999 - 2001, robert han, all rigths are reserved.