0% found this document useful (0 votes)
4 views3 pages

Visual Basic

The document outlines a Visual Basic .NET class named Form1, which includes event handlers for various controls such as TextBox and CheckBoxes. It updates a Label's text and font style based on user interactions with the CheckBoxes, allowing for color changes and font styles like bold, italic, underline, and strikeout. The design includes multiple UI elements including labels, textboxes, checkboxes, radio buttons, a combobox, and a button.

Uploaded by

jiyaahzyahh
Copyright
© All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
0% found this document useful (0 votes)
4 views3 pages

Visual Basic

The document outlines a Visual Basic .NET class named Form1, which includes event handlers for various controls such as TextBox and CheckBoxes. It updates a Label's text and font style based on user interactions with the CheckBoxes, allowing for color changes and font styles like bold, italic, underline, and strikeout. The design includes multiple UI elements including labels, textboxes, checkboxes, radio buttons, a combobox, and a button.

Uploaded by

jiyaahzyahh
Copyright
© All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd

Menu: Strip Menu (project>properties>starup form: menu)

Public Class Form1

Private Sub TextBox1_TextChanged(sender As Object, e As


EventArgs) Handles [Link]
[Link] = [Link]
End Sub

Private Sub CheckBox1_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
[Link] = [Link]
[Link] = False
[Link] = False
[Link] = False
End Sub

Private Sub CheckBox2_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
[Link] = [Link]
[Link] = False
[Link] = False
[Link] = False
End Sub

Private Sub CheckBox3_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
[Link] = [Link]
[Link] = False
[Link] = False
[Link] = False
End Sub

Private Sub CheckBox4_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
[Link] = [Link]
[Link] = False
[Link] = False
[Link] = False
End Sub

Private Sub CheckBox5_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
If [Link] Then
[Link] = New Font([Link], [Link]
Or [Link])
Else
[Link] = New Font([Link],
[Link] And Not [Link])
End If
[Link] = False
[Link] = False
[Link] = False
End Sub

Private Sub CheckBox6_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
If [Link] Then
[Link] = New Font([Link], [Link]
Or [Link])
Else
[Link] = New Font([Link],
[Link] And Not [Link])
End If
[Link] = False
[Link] = False
[Link] = False
End Sub

Private Sub CheckBox7_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
If [Link] Then
[Link] = New Font([Link], [Link]
Or [Link])
Else
[Link] = New Font([Link],
[Link] And Not [Link])
End If
[Link] = False
[Link] = False
[Link] = False
End Sub

Private Sub CheckBox8_CheckedChanged(sender As Object, e As


EventArgs) Handles [Link]
If [Link] Then
[Link] = New Font([Link], [Link]
Or [Link])
Else
[Link] = New Font([Link],
[Link] And Not [Link])
End If
[Link] = False
[Link] = False
[Link] = False
End Sub
End Class
Form1: label1, textbox1, label2, groupbox1, groupbox2, checkbox1, checkbox2,
checkbox3, checkbox4, radiobutton1, radiobutton2, radiobutton3, radiobutton4,
combobox1, button1

You might also like