Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- 'I. Creer un GroupBox
- '1. Declarer la variable
- Dim myGroupBox As New GroupBox
- '2. Initializer les propriétés
- myGroupBox.Size = New Size(500, 300)
- myGroupBox.Location = New Point(10, 10)
- myGroupBox.Text = "Mon GroupBox"
- '3. Attchaer le GroupBox à ma Form (Me)
- Me.Controls.Add(myGroupBox)
- '--------------------------------------------------
- 'II. Creer un RadioButton
- '1. Declarer la variable
- Dim myRadioButton As New RadioButton
- '2. Initializer les propriétés
- myRadioButton.Location = New Point(10, 100)
- myRadioButton.AutoSize = True
- myRadioButton.Text = "Mon RadioButton"
- myRadioButton.Checked = True
- '3. Attacher le RadioButton au GroupBox
- myGroupBox.Controls.Add(myRadioButton)
- End Sub
Add Comment
Please, Sign In to add comment