List 7-146　FormSlipDetailフォームのForm_Resizeプロシージャ

---

  1： Private Sub Form_Resize()
  2：     ' ウィンドウサイズが変更されたときの処理
  3：     On Error Resume Next
  4：     
  5：     FRAME_NAVI.Top = 0
  6：     FRAME_NAVI.Left = 0
  7：     FRAME_NAVI.Width = FormSlipDetail.ScaleWidth
  8：     
  9：     FRAME_SLIP.Top = FRAME_NAVI.Height
 10：     FRAME_SLIP.Left = 0
 11：     FRAME_SLIP.Width = FormSlipDetail.ScaleWidth
 12：     
 13：     FLXGrid_SlipDetail.Left = 0
 14：     FLXGrid_SlipDetail.Top = FRAME_SLIP.Height + FRAME_SLIP.Top
 15：     FLXGrid_SlipDetail.Height = FormSlipDetail.ScaleHeight - FLXGrid_SlipDetail.Top
 16：     FLXGrid_SlipDetail.Width = FormSlipDetail.ScaleWidth
 17： End Sub