Re: [VB6 ] 一個問題煩請解答

看板Visual_Basic作者 (紅色時鍾)時間19年前 (2005/07/26 16:40), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串5/6 (看更多)
※ 引述《redclock (紅色時鍾)》之銘言: : 又有問題了 Orz : 麻煩 我的程式碼如下 : w,x,y為數字 : form1: : ================================================= : Public Sub basiclabel() : basicLabel1.Move www1, xxx1, yyy1, 400 : basicLabel2.Move www2, xxx2, yyy2, 400 : basicLabel3.Move www3, xxx3, yyy3, 400 : basicLabel4.Move www4, xxx4, yyy4, 400 : basicLabel5.Move www5, xxx5, yyy5, 400 : basicLabel6.Move www6, xxx6, yyy6, 400 : basicLabel7.Move www7, xxx7, yyy7, 400 : basicLabel8.Move www8, xxx8, yyy8, 400 : End Sub : ================================================= : 想在form2裡面call這個sub出來改label : 然後把所有的label ( basiclabel 1~8 ) 一起改掉大小 : 想請問要如何修正我的程式碼呢?? 阿~ 自己找到方法 在public sub basiclabel()的()加上basiclabel1...~8 在form2裡面宣告 Call index.basiclabel(basicLabel1, basicLabel2, basicLabel3, basicLabel4, basicLabel5, basicLabel6, basicLabel7, basicLabel8) 這樣就可以了~ XD 不過我還是有點小疑問 為什麼在()內 Daira大哥(姊?) 要我加入byref X as XXX byref是什麼意思? -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 203.70.54.215 ※ 編輯: redclock 來自: 203.70.54.215 (07/26 17:13)
文章代碼(AID): #12vVRtU4 (Visual_Basic)
文章代碼(AID): #12vVRtU4 (Visual_Basic)