Re: [VB6 ] 請問在模組裡要怎麼呼叫一般表單裡的控 …
※ 引述《orangeterry (orangeterry)》之銘言：
: 我在表單裡用工具箱裡的元件建一個picture box(名字為Picture2)
: 現在我想在模組裡(bas檔裡)去呼叫它...可是VB卻說我沒有設定物件
: 請問要怎麼解決啊?????謝謝
: 程式碼如下
: '這是在frm檔裡
: Private Sub Form_Load()
: Picture2.Scale (0, 250)-(11, 0)
: Call picture2_scale
: End Sub
: '這是在模組檔(.bas)裡
: function Sub picture2_scale()
: Picture2.Line (3, 20)-(4, 240), &HFFC0C0
: End Sub
你的 Form 叫什麼名子? 假設是 MainForm
In .Bas :
Sub picture2_scale()
MainForm.Picture2.Line (xxxx..... )
End Sub
Function 開頭表示有傳回值
Function picture2_scale() as String '型態
MainForm.Picxxxx.xxxxx
picture2_scale = "Yes"
End Function
In MainForm:
函式呼叫的時候有 () 表示有回傳值(用 Function 宣告)
如果沒有 (), 表示沒有回傳值(用 Sub 宣告)
Function 宣告 picture2_scale() :
Dim tmp as String;
tmp = picture2_scale(參數1, 參數2,...)
Sub 宣告 picture2_scale() :
picture2_scale 參數1, 參數2,...
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 219.68.165.235
討論串 (同標題文章)
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章