Module Module1
    Public myYear As Integer
    Public myMonth As Integer
    Public selectMonth As Integer
    Public selectDate As Integer
    Public ImageNo As Integer
    Public allNo As Integer
    Public pageNo As Integer
    Public selectedImageNo As Integer
    Public beginNo As Integer
    Public lastNo As Integer
    Public begin As Integer
    Public last As Integer
    Public formNo As Integer
    Public selectTitle As String
    Public showImage As String
    Public readImage As String
    Public readTitle As String
    Public card_selectWav As String = "select.wav"
    Public nen As Integer
    Public tuki As Integer
    Public nenTukiCheck As Integer
    Public myImage As Image
    Public imageArray As ArrayList
    Public titleArray As ArrayList
End Module
