查看單個文章
舊 2008-11-30, 08:51 AM   #4 (permalink)
mini
管理版主
 
mini 的頭像
榮譽勳章
UID - 4144
在線等級: 級別:96 | 在線時長:9665小時 | 升級還需:132小時級別:96 | 在線時長:9665小時 | 升級還需:132小時級別:96 | 在線時長:9665小時 | 升級還需:132小時級別:96 | 在線時長:9665小時 | 升級還需:132小時級別:96 | 在線時長:9665小時 | 升級還需:132小時級別:96 | 在線時長:9665小時 | 升級還需:132小時
註冊日期: 2002-12-07
文章: 13249
精華: 0
現金: 26241 金幣
資產: 3024051 金幣
預設



引用:
作者: sob790717b 查看文章
那能不能套用到整個專案?
可以啊~
把變數 (或改成常數)
放在模組中
選告成 全域變數(或常數)

比如新增一個 GlobalTextMsg.bas
語法:
Public Const G_iavg As Long = vbCritical + vbOKOnly
Global Const G_sText = "ABCD"
語法:
Private Sub Command1_Click()

    MsgBox G_sText , G_iavg, "錯誤"
End Sub
mini 目前離線  
送花文章: 1999, 收花文章: 7957 篇, 收花: 26749 次
回覆時引用此帖
向 mini 送花的會員:
sob790717b (2008-11-30)
感謝您發表一篇好文章