如何动态实现label控件数组,并实现动态显示(load)和释放。 为什么要load再释放?可以根据它不同时刻caption的不同,来判断执行撒~~~还是你要实现 label数组动态下移的效果???使用timer控制,来计算他们的位置就OK了 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我要实现在窗体上动态增加和减少label控件。这下大家明白了吧!:) Private Sub Command1_Click() For i = 1 To 10 Load Label1(i) With Label1(i) .Left = Label1(0).Left .Top = Label1(i - 1).Top + Label1(i - 1).Height .Visible = True End With Next iEnd Sub 首先在form上装载一个label然后复制,在粘贴,会提示你已存在,是否为数组,确认是删除label(1)然后就可以在程序中加入程序具体可以看帮助--动态加入数组 关于定义变量的初学者问题 我有个object()组,我动态的加载了其中一些( load object(i) ),我怎么判断哪些已经加载? 关于递归中的问题 VB 打包安装,怎么做才能在windows95 下运行? 怎样防止WORD文档被拷贝 我要动态装载n多个image,应该怎么做啊? 在线等待 80分--急 双系统的问题---请求支援 unload me和end有什么区别?送分 如何判断某个指定的WORD文件是否处于开启状态? 枚举网络资源! 用label实现网页的超链接那样的效果。字体变红色,并加上下划线(部分字体加上下划线). 像数据库中写入日期时出错
For i = 1 To 10
Load Label1(i)
With Label1(i)
.Left = Label1(0).Left
.Top = Label1(i - 1).Top + Label1(i - 1).Height
.Visible = True
End With
Next i
End Sub
然后复制,在粘贴,会提示你已存在,是否为数组,确认是
删除label(1)
然后就可以在程序中加入程序
具体可以看帮助--动态加入数组