Openbare Klasse Form1
Privé Sub (ByVal afzender als System.Object, ByVal e als System.EventArgs) Handvatten Form1_Load MyBase.Load
GroupBox1.Visible = Waar
GroupBox2.Visible = Vals
Sub van het eind
Privé Sub (ByVal afzender als System.Object, ByVal e als System.EventArgs) Handvatten RadioButtonBox1_CheckedChanged RadioButtonBox1.CheckedChanged
Als RadioButtonBox1.Checked = Waar toen
GroupBox1.Visible = Waar
GroupBox2.Visible = Vals
Anders
GroupBox1.Visible = Vals
GroupBox2.Visible = Waar
Eind als
Sub van het eind
Privé Sub (ByVal afzender als System.Object, ByVal e als System.EventArgs) Handvatten RadioButtonBox2_CheckedChanged RadioButtonBox2.CheckedChanged
Als RadioButtonBox1.Checked = Waar toen
GroupBox1.Visible = Waar
GroupBox2.Visible = Vals
Anders
GroupBox1.Visible = Vals
GroupBox2.Visible = Waar
Eind als
Sub van het eind
De Klasse van het eind
|