作者redclock (红色时锺)
看板Visual_Basic
标题Re: [VB6 ] 一个问题烦请解答
时间Tue Jul 26 16:42:30 2005
※ 引述《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)