List 7-49 FormPringingフォームのBTN_CALCEL_Clickプロシージャ
  1: Public bCancelFlag As Boolean
  2: 
  3: Private Sub BTN_CANCEL_Click()
  4:     bCancelFlag = True
  5: End Sub