作者redclock (红色时锺)
看板Visual_Basic
标题Re: [VB6 ] 一个问题烦请解答
时间Tue Jul 26 15:45:52 2005
又有问题了 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 ) 一起改掉大小
想请问要如何修正我的程式码呢??
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 203.70.54.215