劣者用昇級精靈昇級 一個 用 VB6 寫好的一套的程式碼,遇到好多問題
有沒有哪位前輩可以幫忙!
'TESTMODE' 不是 'System.Windows.Forms.Form' 的成員
VB6 程式碼如下 ==> 昇級
VB .NET 2005 卻發生上述問題
(PS:程式碼不是只有下列如此簡單而己,下列只是範例)
<<Form1.frm>>
語法:
Option Explicit
Private Sub Form_Load()
HomeFrm.TESTMODE = 1
End Sub
<<MDIForm1.frm>>
語法:
Option Explicit
Public TESTMODE As Integer
Private Sub A1_Click()
Form1.Show
End Sub
Private Sub MDIForm_Load()
Set HomeFrm = Me
End Sub
<<Module1.bas>>
語法:
Option Explicit
Public HomeFrm As MDIForm