史萊姆論壇

返回   史萊姆論壇 > 專業主討論區 > 程式語言討論區
忘記密碼?
論壇說明

歡迎您來到『史萊姆論壇』 ^___^

您目前正以訪客的身份瀏覽本論壇,訪客所擁有的權限將受到限制,您可以瀏覽本論壇大部份的版區與文章,但您將無法參與任何討論或是使用私人訊息與其他會員交流。若您希望擁有完整的使用權限,請註冊成為我們的一份子,註冊的程序十分簡單、快速,而且最重要的是--註冊是完全免費的!

請點擊這裡:『註冊成為我們的一份子!』

Google 提供的廣告


發文 回覆
 
主題工具 顯示模式
舊 2006-05-08, 06:43 PM   #1
劍痞憶秋年
長老會員
 
劍痞憶秋年 的頭像
榮譽勳章
UID - 15
在線等級: 級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時
註冊日期: 2002-12-06
住址: 步雲崖
文章: 280
精華: 0
現金: 15847 金幣
資產: 20867 金幣
預設 VB6 程式碼昇級 VS.NET2005 的問題

劣者用昇級精靈昇級 一個 用 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
__________________
一切有為法 如夢幻泡影
如露亦如電 應作如是觀
劍痞憶秋年 目前離線  
送花文章: 150, 收花文章: 33 篇, 收花: 130 次
回覆時引用此帖
舊 2006-05-08, 10:25 PM   #2 (permalink)
管理版主
 
mini 的頭像
榮譽勳章
UID - 4144
在線等級: 級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時
註冊日期: 2002-12-07
文章: 13261
精華: 0
現金: 26261 金幣
資產: 3024071 金幣
預設

<<Form1.frm>>

代碼:
Option Explicit

Private Sub Form_Load()
HomeFrm.TESTMODE = 1
End Sub

您看打上
HomeFrm.
VB會不會列出 TESTMODE 成員 ?

既然 TESTMODE 宣告了是公用成員
<<MDIForm1.frm>>
代碼:
Public TESTMODE As Integer

那應該不能用(沒有)
HomeFrm.TESTMODE 這個...
mini 目前線上  
送花文章: 2001, 收花文章: 7962 篇, 收花: 26757 次
回覆時引用此帖
舊 2006-05-09, 08:28 AM   #3 (permalink)
長老會員
 
劍痞憶秋年 的頭像
榮譽勳章
UID - 15
在線等級: 級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時
註冊日期: 2002-12-06
住址: 步雲崖
文章: 280
精華: 0
現金: 15847 金幣
資產: 20867 金幣
預設

引用:
作者: mini
您看打上
HomeFrm.
VB會不會列出 TESTMODE 成員 ?...
的確不會列出(不管 VB6 OR VB.NET)
?? 這該不會也算是後期連結 ??

那請教 mini 版主,那應該要怎麼改才行?
(因為還有很多類似的)
VB NET才能 Run?(VB6 Run 是 OK 的)
==========================
另外有沒有哪裡有 所有 API FOR .NET(沒有 As ANY 型別) 的寫法
==========================
劍痞憶秋年 目前離線  
送花文章: 150, 收花文章: 33 篇, 收花: 130 次
回覆時引用此帖
舊 2006-05-09, 09:38 AM   #4 (permalink)
管理版主
 
mini 的頭像
榮譽勳章
UID - 4144
在線等級: 級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時
註冊日期: 2002-12-07
文章: 13261
精華: 0
現金: 26261 金幣
資產: 3024071 金幣
預設

因為沒有裝 .Net 所以...很多問題個人也無法回答
(如果裝 VB.NET 還是可以用 VB 6 那我馬上來裝一個,不知 劍痞憶秋年 能否幫我解答?)

VB 6 有一個 "API 檢視員" 工具
不知 .Net 有無 ??

其實個人不常碰 MDI
就您的程式看來

<<Module1.bas>>
接下來的
Sub Main()
裡是否有
Set HomeFrm = New MDIForm
這一句 ?

不知你的 MDI 是用 應用程式精靈 產生的
還是自己寫的??


