I think this can do it:

Code:
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged
        If CheckBox1.Checked = True Then
            Label1.Font = New Font("Consolas", 20, FontStyle.Regular)
            Label2.Font = New Font("Consolas", 20, FontStyle.Regular)
            Label3.Font = New Font("Consolas", 20, FontStyle.Regular)
            Label4.Font = New Font("Consolas", 20, FontStyle.Regular)
            Label5.Font = New Font("Consolas", 20, FontStyle.Regular)
            Label6.Font = New Font("Consolas", 20, FontStyle.Regular)
            Label7.Font = New Font("Consolas", 20, FontStyle.Regular)
        Else
            Label1.Font = New Font("Consolas", 10, FontStyle.Regular)
            Label2.Font = New Font("Consolas", 10, FontStyle.Regular)
            Label3.Font = New Font("Consolas", 10, FontStyle.Regular)
            Label4.Font = New Font("Consolas", 10, FontStyle.Regular)
            Label5.Font = New Font("Consolas", 10, FontStyle.Regular)
            Label6.Font = New Font("Consolas", 10, FontStyle.Regular)
            Label7.Font = New Font("Consolas", 10, FontStyle.Regular)
        End If

    End Sub
I know it's pretty long, but I think that it is pretty good right now, because I'm dead tired! Hope it works!