Private Sub Form_Load()
Dim dlbTest As DirListBox
Set dlbTest = Me.Controls.Add("VB.DirListBox", "dlbTest")
With dlbTest
.Left = 0
.Top = 0
.Width = 4500
.Height = 4500
.Visible = True
End With
End Sub
Dim dlbTest As DirListBox
Set dlbTest = Me.Controls.Add("VB.DirListBox", "dlbTest")
With dlbTest
.Left = 0
.Top = 0
.Width = 4500
.Height = 4500
.Visible = True
End With
End Sub
解决方案 »
- 请问各位,哪有免费的spread3.0下载啊.谢谢
- 各位高手救命啊
- 眼球们都过来帮忙,寻物启事,找到者有赏!!!(老蔡说话,从无反悔)
- 自己写的vb-xml的例子,需要的跟贴(高手免进!)
- HELP!VB如何连接ORACLE数据库
- 最最基础的问题,,哪位帮在下解答一下,高分赠!
- 对HOOK api比较有研究的进------》
- 如何将一个图片加入到picturebox中后实现对其放大、缩小和移图的功能?
- vb 编程
- ### hnlzh(吸海垂虹) 来拿分,关于“怎样用纯API录音”的 II ###
- 很急!!!在VB里有没有类似DOS中的PING命令可以检测网络状况的? 行了就给分!!
- 刚面试完了,兄弟们给点建议!
能告诉我怎么删除吗。