List 7-150　FormSlipDetailフォームのDisableControlプロシージャ

---

  1： Public Sub DisableControl()
  2：     ' FRAME_SLIP上のコントロールを無効にする
  3：     LABEL_ID.Caption = "---"
  4：     LABEL_CUSTOMERNAME.Caption = "---"
  5：     LABEL_DIVISION.Caption = "---"
  6：     LABEL_PERSON.Caption = "---"
  7：     LABEL_DELIVERDATE.Caption = "---"
  8：     TXT_SENTADDR.Text = "---"
  9：     TXT_MEMO.Text = "---"
 10：     LABEL_MADEUSER.Caption = "---"
 11：     LABEL_MADEDATE.Caption = "---"
 12：     BTN_NEW.Enabled = False
 13：     BTN_EDIT.Enabled = False
 14：     BTN_DELETE.Enabled = False
 15：     FRAME_NAVI.Enabled = False
 16：     FRAME_SLIP.Enabled = False
 17： End Sub