Protected Sub magazineCheckBox_CheckedChanged (ByVal sender As Object, ByVal e As System.EventArgs)Handles chbMmagazine.CheckedChanged
If chbMmagazine.Checked Then ReqEmail.Enabled = True reqConfirm.Enabled = True lblComent.Text = "チェック有り" Else ReqEmail.Enabled = False reqConfirm.Enabled = False lblComent.Text = "チェックなし" End If End Sub