VERSION 5.00
Begin VB.Form Repeat 
   BorderStyle     =   3  'Œ޲۸
   Caption         =   "JԂ"
   ClientHeight    =   1905
   ClientLeft      =   3375
   ClientTop       =   6435
   ClientWidth     =   4890
   LinkTopic       =   "Repeat"
   MaxButton       =   0   'False
   MinButton       =   0   'False
   PaletteMode     =   1  'Z ް
   ScaleHeight     =   1905
   ScaleWidth      =   4890
   ShowInTaskbar   =   0   'False
   Begin VB.CommandButton OK 
      Caption         =   "OK"
      Height          =   375
      Left            =   1560
      TabIndex        =   8
      Top             =   1440
      Width           =   1515
   End
   Begin VB.Label Label5 
      Caption         =   ""
      Height          =   300
      Left            =   2880
      TabIndex        =   9
      Top             =   1080
      Width           =   375
   End
   Begin VB.Label RepeatCount 
      Alignment       =   1  'E
      BackColor       =   &H00FFFFFF&
      BorderStyle     =   1  '
      Height          =   300
      Left            =   1680
      TabIndex        =   7
      Top             =   1020
      Width           =   1155
   End
   Begin VB.Label EndTime 
      Alignment       =   2  '
      BackColor       =   &H00FFFFFF&
      BorderStyle     =   1  '
      Height          =   300
      Left            =   2580
      TabIndex        =   6
      Top             =   480
      Width           =   1695
   End
   Begin VB.Label RepeatMaxCount 
      Alignment       =   1  'E
      BackColor       =   &H00FFFFFF&
      BorderStyle     =   1  '
      Height          =   300
      Left            =   660
      TabIndex        =   5
      Top             =   480
      Width           =   915
   End
   Begin VB.Label RepeatInterval 
      Alignment       =   1  'E
      BackColor       =   &H00FFFFFF&
      BorderStyle     =   1  '
      Height          =   300
      Left            =   120
      TabIndex        =   4
      Top             =   120
      Width           =   1155
   End
   Begin VB.Label Label4 
      Alignment       =   1  'E
      Caption         =   "s񐔂"
      Height          =   300
      Left            =   180
      TabIndex        =   3
      Top             =   1080
      Width           =   1455
   End
   Begin VB.Label Label3 
      Caption         =   "܂"
      Height          =   300
      Left            =   4320
      TabIndex        =   2
      Top             =   540
      Width           =   495
   End
   Begin VB.Label Label2 
      Caption         =   "A܂"
      Height          =   300
      Left            =   1620
      TabIndex        =   1
      Top             =   540
      Width           =   915
   End
   Begin VB.Label Label1 
      Alignment       =   2  '
      Caption         =   "bԊu"
      Height          =   300
      Left            =   1320
      TabIndex        =   0
      Top             =   180
      Width           =   795
   End
End
Attribute VB_Name = "Repeat"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
' JAPI TvvO
'   (C)NEC Corporation/NEC Software,Ltd. 1995,1996
'
'         1996.6.28 Created by NEC Software
'
' JԂ_CAOW[
'
'   FWúAJԂ\
'

'[JԂEBhE]\
'
'   FJԂ\
'
Private Sub Form_Load()
    'JԂԊu\
    RepeatInterval.Caption = JobInfo.dwRepeatInterval
    
    'JԂ񐔂\
    RepeatMaxCount.Caption = JobInfo.dwRepeatMaxCount
    
    'JԂI\
    If (JobInfo.tEnd > 0) Then
        'Ctime_t^VB̌`ɕϊ
        '[`]Common.basConverTime֐
        EndTime.Caption = ConvertTime(JobInfo.tEndTime)
    Else
        EndTime.Caption = ""
    End If
    
    'JԂs񐔂\
    RepeatCount.Caption = JobInfo.dwRepeatCount
End Sub

'[OK{^]NbN
'
'   FJԂ_CAOI
'
Private Sub OK_Click()
    '_CAO
    Unload Repeat
End Sub


