Radio button and Checkbox samples in VB.NET

Display Button Code

Protected Sub btndisplay_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btndisplay.Click
If (RadioButton.SelectedValue.ToString() = "Display") Then
If (chkMelody.Checked = True And chkclassical.Checked = True) Then
lblres.Text = chkMelody.Text & "and" & chkclassical.Text
Else

If (chkMelody.Checked = True) Then
lblres.Text = chkMelody.Text
Else
lblres.Text = chkclassical.Text


End If

End If
Else

lblres.Text = "Wrong Selection"

End If
End Sub

Adding items to listbox from textbox


Protected Sub btnadd_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnadd.Click
If (tbitem.Text.ToString() = "") Then
Response.Write("No item to Add")
Else
listitem.Items.Add(tbitem.Text)
Response.Write("Item Added")

tbitem.Text = ""

End If

End Sub