Radio Button & Check Box

'Button Proses 

Dim Waktu, MataKuliah As String
        If RbPagi.Checked = True Then
            Waktu = "Pagi"
        End If
        If RbSore.Checked = True Then
            Waktu = RbSore.Text
        End If
        'enter +chr (13)+
        If CbMadas.Checked = True Then
            MataKuliah = MataKuliah & "Matematika Dasar" & ", "
        End If
        If CbKalkulus.Checked = True Then
            MataKuliah = MataKuliah & "Kalkulus" & ", "
        End If
        If CbStatistika.Checked = True Then
            MataKuliah = MataKuliah & CbStatistika.Text
        End If

        lblhasil.Text = "Waktu : " & Waktu + Chr(13) + "Mata Kuliah : " & MataKuliah
    End Sub

 'variable ada 2 =
         'lokal = Dim = untuk mendeklarasikan variavel
        'Global = public

SEMOGA BERMANFAAT

---