CheckBox

And Or InputBox

En CheckBox är ungefär som en RadioButton, med den skillnaden att man kan markera flera val samtidigt utan att gruppera boxarna.

Gör en form med nedanstående innehåll.

Ändra egenskaperna för ListBox och ComboBox i Properties och sätt Visible till False. Då syns de inte när programmet startas. Meningen är att man med olika markeringar skall låta användaren välja inställning med CheckBoxarna.

I tryckknappens kod utnyttjar vi nu våra kunskaper om If – Then – Else.

If CheckBox1.Checked = True Then
   ComboBox1.Visible = True
Else
   ComboBox1.Visible = False
End If

If CheckBox2.Checked = True Then
   ListBox1.Visible = True
Else
   ListBox1.Visible = False
End If

If CheckBox3.Checked = True Then
   Me.BackColor = Color.Red
Else
   Me.BackColor = Color.Gray
End If

If CheckBox4.Checked = True Then
   Randomize()
   Label1.Text = Int(Rnd() * 100)
Else
   Label1.Text = "Inget slumptal"
End If

And Or InputBox

© SupportData.Net