Classe publique Form1
Le sous-marin privé Form1_Load (expéditeur de ByVal comme System.Object, ByVal e comme System.EventArgs) manipule MyBase.Load
GroupBox1.Visible = rectifient
GroupBox2.Visible = faux
Sous-marin d'extrémité
Le sous-marin privé RadioButtonBox1_CheckedChanged (expéditeur de ByVal comme System.Object, ByVal e comme System.EventArgs) manipule RadioButtonBox1.CheckedChanged
Si RadioButtonBox1.Checked = rectifient alors
GroupBox1.Visible = rectifient
GroupBox2.Visible = faux
Autrement
GroupBox1.Visible = faux
GroupBox2.Visible = rectifient
Finir si
Finir le sous-marin
Le sous-marin privé RadioButtonBox2_CheckedChanged (expéditeur de ByVal comme System.Object, ByVal e comme System.EventArgs) manipule RadioButtonBox2.CheckedChanged
Si RadioButtonBox1.Checked = rectifient alors
GroupBox1.Visible = rectifient
GroupBox2.Visible = faux
Autrement
GroupBox1.Visible = faux
GroupBox2.Visible = rectifient
Finir si
Finir le sous-marin
Finir la classe
|