Attribute VB_Name = "Module1"
Public fMainForm As frmMain
Sub Main()
    Set fMainForm = New frmMain
    fMainForm.Show
    fMainForm.chuzhi.Enabled = False
    fMainForm.resetcmd.Enabled = True
    fMainForm.cmdOK.Enabled = False
    fMainForm.jieshu.Enabled = False
    fMainForm.jieshucmd.Enabled = False
    fMainForm.qujianc.Enabled = False
    fMainForm.qujiand.Enabled = False
    fMainForm.txtBC.Enabled = False
    fMainForm.txtJD.Enabled = False
    fMainForm.xishu.Enabled = False
    fMainForm.txtbxishu.Enabled = False
    fMainForm.suanfacom.Text = "四階龍格庫塔法"
End Sub