試試將
Set HomeFrm = Me
註解掉
改在 Module1.bas 裡加一句
Set HomeFrm = New MDIForm
mini 目前線上  
送花文章: 2001, 收花文章: 7962 篇, 收花: 26757 次
回覆時引用此帖
舊 2006-05-09, 10:18 AM   #5 (permalink)
長老會員
 
劍痞憶秋年 的頭像
榮譽勳章
UID - 15
在線等級: 級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時
註冊日期: 2002-12-06
住址: 步雲崖
文章: 280
精華: 0
現金: 15847 金幣
資產: 20867 金幣
預設

引用:
作者: mini
因為沒有裝 .Net 所以...很多問題個人也無法回答
(如果裝 VB.NET 還是可以用 VB 6 那我馬上來裝一個,不知 劍痞憶秋年 能否幫我解答?)

VB 6 有一個 "API 檢視員" 工具
不知 .Net 有無 ??

其實個人不常碰 MDI
就您的程式...
可以的,仍可以用 VB6
目前使用上還仍未出現任何問題
劣者也是剛接觸 NET 就是!
(VB6 的 IDE + VB6的程式碼)仍可正常執行
PS:版大倒是不用為了 劣者的問題 才裝 NET

在程式集並沒有發現 API 檢視員

我是用 VB6 寫好的一個(完全手動寫的)
再用 VB.NET 昇級精靈幫我轉的
劍痞憶秋年 目前離線  
送花文章: 150, 收花文章: 33 篇, 收花: 130 次
回覆時引用此帖
舊 2006-05-09, 11:31 AM   #6 (permalink)
管理版主
 
mini 的頭像
榮譽勳章
UID - 4144
在線等級: 級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時級別:96 | 在線時長:9693小時 | 升級還需:104小時
註冊日期: 2002-12-07
文章: 13261
精華: 0
現金: 26261 金幣
資產: 3024071 金幣
預設

不會麻煩啦~
趁這個機會看看 .NET 也好
一直排斥也不好
看了
http://download.microsoft.com/downlo...hatYouKnow.ppt
的介紹也還好

不知您的問題現在如何了...?
mini 目前線上  
送花文章: 2001, 收花文章: 7962 篇, 收花: 26757 次
回覆時引用此帖
舊 2006-05-09, 03:05 PM   #7 (permalink)
長老會員
 
劍痞憶秋年 的頭像
榮譽勳章
UID - 15
在線等級: 級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時級別:31 | 在線時長:1096小時 | 升級還需:56小時
註冊日期: 2002-12-06
住址: 步雲崖
文章: 280
精華: 0
現金: 15847 金幣
資產: 20867 金幣
預設

引用:
作者: mini
<<Module1.bas>>
接下來的
Sub Main()
裡是否有
Set HomeFrm = New MDIForm
這一句 ?

不知你的 MDI 是用 應用程式精靈 產生的
還是自己寫的??


試試將
Set HomeFrm = Me
註解掉
改在 Module1.bas 裡加一句
Set HomeFrm = New MDIForm
<1>沒有 Set HomeFrm = New MDIForm
<2>自己寫的
<3>Set HomeFrm = Me 註解掉
在Module1.bas 裡加一句
Set HomeFrm = New MDIForm
==>不行啊,VB6 會出現 不正確的外部程序

暫時先處理其它問題(因為用精靈轉的,錯誤/有問題的地方,已經超過錯誤最大數目 112,)
現在感覺有點像 金凱瑞 在 王牌天神 裡面,花了很久的時間在處理問題,但問題還是絲毫不見減少!!哈哈!!!(只能先處理可以處理的,又用 很慢的電腦(CPU:K6-2 300)在 Run,感覺更吃力
劍痞憶秋年 目前離線  
送花文章: 150, 收花文章: 33 篇, 收花: 130 次
回覆時引用此帖
發文 回覆



發表規則
不可以發文
不可以回覆主題
不可以上傳附加檔案
不可以編輯您的文章

論壇啟用 BB 語法
論壇啟用 表情符號
論壇啟用 [IMG] 語法
論壇禁用 HTML 語法
Trackbacks are 禁用
Pingbacks are 禁用
Refbacks are 禁用


所有時間均為台北時間。現在的時間是 05:46 PM


Powered by vBulletin® 版本 3.6.8
版權所有 ©2000 - 2024, Jelsoft Enterprises Ltd.


SEO by vBSEO 3.6.1