用了XP风格的控件后 里面没有Default 属性 小弟我现在要用呢 该怎么处理?

用了XP风格的控件后 里面没有Default 属性 我现在要用呢 该怎么办??
用了XP风格的控件后   里面没有Default   属性   我现在要用呢   该怎么办??

------解决方案--------------------
首先你到天空软件站下载这个控件:
http://shareware.skycn.com/soft/532.htm
或它作者主页下载
http://www.vb99.com/product/acControl/register.asp


虽然这是个共享版控件,它在运行时弹出注册对话框,但你用下面的方法,可以随意使用而不弹出对话框:

像使用其他控件一样,在工程中添加这个控件到工具箱,然后将工程属性对话框中的“删除有关未使用的ActiveX控件信息”取消,写如下面的代码:

Option Explicit

Private WithEvents acButton As AnoleCommandButton.acButton

Private Sub acButton_Click()
MsgBox "This is a dynamically added button. "
End Sub

Private Sub Form_Load()
Set acButton = Controls.Add( "AnoleCommandButton.acButton ", "acButton ")
With acButton
.Visible = True
.Width = 2000
.Caption = "Hello "
.Top = 1000
.Left = 1000
'.其他需要的属性
End With
End Sub


其实这套控件中不仅是按钮,所有的控件都可以这样用,起初我以为是作者的一个漏洞,后来在帮助文档中才知道这是作者有意这样做的,目的是给一些免费软件作者或无收入软件作者留下的免费使用的方法。

我一直用这套控件,无论是资源占用还是它的功能,都是非常不错。昨天我还和它的作者聊了几句,听说最近又要升级了。