VB.NET Technology

VB.Net Projects

VB.Net Project 1

How to Add Manually CheckBox in VB.Net
Previous Home Next
adplus-dvertising

You can add a CheckBox to a form at run time in the following manner.

Code for Add mannualy CheckBox in VB.Net

Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Linq
Imports System.Text
Imports System.Windows.Forms
Public Class Form1
    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, 
	ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        If TypeOf sender Is CheckBox Then
            Dim checkbox As CheckBox = TryCast(sender, CheckBox)
            If checkbox.Checked Then
                checkbox.Text = "Checked"
                AddCheckBox()
            Else
                checkbox.Text = "UnChecked"
            End If
        End If
    End Sub
    Public Sub AddCheckBox()
        Dim chkBox As New CheckBox()
        Me.Controls.Add(chkBox)
        chkBox.Location = New Point(100, 100)
        chkBox.AutoCheck = True
        chkBox.Text = "New CheckBox"
        chkBox.Checked = True
        chkBox.CheckState = CheckState.Checked
    End Sub
End Class
Previous Home Next