このファイル: /home/web6047/www/cgi-bin/prj/20180511-svc_edit/_preview/Svc.txt
1
Option Explicit
2
3
Public line As Integer
4
Public cells As Object
5
Public children As Object
6
7
8
Private Sub Class_Initialize()
9
Set cells = CreateObject("Scripting.Dictionary")
10
Set children = CreateObject("Scripting.Dictionary")
11
End Sub