发信人: goldeagle()
整理人: winsy(2003-03-05 16:37:39), 站内信件
|
试试以下方法吧(VB 6.0)：
1.新建工程
2.在Form1中写如下代码：
Option Explicit
Public WithEvents cmdTest As VB.CommandButton
Private Sub Form_Load()
Controls.Add "VB.CommandButton", "cmdTest", Me
Set cmdTest = Controls("cmdTest")
cmdTest.Move 1000, 1000, 1500, 345
cmdTest.Caption = "Click Me!"
cmdTest.Visible = True
End Sub
Private Sub cmdTest_Click()
MsgBox "Button clicked!", vbInformation, "Hello"
End Sub
【 在 newdesign (勤仔) 的大作中提到: 】
: 用 Dim ffff As New Form1 可以创建一个新的From。
: 但应该如何创建一个控件呢？
: 用 'Dim aaaa As New Line1 或 Dim aaaa as New Line 都不行。
: 并且如何创建该控件的Script 。
: .......
--
行侠仗义吾本性，展翅翱翔天地间
请加入我创建的邮件列表“金鹰的程序员天地”：
(发一封空邮件到 [email protected]，
再回复一封确认信就可以了）
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.103.182.36]
|
|