VERSION 4.00 Begin VB.Form Form1 Caption = "Mgear" ClientHeight = 10440 ClientLeft = 3165 ClientTop = 510 ClientWidth = 8655 BeginProperty Font {0BE35203-8F91-11CE-9DE3-00AA004BB851} Name = "MS Sans Serif" Size = 9.75 Charset = 0 Weight = 400 Underline = 0 'False Italic = 0 'False Strikethrough = 0 'False EndProperty Height = 10950 Left = 3105 LinkTopic = "Form1" ScaleHeight = 10440 ScaleWidth = 8655 Top = 60 Width = 8775 End Attribute VB_Name = "Form1" Attribute VB_Creatable = False Attribute VB_Exposed = False Private Sub Form_Paint() Exec_Mgear End Sub