README.md
December 5, 2022 · View on GitHub
Description
This code will show you how to easily Create Controls at runtime and Capture there events 'With-out' useing API :).
This code will show you how to add a command button and display a message box when its clicked. Please Vote and Post Comments!!
More Info
'Here are some more control Names
'"VB.Label"
'"VB.TextBox"
'"VB.ListBox"
'"VB.ComboBox"
'"VB.OptionButton"
'"VB.CheckBox"
| Submitted On | |
| By | �e7eN |
| Level | Beginner |
| User Rating | 4.3 (26 globes from 6 users) |
| Compatibility | VB 5.0, VB 6.0 |
| Category | Miscellaneous |
| World | Visual Basic |
| Archive File |
Source Code
Public WithEvents Command1 As CommandButton
Private Sub Command1_Click()
MsgBox "Button Pressed"
End Sub
Private Sub Form_Load()
Set Command1 = Me.Controls.Add("VB.CommandButton", "Command1", Me)
With Command1
.Visible = True
.Width = 900
.Height = 900
.Left = Me.Width / 2 - .Width / 2
.Top = Me.Height / 2 - .Height / 2
.Caption = "Test Button"
End With
End Sub