1 <?xml version="1.0" encoding="Shift_JIS"?>
\r
2 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
\r
3 "http://www.w3.org/TR/html4/strict.dtd">
\r
4 <!-- saved from url=(0014)about:internet --> <!-- for too much local security warning -->
\r
5 <HTML lang="ja" xmlns:v="urn:schemas-microsoft-com:vml">
\r
8 <META http-equiv="Content-Type" content="text/html; charset=shift_jis"/>
\r
9 <TITLE>VBS
\83\81\83\82</TITLE>
\r
11 <STYLE type="text/css">
\r
12 v\:line, v\:rect, v\:fill, v\:image, v\:stroke, v\:roundrect, v\:oval, v\:shape, v\:path, v\:textpath
\r
13 { behavior: url(#default#VML); }
\r
14 A { text-decoration:none; }
\r
15 A.to_tree { color:#CCDDCC; position:absolute; margin-left:0px; font-size:8pt; }
\r
16 A.to_next_page { position:absolute; margin-left:40px; font-size:8pt; }
\r
17 A.to_prev_page { position:absolute; margin-left:58px; font-size:8pt; }
\r
18 A:visited { color:blue }
\r
19 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->
\r
20 DIV.tooltip { color:blue; }
\r
21 DIV.tooltip textarea { display:none; margin-top:-5px; overflow:hidden; }
\r
22 <!-- end of [PATCH_OF:urlrep_tooltip] -->
\r
25 <SCRIPT type="text/javascript">
\r
32 if ( !document.getElementsByTagName ) return;
\r
34 divs = document.getElementsByTagName( "A" );
\r
35 for ( i = 0; i < divs.length; i++ ) {
\r
36 if ( divs[i].className == "to_tree" ) {
\r
37 divs[i].style.color = "blue";
\r
38 divs[i].style.cursor = "hand";
\r
43 function selectTreeElem( num )
\r
45 var tree_url, i1, i2, fname, fname2
\r
47 if ( parent.frames.length == 0 ) {
\r
48 location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +
\r
49 "&f2=vbs_memo.files/vbs_memo_13.html&sub2=svgcats_vml_p" + num;
\r
52 tree_url = parent.tree.location.href;
\r
53 i1 = tree_url.lastIndexOf( "/" );
\r
54 i2 = tree_url.lastIndexOf( "\\" );
\r
55 if ( i2 > i1 ) i1 = i2;
\r
56 fname = tree_url.substring( i1 + 1 );
\r
57 i1 = fname.lastIndexOf( "#" );
\r
58 if ( i1 >= 0 ) fname = fname.substring( 0, i1 );
\r
59 fname2 = "vbs_memo.files/vbs_memo_tree.html";
\r
60 i1 = fname2.lastIndexOf( "/" );
\r
61 i2 = fname2.lastIndexOf( "\\" );
\r
62 if ( i2 > i1 ) i1 = i2;
\r
63 fname2 = fname2.substring( i1 + 1 );
\r
64 if ( fname == fname2 )
\r
65 parent.tree.selectTreeElem( "svgcats_index_p" + num );
\r
67 location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +
\r
68 "&f2=vbs_memo.files/vbs_memo_13.html&sub2=svgcats_vml_p" + num;
\r
72 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->
\r
73 function over( text, value, cols ){ text.style.display = "inline";
\r
74 text.cols=cols; text.rows=1; text.value=value; text.focus(); text.select(); }
\r
75 function out( text ){ text.style.display = "none"; }
\r
76 <!-- end of [PATCH_OF:urlrep_tooltip] -->
\r
82 <BODY bgcolor="#CCDDCC" onLoad="onLoad();">
\r
84 <DIV style="position:absolute; margin-left:0px; margin-top:8px; color:red; font-size:8pt;">
\r
85 (for Internet Explorer)</DIV>
\r
86 <v:rect style="position:absolute; margin-left:0px; margin-top:8px; width:130px; height:16px;" fillcolor="white" strokecolor="white"/>
\r
92 <A id="svgcats_vml_p189" class="to_tree" style="margin-top:-11px;" onClick="selectTreeElem( '189' );">
\81©</A>
\r
93 <A href="#svgcats_vml_p190" class="to_next_page" style="margin-top:-11px;">
\81¥</A>
\r
94 <A href="vbs_memo_12.html#svgcats_vml_p188" class="to_prev_page" style="margin-top:-11px;">
\81£</A>
\r
95 <DIV style="position:absolute; margin-left:20px; margin-top:-16px;">
\r
96 <A id="page_group_top" href="vbs_memo_12.html#page_group_bottom" style="text-decoration:none;">
\81ª</A></DIV>
\r
97 <v:rect style="position:absolute; margin-left:0px; margin-top:0px; width:579px; height:1318px;" fillcolor="white"/>
\r
98 <DIV id="text189_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:17px; line-height:15px; white-space:nowrap">
\r
99 <A name="get_ModuleConsts">
\r
100 get_ModuleConsts :
\83N
\83\89\83X
\82Ì
\92è
\90\94 (vbsool)</A></DIV>
\r
101 <DIV id="text189_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:50px; line-height:15px; white-space:nowrap">
\r
102 \92è
\90\94\82Í
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\83\81\83\93\83o
\81[
\95Ï
\90\94\82É
\8ai
\94[
\82µ
\82Ü
\82·
\81B<BR/>
\r
103 \92è
\90\94\83V
\83\93\83{
\83\8b\82ª
\81A
\83O
\83\8d\81[
\83o
\83\8b\81E
\83X
\83R
\81[
\83v
\82Ì
\83V
\83\93\83{
\83\8b\82Å
\82Í
\82È
\82
\82È
\82é
\82Ì
\82Å
\81A
\96¼
\91O
\82Ì
\8fÕ
\93Ë
\82Ì
\89Â
\94\
\90«
\82ª<BR/>
\r
104 \92á
\82
\82È
\82è
\82Ü
\82·
\81B</DIV>
\r
105 <v:rect style="position:absolute; margin-left:45px; margin-top:766px; width:448px; height:520px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
106 <DIV id="text189_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:772px; line-height:15px; white-space:nowrap">
\r
107 Class SampleClass<BR/>
\r
108 Public c<BR/>
\r
109 Private Sub Class_Initialize()<BR/>
\r
110 Set Me.c = get_SampleConst()<BR/>
\r
111 End Sub<BR/>
\r
115 '***********************************************************************<BR/>
\r
116 '* Function: get_SampleConst<BR/>
\r
117 '***********************************************************************<BR/>
\r
118 Dim g_SampleConst<BR/>
\r
120 Function get_SampleConst()<BR/>
\r
121 If IsEmpty( g_SampleConst ) Then _<BR/>
\r
122 Set g_SampleConst = new SampleConstClass<BR/>
\r
123 Set get_SampleConst = g_SampleConst<BR/>
\r
126 Class SampleConstClass<BR/>
\r
127 Public CutTag, ExistOnly<BR/>
\r
129 Private Sub Class_Initialize()<BR/>
\r
130 CutTag = 1<BR/>
\r
131 ExistOnly = 2<BR/>
\r
132 End Sub<BR/>
\r
134 Public Function ToStr( Number )<BR/>
\r
135 Select Case Number<BR/>
\r
136 Case CutTag : ToStr = "CutTag"<BR/>
\r
137 Case ExistOnly : ToStr = "ExistOnly"<BR/>
\r
138 End Select<BR/>
\r
139 End Function<BR/>
\r
141 <DIV id="text189_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:745px; line-height:15px; white-space:nowrap">
\r
142 <A name="get_ModuleConsts_Example2">
\r
143 \92è
\8b`
\97á
\81F</A></DIV>
\r
144 <DIV id="text189_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:158px; line-height:15px; white-space:nowrap">
\r
145 \8eg
\97p
\97á
\82P
\81F</DIV>
\r
146 <v:rect style="position:absolute; margin-left:45px; margin-top:181px; width:220px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
147 <DIV id="text189_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:187px; line-height:15px; white-space:nowrap">
\r
148 Set c = get_SampleConstClass()<BR/>
\r
150 copy_ex src, dst, c.CutTag</DIV>
\r
151 <DIV id="text189_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:191px; margin-top:218px; line-height:13px; white-space:nowrap">
\r
153 <DIV id="text189_8" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:125px; margin-top:188px; line-height:13px; white-space:nowrap">
\r
154 get_SampleConstClass</DIV>
\r
155 <DIV id="text189_9" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:125px; margin-top:1073px; line-height:13px; white-space:nowrap">
\r
157 <DIV id="text189_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:101px; margin-top:1118px; line-height:13px; white-space:nowrap">
\r
159 <DIV id="text189_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:264px; line-height:15px; white-space:nowrap">
\r
160 \8eg
\97p
\97á
\82Q
\81F</DIV>
\r
161 <v:rect style="position:absolute; margin-left:45px; margin-top:287px; width:310px; height:70px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
162 <DIV id="text189_12" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:293px; line-height:15px; white-space:nowrap">
\r
163 Sub main()<BR/>
\r
164 Set object = new ClassA<BR/>
\r
165 copy_ex source, destination, object.c.CutTag<BR/>
\r
167 <DIV id="text189_13" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:257px; margin-top:324px; line-height:13px; white-space:nowrap">
\r
168 object.c.CutTag</DIV>
\r
169 <DIV id="text189_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:167px; margin-top:818px; line-height:13px; white-space:nowrap">
\r
170 get_SampleConst</DIV>
\r
171 <DIV id="text189_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:66px; margin-top:120px; line-height:15px; white-space:nowrap">
\r
172 <A href="vbs_memo_07.html#name_space_contamination">
\r
173 \81¨
\96¼
\91O
\8bó
\8aÔ
\82Ì
\89\98\90õ
\82Ì
\91Î
\8dô</A></DIV>
\r
174 <DIV id="text189_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:26px; margin-top:120px; line-height:15px; white-space:nowrap">
\r
176 <DIV id="text189_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:387px; line-height:15px; white-space:nowrap">
\r
177 <A name="get_ModuleConsts_Example1">
\r
178 \92è
\8b`
\97á
\81F</A></DIV>
\r
179 <v:rect style="position:absolute; margin-left:45px; margin-top:408px; width:448px; height:295px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
180 <DIV id="text189_18" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:414px; line-height:15px; white-space:nowrap">
\r
181 '***********************************************************************<BR/>
\r
182 '* Function: get_SampleConst<BR/>
\r
183 '***********************************************************************<BR/>
\r
184 Dim g_SampleConst<BR/>
\r
186 Function get_SampleConst()<BR/>
\r
187 If IsEmpty( g_SampleConst ) Then _<BR/>
\r
188 Set g_SampleConst = new SampleConstClass<BR/>
\r
189 Set get_SampleConst = g_SampleConst<BR/>
\r
192 Class SampleConstClass<BR/>
\r
193 Public CutTag, ExistOnly<BR/>
\r
195 Private Sub Class_Initialize()<BR/>
\r
196 CutTag = 1<BR/>
\r
197 ExistOnly = 2<BR/>
\r
198 End Sub<BR/>
\r
200 <DIV id="text189_19" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:113px; margin-top:490px; line-height:13px; white-space:nowrap">
\r
201 get_SampleConst</DIV>
\r
202 <DIV id="text189_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:376px; margin-top:23px; line-height:12px; white-space:nowrap">
\r
203 \83L
\81[
\83\8f\81[
\83h
\81F</DIV>
\r
204 <DIV id="text189_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:443px; margin-top:23px; line-height:12px; white-space:nowrap">
\r
205 <A name="ConstClass">
\r
206 ConstClass</A></DIV>
\r
207 <DIV id="text189_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:104px; margin-top:387px; line-height:15px; white-space:nowrap">
\r
208 \83O
\83\8d\81[
\83o
\83\8b\95Ï
\90\94</DIV>
\r
209 <DIV id="text189_23" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:112px; margin-top:745px; line-height:15px; white-space:nowrap">
\r
210 \83\81\83\93\83o
\81[
\95Ï
\90\94\81A
\95¶
\8e\9a\97ñ
\95Ï
\8a·</DIV>
\r
211 <DIV id="text189_24" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:179px; margin-top:1178px; line-height:13px; white-space:nowrap">
\r
213 <DIV id="text189_25" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:125px; margin-top:595px; line-height:13px; white-space:nowrap">
\r
215 <DIV id="text189_26" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:101px; margin-top:640px; line-height:13px; white-space:nowrap">
\r
217 <DIV id="text189_27" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:110px; margin-top:264px; line-height:15px; white-space:nowrap">
\r
218 <A href="#get_ModuleConsts_Example2">
\r
219 \81¨
\92è
\8b`
\97á</A></DIV>
\r
220 <DIV id="text189_28" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:110px; margin-top:158px; line-height:15px; white-space:nowrap">
\r
221 <A href="#get_ModuleConsts_Example1">
\r
222 \81¨
\92è
\8b`
\97á</A></DIV>
\r
224 <v:line from="0,0" to="579,0"/>
\r
225 <v:line from="579,0" to="579,1318"/>
\r
226 <v:line from="579,1318" to="0,1318"/>
\r
227 <v:line from="0,1318" to="0,0"/>
\r
233 <A id="svgcats_vml_p190" class="to_tree" style="margin-top:1323px;" onClick="selectTreeElem( '190' );">
\81©</A>
\r
234 <A href="#svgcats_vml_p191" class="to_next_page" style="margin-top:1323px;">
\81¥</A>
\r
235 <A href="#svgcats_vml_p189" class="to_prev_page" style="margin-top:1323px;">
\81£</A>
\r
236 <v:rect style="position:absolute; margin-left:0px; margin-top:1334px; width:581px; height:702px;" fillcolor="white"/>
\r
237 <v:line style="position:absolute;" from="193,1629" to="226,1629" strokecolor="#000000" strokeweight="1pt">
\r
238 <v:stroke dashstyle="dash"/>
\r
240 <v:line style="position:absolute;" from="226,1629" to="215,1625" strokecolor="#000000" strokeweight="1pt"/>
\r
241 <v:line style="position:absolute;" from="226,1629" to="215,1633" strokecolor="#000000" strokeweight="1pt"/>
\r
242 <DIV id="text190_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:1702px; line-height:15px; white-space:nowrap">
\r
243 \91½
\82
\82Ì
\8fê
\8d\87\81A
\83N
\83\89\83X
\82É
\8f\8a\91®
\82µ
\82È
\82¢
\8aÖ
\90\94\82Ì
\92\86\82Ì
\8dÅ
\8f\89\82Å get_Object
\82µ
\82½
\8cã
\82Å
\81AValidate
\83\81\83\
\83b
\83h<BR/>
\r
244 \82ð
\8cÄ
\82Ñ
\8fo
\82µ
\82Ü
\82·
\81B Validate
\82Í
\81A
\83p
\83\89\83\81\81[
\83^
\82É
\8ew
\92è
\82µ
\82½
\8fó
\91Ô
\82É
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\82·
\82é
\83\81\83\
\83b
\83h
\82Å
\82·
\81B</DIV>
\r
245 <v:rect style="position:absolute; margin-left:56px; margin-top:1740px; width:328px; height:70px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
246 <DIV id="text190_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:64px; margin-top:1746px; line-height:15px; white-space:nowrap">
\r
247 Sub FuncA()<BR/>
\r
248 Dim m : Set m = get_ClassA() : m.Validate Empty <BR/>
\r
249 m.MethodA<BR/>
\r
251 <DIV id="text190_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:1386px; line-height:15px; white-space:nowrap">
\r
252 \89\89\8eZ
\8aí
\93I
\82È
\83I
\83u
\83W
\83F
\83N
\83g
\82Æ
\82Í
\81A
\83C
\83\93\83X
\83^
\83\93\83X
\82ð
\93Á
\92è
\82·
\82é
\95K
\97v
\82ª
\96³
\82¢
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\82±
\82Æ
\82Å
\81A<BR/>
\r
253 \90Ø
\82è
\91Ö
\82¦
\82é
\82±
\82Æ
\82Í
\82 \82Á
\82Ä
\82à
\93¯
\8e\9e\82É
\95¡
\90\94\91¶
\8dÝ
\82µ
\82È
\82
\82Ä
\82à
\96Ú
\93I
\82Ì
\8fo
\97Í
\82ª
\93¾
\82ç
\82ê
\82é
\82à
\82Ì
\82Å
\82·
\81B<BR/>
\r
254 \83\86\81[
\83U
\81[
\82Í
\89\89\8eZ
\8aí
\82Ì
\8eí
\97Þ (ClassV)
\82ð
\8ew
\92è
\82µ
\82Ü
\82·
\81B</DIV>
\r
255 <DIV id="text190_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:28px; margin-top:1881px; line-height:15px; white-space:nowrap">
\r
256 ClassV_validate
\82Å
\8eæ
\93¾
\82µ
\82½
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\96¾
\8e¦
\93I
\82É
\8dí
\8f\9c\82·
\82é
\95K
\97v
\82Í
\82 \82è
\82Ü
\82¹
\82ñ
\81B<BR/>
\r
257 \96¾
\8e¦
\93I
\82É
\8dí
\8f\9c\82ð
\8ew
\92è
\82µ
\82½
\82è
\81A
\8dí
\8f\9c\82·
\82é
\8b\96\89Â
\82ð
\82µ
\82½
\82è
\82·
\82é ClassI
\82Ì
\83\81\83\93\83o
\8aÖ
\90\94\82ð
\8dì
\82Á
\82Ä
\82à<BR/>
\r
258 \8d\
\82¢
\82Ü
\82¹
\82ñ
\82ª
\81A
\83L
\83\83\83b
\83V
\83\85\82Ì
\82æ
\82¤
\82É
\81A
\8fó
\8bµ
\82É
\89\9e\82¶
\82Ä
\8e©
\93®
\93I
\82É
\94»
\92f
\82·
\82é
\82±
\82Æ
\82ª
\8f\88\97\9d\8cø
\97¦
\82ª<BR/>
\r
259 \97Ç
\82¢
\82±
\82Æ
\82à
\82 \82è
\82Ü
\82·
\81B</DIV>
\r
260 <v:rect style="position:absolute; margin-left:56px; margin-top:1617px; width:136px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
261 <DIV id="text190_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:64px; margin-top:1624px; line-height:13px; white-space:nowrap">
\r
262 Dim g_obj as ClassI</DIV>
\r
263 <DIV id="text190_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:64px; margin-top:1649px; line-height:15px; white-space:nowrap">
\r
264 \83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X
\82ð<BR/>
\r
265 \8eQ
\8fÆ
\82·
\82é
\95Ï
\90\94</DIV>
\r
266 <v:line style="position:absolute;" from="234,1629" to="350,1629" strokecolor="#000000" strokeweight="1pt">
\r
267 <v:stroke dashstyle="dash"/>
\r
269 <v:shape style="position:absolute; margin-left:234px; margin-top:1624px; width:10px; height:10px"
\r
270 fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"
\r
271 path="m 0,500 l 1000,1000, 1000,0 x e"/>
\r
272 <A href="vbs_memo_12.html#vbsool_ClassI">
\r
273 <v:rect style="position:absolute; margin-left:345px; margin-top:1603px; width:54px; height:18px;" fillcolor="#FFFFFF" strokecolor="#C0C0C0" strokeweight="1pt">
\r
274 <v:fill opacity="0.00"/>
\r
277 <DIV id="text190_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:355px; margin-top:1605px; line-height:15px; white-space:nowrap">
\r
278 <A href="vbs_memo_12.html#vbsool_ClassI">
\r
280 <v:line style="position:absolute;" from="434,1629" to="365,1629" strokecolor="#000000" strokeweight="1pt"/>
\r
281 <v:oval style="position:absolute; margin-left:362px; margin-top:1626px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
282 <DIV id="text190_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:296px; margin-top:1641px; line-height:15px; white-space:nowrap">
\r
283 \83I
\83u
\83W
\83F
\83N
\83g
\82Ì<BR/>
\r
284 \83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X</DIV>
\r
285 <DIV id="text190_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:406px; margin-top:1648px; line-height:15px; white-space:nowrap">
\r
286 \83I
\83u
\83W
\83F
\83N
\83g
\81i
\83A
\83g
\83\80\81j</DIV>
\r
287 <A href="vbs_memo_12.html#vbsool_ClassA">
\r
288 <v:rect style="position:absolute; margin-left:423px; margin-top:1616px; width:55px; height:26px;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>
\r
290 <DIV id="text190_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:431px; margin-top:1622px; line-height:15px; white-space:nowrap">
\r
291 <A href="vbs_memo_12.html#vbsool_ClassA">
\r
293 <DIV id="text190_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#FF0000; margin-left:237px; margin-top:1605px; line-height:15px; white-space:nowrap">
\r
294 get_Object
\8aÖ
\90\94</DIV>
\r
295 <DIV id="text190_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:1541px; line-height:15px; white-space:nowrap">
\r
296 \83I
\83u
\83W
\83F
\83N
\83g
\82ð
\91\80\8dì
\82·
\82é
\83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X(ClassI
\81j
\82Í
\81A
\89\89\8eZ
\8aí
\82Ì
\8eí
\97Þ(ClassV)
\82Æ
\88Ù
\82È
\82é
\82±
\82Æ
\82ª<BR/>
\r
297 \82 \82è
\82Ü
\82·
\81B
\82³
\82ç
\82É ClassV
\82Í
\81A
\83C
\83\93\83X
\83^
\83\93\83X
\82Ì
\83N
\83\89\83X(ClassA)
\82Æ
\88Ù
\82È
\82é
\82±
\82Æ
\82à
\82 \82è
\82Ü
\82·
\81B<BR/>
\r
298 \82½
\82Æ
\82¦
\82Î
\81AClassI =
\83R
\83\93\83p
\83C
\83\89\81AClassV = C
\8c¾
\8cê
\83R
\83\93\83p
\83C
\83\89\81AClassA = A
\8eÐ
\90»
\83R
\83\93\83p
\83C
\83\89ver2
\81B</DIV>
\r
299 <DIV id="text190_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:1447px; line-height:15px; white-space:nowrap">
\r
300 \8fó
\8bµ
\82â
\90Ý
\92è
\82É
\89\9e\82¶
\82Ä
\81A
\93K
\90Ø
\82È ClassA
\82Ì
\83C
\83\93\83X
\83^
\83\93\83X
\82ª
\95Ô
\82è
\82Ü
\82·
\81B
\93à
\95\94\82Å
\81A
\83C
\83\93\83X
\83^
\83\93\83X
\82ª<BR/>
\r
301 \90¶
\90¬
\82³
\82ê
\82é
\82©
\82à
\82µ
\82ê
\82È
\82¢
\82µ
\81A
\88ø
\90\94\82ð
\82»
\82Ì
\82Ü
\82Ü
\88Û
\8e\9d\82·
\82é
\82¾
\82¯
\82©
\82à
\82µ
\82ê
\82Ü
\82¹
\82ñ
\81B
\8aî
\96{
\93I
\82É<BR/>
\r
302 \83C
\83\93\83X
\83^
\83\93\83X
\82Í
\82P
\82Â
\81i
\83V
\83\93\83O
\83\8c\83g
\83\93\81j
\82Å
\82·
\82ª
\81A
\83}
\83\8b\83`
\83R
\83A
\82ð
\90¶
\82©
\82µ
\82½
\82è
\81A
\83}
\83\8b\83`
\83X
\83\8c\83b
\83h
\82Å
\83\8c\83C
\83e<BR/>
\r
303 \83\93\83V
\82ð
\92Z
\82
\82·
\82é
\82½
\82ß
\82É
\81AOpt
\88ø
\90\94\82É
\81A
\90V
\8bK
\83C
\83\93\83X
\83^
\83\93\83X
\82ð
\8ew
\92è
\82·
\82é
\82±
\82Æ
\82ª
\82 \82é
\82©
\82à
\82µ
\82ê
\82Ü
\82¹
\82ñ
\81B<BR/>
\r
304 \81iVBScript
\82Í
\81A
\8aî
\96{
\93I
\82É
\83V
\83\93\83O
\83\8b\83X
\83\8c\83b
\83h
\82Å
\82·
\82ª
\81j</DIV>
\r
305 <DIV id="text190_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:13px; margin-top:1850px; line-height:15px; white-space:nowrap">
\r
306 \89\89\8eZ
\8aí
\93I
\82È
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\83\89\83C
\83t
\83T
\83C
\83N
\83\8b</DIV>
\r
307 <DIV id="text190_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:1972px; line-height:15px; white-space:nowrap">
\r
308 <A href="..\vbslib.files\vbslib_52.html#g_test_data">
\r
309 \81¨
\83O
\83\8d\81[
\83o
\83\8b\81E
\83e
\83X
\83g
\81E
\83I
\83u
\83W
\83F
\83N
\83g, SampleTest</A></DIV>
\r
310 <DIV id="text190_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:20px; margin-top:1353px; line-height:15px; white-space:nowrap">
\r
312 \83\89\83C
\83u
\83\89\83\8a\81E
\83I
\83u
\83W
\83F
\83N
\83g
\81A
\89\89\8eZ
\8aí
\93I
\82È
\83I
\83u
\83W
\83F
\83N
\83g</A></DIV>
\r
313 <DIV id="text190_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:12px; margin-top:1972px; line-height:15px; white-space:nowrap">
\r
315 <DIV id="text190_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:352px; margin-top:1354px; line-height:12px; white-space:nowrap">
\r
316 <A href="vbs_memo_12.html#vbsool">
\r
317 [
\90e: vbsool :
\83I
\83u
\83W
\83F
\83N
\83g
\8bL
\8fq
\96@ ]</A></DIV>
\r
318 <DIV id="text190_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:1992px; line-height:15px; white-space:nowrap">
\r
319 <A href="..\vbslib.files\vbslib_60.html#var">
\r
320 \81¨
\83o
\81[
\83W
\83\87\83\93\94»
\92è
\81A
\8aÂ
\8b«
\95Ï
\90\94</A></DIV>
\r
322 <v:line from="0,1334" to="581,1334"/>
\r
323 <v:line from="581,1334" to="581,2036"/>
\r
324 <v:line from="581,2036" to="0,2036"/>
\r
325 <v:line from="0,2036" to="0,1334"/>
\r
331 <A id="svgcats_vml_p191" class="to_tree" style="margin-top:2041px;" onClick="selectTreeElem( '191' );">
\81©</A>
\r
332 <A href="#svgcats_vml_p192" class="to_next_page" style="margin-top:2041px;">
\81¥</A>
\r
333 <A href="#svgcats_vml_p190" class="to_prev_page" style="margin-top:2041px;">
\81£</A>
\r
334 <v:rect style="position:absolute; margin-left:0px; margin-top:2052px; width:516px; height:1095px;" fillcolor="white"/>
\r
335 <DIV id="text191_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:2069px; line-height:15px; white-space:nowrap">
\r
336 <A name="get_ObjectVer">
\r
337 \83o
\81[
\83W
\83\87\83\93\82ð
\95\
\82·
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g</A></DIV>
\r
338 <DIV id="text191_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:2103px; line-height:15px; white-space:nowrap">
\r
339 \83v
\83\8d\83O
\83\89\83\80\82ª
\8eg
\97p
\82·
\82é
\8aO
\95\94\83v
\83\8d\83O
\83\89\83\80\82Ì
\83o
\81[
\83W
\83\87\83\93\82ª
\88Ù
\82È
\82é
\82Æ
\81A
\8eg
\97p
\82·
\82é<BR/>
\r
340 \83f
\81[
\83^
\82ª
\94÷
\96
\82É
\88Ù
\82È
\82Á
\82½
\82è
\82µ
\82Ü
\82·
\81B
\82½
\82Æ
\82¦
\82Î
\81AVisual Studio
\82Ì
\83v
\83\8d\83W
\83F
\83N
\83g
\81E<BR/>
\r
341 \83t
\83@
\83C
\83\8b\82ð
\8fo
\97Í
\82·
\82é
\83v
\83\8d\83O
\83\89\83\80\82Í
\81AVisual Studio
\82Ì
\83o
\81[
\83W
\83\87\83\93\82É
\82æ
\82Á
\82Ä
\81A<BR/>
\r
342 \8fo
\97Í
\82·
\82é
\83t
\83@
\83C
\83\8b\82Ì
\8ag
\92£
\8eq
\82ª
\95Ï
\82í
\82è
\82Ü
\82·
\81B<BR/>
\r
344 \83v
\83\8d\83W
\83F
\83N
\83g
\81E
\83t
\83@
\83C
\83\8b\82ð
\8fo
\97Í
\82·
\82é
\8aÖ
\90\94\82ð
\83v
\83\8d\83O
\83\89\83~
\83\93\83O
\82·
\82é
\82Æ
\82«
\82Í
\81A<BR/>
\r
345 \83o
\81[
\83W
\83\87\83\93\82ð
\94»
\92è
\82µ
\82Ä
\81A
\8fo
\97Í
\93à
\97e
\82ð
\95Ï
\82¦
\82é
\82Æ
\82¢
\82¤
\82Ì
\82ª
\88ê
\94Ê
\93I
\82Å
\82·
\82ª
\81A<BR/>
\r
346 \8bK
\96Í
\82ª
\91å
\82«
\82
\82È
\82é
\82Æ
\81A
\93¯
\82¶
\8fð
\8c\8f\95ª
\8aò
\82Ì
\83R
\83s
\81[
\82ª
\82½
\82
\82³
\82ñ
\8bL
\8fq
\82³
\82ê
\82é
\82±
\82Æ<BR/>
\r
347 \82É
\82È
\82è
\81A
\83\81\83\93\83e
\83i
\83\93\83X
\90«
\82ª
\92á
\82
\82È
\82è
\82Ü
\82·
\81B<BR/>
\r
349 \82½
\82Æ
\82¦
\82Î
\81A
\83v
\83\8d\83W
\83F
\83N
\83g
\81E
\83t
\83@
\83C
\83\8b\82Ì
\8ag
\92£
\8eq
\82ª
\95Ï
\82í
\82é
\82Æ
\81A
\83t
\83@
\83C
\83\8b\82ð
\8dì
\90¬
\82·
\82é<BR/>
\r
350 \83R
\81[
\83h
\82Æ
\81A
\8eg
\97p
\82·
\82é
\83v
\83\8d\83W
\83F
\83N
\83g
\81E
\83t
\83@
\83C
\83\8b\82ð
\83\
\83\8a\83\85\81[
\83V
\83\87\83\93\81E
\83t
\83@
\83C
\83\8b\93à
\82É<BR/>
\r
351 \8bL
\8fq
\82·
\82é
\83R
\81[
\83h
\82Ì
\82Q
\89Ó
\8f\8a\82É
\81A
\83o
\81[
\83W
\83\87\83\93\82ð
\94»
\92è
\82·
\82é
\83R
\81[
\83h
\82ª
\8bL
\8fq
\82³
\82ê
\82Ü
\82·
\81B<BR/>
\r
352 \82±
\82Ì
\8fó
\91Ô
\82Å
\81A
\8f«
\97\88\81A
\83o
\81[
\83W
\83\87\83\93\82Æ
\8ag
\92£
\8eq
\82Ì
\8aÖ
\8cW
\82ª
\95Ï
\82í
\82Á
\82½
\82ç
\81A
\82Q
\89Ó
\8f\8a\82Ì
\8fC
\90³
\82ª<BR/>
\r
353 \95K
\97v
\82È
\82Ì
\82É
\81A
\82P
\89Ó
\8f\8a\82¾
\82¯
\8fC
\90³
\82µ
\82Ä
\8a®
\97¹
\82Æ
\82µ
\82Ä
\82µ
\82Ü
\82¤
\83\8a\83X
\83N
\82ª
\82 \82é
\82Ì
\82Å
\82·
\81B</DIV>
\r
354 <v:rect style="position:absolute; margin-left:54px; margin-top:2670px; width:430px; height:445px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
355 <DIV id="text191_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:62px; margin-top:2676px; line-height:15px; white-space:nowrap">
\r
356 Dim o : Set o = new MakeVS<BR/>
\r
357 o.SetMakeProjContext MakeProjContext, get_MakeVSProjType( TypeName )<BR/>
\r
360 Class
\81@MakeVSProjType<BR/>
\r
361 \81@Public
\81@VSVer
\81@
\81@
\81@
\81@
\81@
\81@ '// as integer<BR/>
\r
362 \81@Public
\81@TargetPlatform
\81@
\81@'// as string<BR/>
\r
363 \81@Public
\81@ProjectExtension
\81@'// as string<BR/>
\r
366 Function
\81@get_MakeVSProjType( TypeName )<BR/>
\r
367 \81@Dim
\81@ret, items<BR/>
\r
368 \81@Select Case
\81@TypeName
\81@
\81@
\81@
\81@
\81@
\81@
\81@
\81@'// VSVer, TargetPlatform<BR/>
\r
369 \81@
\81@Case
\81@"VS2010Win32"
\81@
\81@: items = Array( 2010, "Win32" )<BR/>
\r
370 \81@
\81@Case
\81@"VS2008Win32"
\81@
\81@: items = Array( 2008, "Win32" )<BR/>
\r
371 \81@
\81@Case
\81@"VS2010Win32Lib" : items = Array( 2010, "Lib" )<BR/>
\r
372 \81@
\81@Case
\81@"VS2008Win32Lib" : items = Array( 2008, "Lib" )<BR/>
\r
373 \81@
\81@Case Else
\81@Error<BR/>
\r
374 \81@End Select<BR/>
\r
376 \81@Set ret = new MakeVSProjType<BR/>
\r
377 \81@ret.VSVer
\81@
\81@
\81@
\81@
\81@= items( 0 )<BR/>
\r
378 \81@ret.TargetPlatform = items( 1 )<BR/>
\r
379 \81@If ret.VSVer = 2010 Then<BR/>
\r
380 \81@
\81@ret.ProjectExtension = ".vcxproj"<BR/>
\r
382 \81@
\81@ret.ProjectExtension = ".vcproj"<BR/>
\r
385 <DIV id="text191_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:2456px; line-height:15px; white-space:nowrap">
\r
386 \82±
\82ê
\82ð
\94ð
\82¯
\82é
\82É
\82Í
\81A
\83v
\83\8d\83W
\83F
\83N
\83g
\81E
\83t
\83@
\83C
\83\8b\82Ì
\8ag
\92£
\8eq
\82ð
\95Ï
\90\94\82É
\82·
\82é
\82±
\82Æ
\82Å
\82·
\81B<BR/>
\r
387 \82±
\82Ì
\8fó
\91Ô
\82Å
\81A
\83o
\81[
\83W
\83\87\83\93\82Æ
\8ag
\92£
\8eq
\82Ì
\8aÖ
\8cW
\82ª
\95Ï
\82í
\82Á
\82½
\82ç
\81A
\95Ï
\90\94\82Ì
\92l
\82ð
\91ã
\93ü
\82·
\82é<BR/>
\r
388 \89Ó
\8f\8a\82¾
\82¯
\82ð
\95Ï
\82¦
\82é
\82¾
\82¯
\82Å
\8dÏ
\82Ý
\82Ü
\82·
\81B<BR/>
\r
390 \82±
\82Ì
\82æ
\82¤
\82È
\88á
\82¢
\82ð
\8fW
\82ß
\82½
\83I
\83u
\83W
\83F
\83N
\83g
\82Í
\81AVisual Studio
\82Ì
\83o
\81[
\83W
\83\87\83\93\82É
\82æ
\82Á
\82Ä<BR/>
\r
391 \88Ù
\82È
\82é
\82à
\82Ì
\82Å
\82 \82é
\82½
\82ß
\81A
\83o
\81[
\83W
\83\87\83\93\82²
\82Æ
\82É
\91¶
\8dÝ
\82·
\82é
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\81i
\83R
\83\93\83p<BR/>
\r
392 \83C
\83\8b\8e\9e\82É
\92l
\82ª
\8c\88\92è
\82·
\82é static
\82È
\8d\
\91¢
\91Ì
\81j
\82É
\82È
\82è
\82Ü
\82·
\81B<BR/>
\r
394 \82»
\82µ
\82Ä
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\8aÖ
\90\94\82ð
\92è
\8b`
\82·
\82é
\82Æ
\82æ
\82¢
\82Å
\82µ
\82å
\82¤
\81B
\82»
\82Ì<BR/>
\r
395 \92è
\8b`
\82Í
\81A
\89º
\8bL
\82Ì
\82æ
\82¤
\82É
\83e
\81[
\83u
\83\8b\82Å
\8bL
\8fq
\82·
\82é
\82Æ
\82æ
\82¢
\82Å
\82µ
\82å
\82¤
\81B
\82Ü
\82½
\81A
\91\8a\8aÖ
\8aÖ
\8cW
\82ª<BR/>
\r
396 \82 \82é
\8fê
\8d\87\82Í
\81A
\89º
\8bL
\82Ì ProjectExtension
\95Ï
\90\94\82Ì
\82æ
\82¤
\82É
\8fð
\8c\8f\95ª
\8aò
\82ª
\8eg
\82¦
\82Ü
\82·
\81B<BR/>
\r
397 \82±
\82Ì
\8fð
\8c\8f\95ª
\8aò
\82Í
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\8aÖ
\90\94\82Ì
\92\86\82É
\82Ü
\82Æ
\82ß
\82ç
\82ê
\82é
\82½
\82ß
\81A<BR/>
\r
398 \83\81\83\93\83e
\83i
\83\93\83X
\90«
\82ª
\8d\82\82
\82È
\82è
\82Ü
\82·
\81B</DIV>
\r
399 <v:rect style="position:absolute; margin-left:53px; margin-top:2348px; width:412px; height:40px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
400 <DIV id="text191_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:61px; margin-top:2354px; line-height:15px; white-space:nowrap">
\r
401 \81@If VSVer <= 2008 Then f.Open ".vcproj" Else f.Open ".vcxproj"<BR/>
\r
403 <v:rect style="position:absolute; margin-left:53px; margin-top:2397px; width:424px; height:40px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
404 <DIV id="text191_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:61px; margin-top:2403px; line-height:15px; white-space:nowrap">
\r
405 \81@f.Open ".sln"<BR/>
\r
406 \81@If VSVer <= 2008 Then f.Write ".vcproj" Else f.Write ".vcxproj"</DIV>
\r
408 <v:line from="0,2052" to="516,2052"/>
\r
409 <v:line from="516,2052" to="516,3147"/>
\r
410 <v:line from="516,3147" to="0,3147"/>
\r
411 <v:line from="0,3147" to="0,2052"/>
\r
417 <A id="svgcats_vml_p192" class="to_tree" style="margin-top:3152px;" onClick="selectTreeElem( '192' );">
\81©</A>
\r
418 <A href="#svgcats_vml_p193" class="to_next_page" style="margin-top:3152px;">
\81¥</A>
\r
419 <A href="#svgcats_vml_p191" class="to_prev_page" style="margin-top:3152px;">
\81£</A>
\r
420 <v:rect style="position:absolute; margin-left:0px; margin-top:3163px; width:692px; height:281px;" fillcolor="white"/>
\r
421 <DIV id="text192_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:3180px; line-height:15px; white-space:nowrap">
\r
422 <A name="DerivedAttribute">
\r
423 \94h
\90¶
\91®
\90«
\83v
\83\8d\83p
\83e
\83B
\83L
\83\83\83b
\83V
\83\85</A></DIV>
\r
424 <v:rect style="position:absolute; margin-left:33px; margin-top:3248px; width:580px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
425 <DIV id="text192_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:41px; margin-top:3254px; line-height:15px; white-space:nowrap">
\r
426 '// Derived property<BR/>
\r
427 Private m_DerivedAttribute<BR/>
\r
429 Public Property Get DerivedAttribute()<BR/>
\r
430 If IsEmpty( m_DerivedAttribute ) Then m_DerivedAttribute = "Derived "+ Me.AnAttribute<BR/>
\r
431 DerivedAttribute = m_DerivedAttribute<BR/>
\r
432 End Property</DIV>
\r
433 <DIV id="text192_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:368px; margin-top:3180px; line-height:15px; white-space:nowrap">
\r
434 read only attribute</DIV>
\r
435 <DIV id="text192_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:255px; margin-top:3180px; line-height:15px; white-space:nowrap">
\r
436 <A name="DerivedAttribute_en">
\r
437 derived attribute</A></DIV>
\r
438 <DIV id="text192_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:131px; margin-top:3270px; line-height:13px; white-space:nowrap">
\r
439 DerivedAttribute</DIV>
\r
440 <DIV id="text192_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:3215px; line-height:15px; white-space:nowrap">
\r
441 \94h
\90¶
\91®
\90«
\82Ì
\83L
\83\83\83b
\83V
\83\85\82ð
\8e\9d\82Â
\82Æ
\82«
\82Í
\81A
\89º
\8bL
\82Ì
\82æ
\82¤
\82É
\83R
\81[
\83f
\83B
\83\93\83O
\82µ
\82Ü
\82·
\81B</DIV>
\r
442 <DIV id="text192_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:89px; margin-top:3330px; line-height:13px; white-space:nowrap">
\r
443 DerivedAttribute</DIV>
\r
444 <DIV id="text192_8" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:335px; margin-top:3315px; line-height:13px; white-space:nowrap">
\r
445 DerivedAttribute</DIV>
\r
446 <DIV id="text192_9" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:173px; margin-top:3315px; line-height:13px; white-space:nowrap">
\r
447 DerivedAttribute</DIV>
\r
448 <DIV id="text192_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:197px; margin-top:3300px; line-height:13px; white-space:nowrap">
\r
449 DerivedAttribute</DIV>
\r
450 <DIV id="text192_11" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:215px; margin-top:3330px; line-height:13px; white-space:nowrap">
\r
451 DerivedAttribute</DIV>
\r
452 <DIV id="text192_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:500px; margin-top:3182px; line-height:12px; white-space:nowrap">
\r
453 <A href="vbs_memo_12.html#vbsool">
\r
454 [
\90e: vbsool :
\83I
\83u
\83W
\83F
\83N
\83g
\8bL
\8fq
\96@ ]</A></DIV>
\r
455 <DIV id="text192_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:3381px; line-height:15px; white-space:nowrap">
\r
456 m_
\82©
\82ç
\8en
\82Ü
\82é
\83v
\83\89\83C
\83x
\81[
\83g
\83v
\83\8d\83p
\83e
\83B
\82Í
\81A
\91¼
\82Ì
\94h
\90¶
\91®
\90«
\82Æ
\95À
\82×
\82é
\82Æ
\88ê
\97\97\90«
\82ª
\8d\82\82
\82Ä
\82æ
\82¢
\82Å
\82µ
\82å
\82¤
\81B<BR/>
\r
457 \95¡
\90\94\82Ì
\94h
\90¶
\91®
\90«
\82ð
\93¯
\8e\9e\82É
\83L
\83\83\83b
\83V
\83\85\82É
\8dÚ
\82¹
\82¢
\82½
\95û
\82ª
\81A
\8f\88\97\9d\91¬
\93x
\82Í
\91¬
\82¢
\82Å
\82µ
\82å
\82¤
\81B</DIV>
\r
459 <v:line from="0,3163" to="692,3163"/>
\r
460 <v:line from="692,3163" to="692,3444"/>
\r
461 <v:line from="692,3444" to="0,3444"/>
\r
462 <v:line from="0,3444" to="0,3163"/>
\r
468 <A id="svgcats_vml_p193" class="to_tree" style="margin-top:3449px;" onClick="selectTreeElem( '193' );">
\81©</A>
\r
469 <A href="#svgcats_vml_p194" class="to_next_page" style="margin-top:3449px;">
\81¥</A>
\r
470 <A href="#svgcats_vml_p192" class="to_prev_page" style="margin-top:3449px;">
\81£</A>
\r
471 <v:rect style="position:absolute; margin-left:0px; margin-top:3460px; width:544px; height:502px;" fillcolor="white"/>
\r
472 <DIV id="text193_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:33px; margin-top:3896px; line-height:15px; white-space:nowrap">
\r
474 <DIV id="text193_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:77px; margin-top:3896px; line-height:15px; white-space:nowrap">
\r
475 <A href="http://itpro.nikkeibp.co.jp/article/COLUMN/20051202/225609/" target="_blank">
\r
476 \81¨ Factory Method
\83p
\83^
\81[
\83\93\81^Abstract Factory
\83p
\83^
\81[
\83\93 (Web)</A></DIV>
\r
477 <DIV id="text193_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:308px; margin-top:3480px; line-height:12px; white-space:nowrap">
\r
478 <A href="vbs_memo_12.html#vbsool">
\r
479 [
\90e: vbsool :
\83I
\83u
\83W
\83F
\83N
\83g
\8bL
\8fq
\96@ ]</A></DIV>
\r
480 <DIV id="text193_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:3710px; line-height:15px; white-space:nowrap">
\r
481 <A href="#ListOfName">
\r
482 \81¨
\96¼
\91O
\82Ì
\88ê
\97\97</A></DIV>
\r
483 <DIV id="text193_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:3668px; line-height:15px; white-space:nowrap">
\r
485 \81¨
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì Name
\82Æ TrueName</A></DIV>
\r
486 <DIV id="text193_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:3478px; line-height:15px; white-space:nowrap">
\r
488 Name
\83v
\83\8d\83p
\83e
\83B :
\96¼
\91O
\8eQ
\8fÆ (vbsool)</A></DIV>
\r
489 <DIV id="text193_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:3810px; line-height:15px; white-space:nowrap">
\r
490 \81¨ T_NameDelegator
\83t
\83H
\83\8b\83_</DIV>
\r
491 <DIV id="text193_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:29px; margin-top:3761px; line-height:15px; white-space:nowrap">
\r
492 \83T
\83\93\83v
\83\8b\83t
\83@
\83C
\83\8b</DIV>
\r
493 <DIV id="text193_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:3829px; line-height:15px; white-space:nowrap">
\r
494 \81¨ T_NameList
\83t
\83H
\83\8b\83_</DIV>
\r
495 <DIV id="text193_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:3689px; line-height:15px; white-space:nowrap">
\r
496 <A href="#NameDelegate">
\r
497 \81¨ Name
\82Æ TrueName
\82ª
\91½
\91Î
\82P
\82Ì
\8fê
\8d\87</A></DIV>
\r
498 <DIV id="text193_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:3791px; line-height:15px; white-space:nowrap">
\r
499 \81¨ T_Name
\83t
\83H
\83\8b\83_</DIV>
\r
500 <DIV id="text193_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:243px; margin-top:3791px; line-height:15px; white-space:nowrap">
\r
501 Name
\82Æ TrueName
\82ª
\81A
\82P
\91Î
\91½
\82Ì
\8fê
\8d\87</DIV>
\r
502 <DIV id="text193_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:243px; margin-top:3810px; line-height:15px; white-space:nowrap">
\r
503 Name
\82Æ TrueName
\82ª
\81A
\91½
\91Î
\82P
\82Ì
\8fê
\8d\87</DIV>
\r
504 <DIV id="text193_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:243px; margin-top:3829px; line-height:15px; white-space:nowrap">
\r
505 Name
\82Æ TrueName
\82ª
\81A
\91½
\91Î
\82P
\82Ì
\8fê
\8d\87\82Ì
\88ê
\97\97</DIV>
\r
506 <v:rect style="position:absolute; margin-left:29px; margin-top:3509px; width:196px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
507 <DIV id="text193_15" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:3516px; line-height:13px; white-space:nowrap">
\r
508 Property Get Name() as string</DIV>
\r
509 <DIV id="text193_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:3859px; line-height:15px; white-space:nowrap">
\r
510 \81¨ vbslib
\82ð
\8eg
\82¤ vbsool
\83T
\83\93\83v
\83\8b</DIV>
\r
511 <DIV id="text193_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:3584px; line-height:15px; white-space:nowrap">
\r
512 \83C
\83\93\83X
\83^
\83\93\83X
\82Ì
\96¼
\91O
\82Å
\82·
\81B
\83N
\83\89\83X
\96¼
\82Æ
\93¯
\82¶
\82É
\82È
\82é
\82±
\82Æ
\82à
\82 \82è
\82Ü
\82·
\81B</DIV>
\r
513 <v:rect style="position:absolute; margin-left:29px; margin-top:3543px; width:220px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
514 <DIV id="text193_18" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:3550px; line-height:13px; white-space:nowrap">
\r
515 Property Get TrueName() as string</DIV>
\r
516 <DIV id="text193_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:32px; margin-top:3603px; line-height:15px; white-space:nowrap">
\r
517 <A href="vbs_memo_12.html#get_ClassA">
\r
518 get_Object</A></DIV>
\r
519 <DIV id="text193_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:98px; margin-top:3603px; line-height:15px; white-space:nowrap">
\r
520 \8aÖ
\90\94\82É
\8ew
\92è
\82·
\82é
\96¼
\91O
\82Æ
\93¯
\82¶
\82Å
\82·
\81B</DIV>
\r
521 <DIV id="text193_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:3640px; line-height:15px; white-space:nowrap">
\r
522 \88È
\89º
\82Í
\81A
\88ê
\94Ê
\96¼ (Name)
\82Æ
\90³
\8e®
\96¼ (TrueName)
\82Ì
\88á
\82¢
\82©
\82ç
\90¶
\82¶
\82é
\96â
\91è
\82Ì
\91Î
\8dô
\96@
\82Å
\82·
\81B</DIV>
\r
523 <DIV id="text193_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:77px; margin-top:3914px; line-height:15px; white-space:nowrap">
\r
524 \81¨ Module Mixer 3
\82Ì
\8eÀ
\91\95</DIV>
\r
526 <v:line from="0,3460" to="544,3460"/>
\r
527 <v:line from="544,3460" to="544,3962"/>
\r
528 <v:line from="544,3962" to="0,3962"/>
\r
529 <v:line from="0,3962" to="0,3460"/>
\r
535 <A id="svgcats_vml_p194" class="to_tree" style="margin-top:3967px;" onClick="selectTreeElem( '194' );">
\81©</A>
\r
536 <A href="#svgcats_vml_p195" class="to_next_page" style="margin-top:3967px;">
\81¥</A>
\r
537 <A href="#svgcats_vml_p193" class="to_prev_page" style="margin-top:3967px;">
\81£</A>
\r
538 <v:rect style="position:absolute; margin-left:0px; margin-top:3978px; width:614px; height:1337px;" fillcolor="white"/>
\r
539 <DIV id="text194_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:521px; margin-top:4213px; line-height:15px; white-space:nowrap">
\r
540 <A href="..\vbslib.files\vbslib_60.html#SetVar">
\r
542 <DIV id="text194_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:4228px; line-height:15px; white-space:nowrap">
\r
543 GetVar
\82È
\82Ç
\81j
\82É
\90³
\8e®
\96¼
\82ð
\8ew
\92è
\82·
\82é
\82±
\82Æ
\82à
\82Å
\82«
\82Ü
\82·
\81B </DIV>
\r
544 <DIV id="text194_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:21px; margin-top:4001px; line-height:15px; white-space:nowrap">
\r
546 \83I
\83u
\83W
\83F
\83N
\83g
\82Ì Name
\82Æ TrueName</A></DIV>
\r
547 <DIV id="text194_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:4035px; line-height:15px; white-space:nowrap">
\r
548 \83N
\83\89\83X
\96¼
\82â
\83C
\83\93\83X
\83^
\83\93\83X
\96¼
\82Í
\81A
\88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82ª
\82 \82è
\81A
\91½
\82
\82Ì
\8fê
\8d\87\81A
\88ê
\94Ê
\96¼
\82ð
\95K
\97v
\82Æ
\82µ
\82Ü
\82·
\81B
\82µ
\82©
\82µ
\81A<BR/>
\r
549 new
\82É
\8ew
\92è
\82·
\82é
\8c^
\82Ì
\96¼
\91O
\82â
\81ATypeName
\82Å
\8eæ
\93¾
\82Å
\82«
\82é
\8c^
\82Ì
\96¼
\91O
\82Í
\83N
\83\89\83X
\82Ì
\90³
\8e®
\96¼
\82Å
\82 \82é
\82±
\82Æ
\82ª<BR/>
\r
550 \91½
\82
\81A
\88µ
\82¢
\82É
\82
\82¢
\82Å
\82µ
\82å
\82¤
\81B
\82»
\82±
\82Å
\81A</DIV>
\r
551 <DIV id="text194_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:280px; margin-top:4003px; line-height:12px; white-space:nowrap">
\r
552 <A href="vbs_memo_12.html#vbsool">
\r
553 [
\90e: vbsool :
\83I
\83u
\83W
\83F
\83N
\83g
\8bL
\8fq
\96@ ]</A></DIV>
\r
554 <DIV id="text194_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; font-weight: bold; margin-left:80px; margin-top:4507px; line-height:13px; white-space:nowrap">
\r
555 <A href="#ClassN_no">
\r
556 Sample_getTrueName</A></DIV>
\r
557 <DIV id="text194_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:45px; margin-top:4471px; line-height:13px; white-space:nowrap">
\r
558 <A href="vbs_memo_12.html#get_ClassA">
\r
559 get_Object</A></DIV>
\r
560 <DIV id="text194_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:28px; margin-top:4443px; line-height:15px; white-space:nowrap">
\r
561 \8f\88\97\9d\83t
\83\8d\81[</DIV>
\r
562 <DIV id="text194_9" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:101px; margin-top:4543px; line-height:13px; white-space:nowrap">
\r
563 <A href="#get_TrueSample">
\r
564 get_TrueSample</A></DIV>
\r
565 <DIV id="text194_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:4140px; line-height:15px; white-space:nowrap">
\r
566 \88ê
\94Ê
\96¼
\82Í
\8fê
\96Ê
\82É
\82æ
\82Á
\82Ä
\81i
\92\8a\8fÛ
\93x
\82ª
\95Ï
\89»
\82µ
\82Ä
\81j
\95Ï
\82í
\82è
\82Ü
\82·
\81B
\90³
\8e®
\96¼
\82Í
\83C
\83\93\83X
\83^
\83\93\83X
\82Ì
\93à
\97e
\82â
\92è
\8b`
\82Ì<BR/>
\r
567 \92\8a\8fÛ
\93x
\82É
\82æ
\82Á
\82Ä
\95Ï
\82í
\82è
\82Ü
\82·
\81B
\88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82ª
\81A
\93¯
\82¶
\82É
\82È
\82é
\82±
\82Æ
\82à
\82 \82è
\82Ü
\82·
\81B<BR/>
\r
568 \88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82Í
\81A
\82P
\91Î
\91½
\82Ì
\8aÖ
\8cW
\82ª
\82 \82é
\82Ì
\82Å
\81A
\8fê
\96Ê
\82É
\89\9e\82¶
\82Ä
\81A
\88ê
\94Ê
\96¼
\82©
\82ç
\90³
\8e®
\96¼
\82ð
\91I
\91ð
\82·
\82é
\95K
\97v<BR/>
\r
569 \82ª
\82 \82è
\82Ü
\82·
\81B
\81i
\93¯
\8e\9e\82É
\91½
\91Î
\82P
\82Ì
\8aÖ
\8cW
\82à
\82 \82è
\82Ü
\82·
\82ª
\95Ê
\82Ì
\8fÍ
\82ð
\8eQ
\8fÆ
\81j
\81B</DIV>
\r
570 <DIV id="text194_11" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:111px; margin-top:4471px; line-height:13px; white-space:nowrap">
\r
572 <DIV id="text194_12" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:121px; margin-top:4558px; line-height:13px; white-space:nowrap">
\r
573 new TrueSample</DIV>
\r
574 <DIV id="text194_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:213px; margin-top:4469px; line-height:15px; white-space:nowrap">
\r
575 \88ê
\94Ê
\96¼ "Sample"
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é</DIV>
\r
576 <DIV id="text194_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:61px; margin-top:4489px; line-height:13px; white-space:nowrap">
\r
577 <A href="#ClassN_no">
\r
578 get_Sample</A></DIV>
\r
579 <v:rect style="position:absolute; margin-left:48px; margin-top:4615px; width:340px; height:265px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
580 <DIV id="text194_15" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:4621px; line-height:15px; white-space:nowrap">
\r
581 '// Class Sample has_interface_of ClassI<BR/>
\r
583 Function get_Sample()<BR/>
\r
584 Set get_Sample = get_Object( Sample_getTrueName() )<BR/>
\r
585 get_Sample.Name = "Sample"<BR/>
\r
588 Function Sample_getTrueName()<BR/>
\r
589 Dim ret : ret = GetVar( "Sample" )<BR/>
\r
590 If IsEmpty( ret ) Then<BR/>
\r
591 '// default is ClassA fixed<BR/>
\r
592 ret = "TrueSample" : SetVar "Sample", ret<BR/>
\r
594 Sample_getTrueName = ret<BR/>
\r
597 '//
\8c¾
\8cê
\8fã
\82Ì Class Sample
\82Ì
\92è
\8b`
\82Í
\95s
\97v
\82Å
\82·
\81B</DIV>
\r
598 <DIV id="text194_16" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:170px; margin-top:4742px; line-height:13px; white-space:nowrap">
\r
599 <A href="..\vbslib.files\vbslib_60.html#GetVar">
\r
601 <DIV id="text194_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:39px; margin-top:4596px; line-height:15px; white-space:nowrap">
\r
602 <A name="ClassN_no">
\r
603 \88ê
\94Ê
\96¼(Sample)
\82Ì
\83N
\83\89\83X
\92è
\8b` (
\88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82ª
\82P
\91Î
\91½
\82¾
\82¯
\82Ì
\8fê
\8d\87\81j</A></DIV>
\r
604 <DIV id="text194_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:273px; margin-top:4505px; line-height:15px; white-space:nowrap">
\r
605 \88ê
\94Ê
\96¼ "Sample"
\82©
\82ç
\90³
\8e®
\96¼ "TrueSample"
\82ð
\91I
\91ð</DIV>
\r
606 <DIV id="text194_19" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:147px; margin-top:4525px; line-height:13px; white-space:nowrap">
\r
607 ( "TrueSample" )</DIV>
\r
608 <DIV id="text194_20" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:80px; margin-top:4525px; line-height:13px; white-space:nowrap">
\r
610 <DIV id="text194_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:66px; margin-top:4885px; line-height:15px; white-space:nowrap">
\r
611 \8fã
\8bL
\82Í ret = "TrueSample"
\8cÅ
\92è
\82Å
\82·
\82ª
\81A
\8fê
\96Ê
\82É
\89\9e\82¶
\82Ä TrueSample
\88È
\8aO
\82Ì
\90³
\8e®
\96¼
\82ð<BR/>
\r
612 \95Ô
\82·
\82æ
\82¤
\82É
\8e©
\93®
\94»
\92è
\82µ
\82½
\95û
\82ª
\82æ
\82¢
\82Å
\82·
\81B</DIV>
\r
613 <DIV id="text194_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:54px; margin-top:4095px; line-height:15px; white-space:nowrap">
\r
614 Name
\83v
\83\8d\83p
\83e
\83B
\82Í
\81A
\83C
\83\93\83X
\83^
\83\93\83X
\82Ì
\88ê
\94Ê
\96¼
\82Æ
\82µ
\82Ü
\82·
\81B<BR/>
\r
615 TrueName
\83v
\83\8d\83p
\83e
\83B
\82Í
\81A
\83C
\83\93\83X
\83^
\83\93\83X
\82Ì
\90³
\8e®
\96¼
\82Æ
\82µ
\82Ü
\82·
\81B</DIV>
\r
616 <v:rect style="position:absolute; margin-left:48px; margin-top:5018px; width:466px; height:265px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
617 <DIV id="text194_23" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:5024px; line-height:15px; white-space:nowrap">
\r
618 '// Class TrueSample has_interface_of ClassI<BR/>
\r
620 Dim g_TrueSample<BR/>
\r
622 Function get_TrueSample() '// has_interface_of ClassI<BR/>
\r
623 If IsEmpty( g_TrueSample ) Then _<BR/>
\r
624 Set g_TrueSample = new TrueSample<BR/>
\r
625 Set get_TrueSample = g_TrueSample<BR/>
\r
628 Class TrueSample<BR/>
\r
629 Public Name<BR/>
\r
630 Public Property Get TrueName() : TrueName = TypeName(Me) : End Property<BR/>
\r
631 '--- Name is factory pattern.<BR/>
\r
632 Private Sub Class_Initialize() : Name = TypeName(Me) : End Sub<BR/>
\r
633 :<BR/>
\r
635 <DIV id="text194_24" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:39px; margin-top:4998px; line-height:15px; white-space:nowrap">
\r
636 <A name="get_TrueSample">
\r
637 \90³
\8e®
\96¼(TrueSample)
\82Ì
\83N
\83\89\83X
\92è
\8b` (
\88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82ª
\82P
\91Î
\91½
\82¾
\82¯
\82Ì
\8fê
\8d\87\81j</A></DIV>
\r
638 <v:line style="position:absolute;" from="257,4401" to="225,4401" strokecolor="#000000" strokeweight="1pt"/>
\r
639 <v:oval style="position:absolute; margin-left:222px; margin-top:4398px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
640 <v:line style="position:absolute;" from="252,4369" to="225,4369" strokecolor="#000000" strokeweight="1pt"/>
\r
641 <v:oval style="position:absolute; margin-left:222px; margin-top:4366px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
642 <DIV id="text194_27" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:179px; margin-top:4363px; line-height:13px; white-space:nowrap">
\r
644 <v:rect style="position:absolute; margin-left:252px; margin-top:4388px; width:54px; height:26px;" fillcolor="#E6E6FF" strokecolor="#000000" strokeweight="1pt"/>
\r
645 <DIV id="text194_28" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:260px; margin-top:4394px; line-height:15px; white-space:nowrap">
\r
647 <DIV id="text194_29" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:179px; margin-top:4397px; line-height:13px; white-space:nowrap">
\r
649 <v:rect style="position:absolute; margin-left:252px; margin-top:4354px; width:54px; height:26px;" fillcolor="#E6E6FF" strokecolor="#000000" strokeweight="1pt"/>
\r
650 <DIV id="text194_30" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:260px; margin-top:4360px; line-height:15px; white-space:nowrap">
\r
652 <DIV id="text194_31" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:314px; margin-top:4360px; line-height:15px; white-space:nowrap">
\r
653 Name = "ClassN", TrueName = "ClassA"</DIV>
\r
654 <DIV id="text194_32" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:314px; margin-top:4394px; line-height:15px; white-space:nowrap">
\r
655 Name = "ClassN", TrueName = "ClassB"</DIV>
\r
656 <DIV id="text194_33" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:28px; margin-top:4339px; line-height:15px; white-space:nowrap">
\r
657 \83f
\81[
\83^
\8d\
\91¢</DIV>
\r
658 <DIV id="text194_34" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:52px; margin-top:4298px; line-height:15px; white-space:nowrap">
\r
659 \81¨ T_Name
\83t
\83H
\83\8b\83_</DIV>
\r
660 <DIV id="text194_35" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:28px; margin-top:4272px; line-height:15px; white-space:nowrap">
\r
661 \83T
\83\93\83v
\83\8b\83t
\83@
\83C
\83\8b</DIV>
\r
662 <v:roundrect style="position:absolute; margin-left:36px; margin-top:4374px; width:95px; height:22px;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>
\r
663 <DIV id="text194_36" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:43px; margin-top:4378px; line-height:15px; white-space:nowrap">
\r
664 \88ê
\94Ê
\96¼
\82Å
\91I
\91ð</DIV>
\r
665 <v:line style="position:absolute;" from="140,4385" to="165,4368" strokecolor="#000000" strokeweight="1pt">
\r
666 <v:stroke dashstyle="dash"/>
\r
668 <v:line style="position:absolute;" from="165,4368" to="154,4370" strokecolor="#000000" strokeweight="1pt"/>
\r
669 <v:line style="position:absolute;" from="165,4368" to="158,4377" strokecolor="#000000" strokeweight="1pt"/>
\r
670 <v:line style="position:absolute;" from="140,4385" to="165,4402" strokecolor="#000000" strokeweight="1pt">
\r
671 <v:stroke dashstyle="dash"/>
\r
673 <v:line style="position:absolute;" from="165,4402" to="158,4393" strokecolor="#000000" strokeweight="1pt"/>
\r
674 <v:line style="position:absolute;" from="165,4402" to="154,4400" strokecolor="#000000" strokeweight="1pt"/>
\r
675 <DIV id="text194_39" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:387px; margin-top:4095px; line-height:15px; white-space:nowrap">
\r
676 \97á
\81F Windows<BR/>
\r
677 \97á
\81F Windows XP, Windows7</DIV>
\r
678 <DIV id="text194_40" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:273px; margin-top:4523px; line-height:15px; white-space:nowrap">
\r
679 \90³
\8e®
\96¼ "TrueSample"
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é</DIV>
\r
680 <DIV id="text194_41" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:215px; margin-top:4507px; line-height:13px; white-space:nowrap">
\r
682 <DIV id="text194_42" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:135px; margin-top:4489px; line-height:13px; white-space:nowrap">
\r
684 <DIV id="text194_43" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0080; margin-left:203px; margin-top:4543px; line-height:13px; white-space:nowrap">
\r
686 <DIV id="text194_44" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0080; margin-left:224px; margin-top:4558px; line-height:13px; white-space:nowrap">
\r
688 <DIV id="text194_45" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:192px; margin-top:4298px; line-height:15px; white-space:nowrap">
\r
689 \81¨ T_Name_vbslib
\83t
\83H
\83\8b\83_</DIV>
\r
690 <DIV id="text194_46" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:367px; margin-top:4298px; line-height:15px; white-space:nowrap">
\r
691 \81¨ T_NameAdd_vbslib
\83t
\83H
\83\8b\83_</DIV>
\r
692 <DIV id="text194_47" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:4213px; line-height:15px; white-space:nowrap">
\r
693 \91½
\82
\82Ì
\8fê
\8d\87\81A
\8e©
\93®
\94»
\92è
\82ð
\8ds
\82¢
\82Ü
\82·
\82ª
\81A
\8aÂ
\8b«
\95Ï
\90\94\81i
\83\8c\83W
\83X
\83g
\83\8a\82â
\81A
\90Ý
\92è
\83t
\83@
\83C
\83\8b\82â
\81Avbslib
\82Ì</DIV>
\r
694 <DIV id="text194_48" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:66px; margin-top:4929px; line-height:15px; white-space:nowrap">
\r
695 \8fã
\8bL
\82Ì
\90³
\8e®
\96¼
\82ð
\8c\88\82ß
\82é
\8f\88\97\9d\82Í
\81ASample_getTrueName
\8aÖ
\90\94\81i
\88ê
\94Ê
\96¼ "Sample"
\82Ì<BR/>
\r
696 getTrueName
\83\81\83\
\83b
\83h
\81j
\82Å
\82Í
\82È
\82
\81Aget_Sample
\8aÖ
\90\94\82É
\8f\91\82©
\82ê
\82Ä
\82¢
\82é
\82±
\82Æ
\82ª
\82 \82è
\82Ü
\82·
\81B</DIV>
\r
698 <v:line from="0,3978" to="614,3978"/>
\r
699 <v:line from="614,3978" to="614,5315"/>
\r
700 <v:line from="614,5315" to="0,5315"/>
\r
701 <v:line from="0,5315" to="0,3978"/>
\r
707 <A id="svgcats_vml_p195" class="to_tree" style="margin-top:5320px;" onClick="selectTreeElem( '195' );">
\81©</A>
\r
708 <A href="#svgcats_vml_p196" class="to_next_page" style="margin-top:5320px;">
\81¥</A>
\r
709 <A href="#svgcats_vml_p194" class="to_prev_page" style="margin-top:5320px;">
\81£</A>
\r
710 <v:rect style="position:absolute; margin-left:0px; margin-top:5331px; width:655px; height:2383px;" fillcolor="white"/>
\r
711 <v:rect style="position:absolute; margin-left:49px; margin-top:7243px; width:574px; height:385px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
712 <DIV id="text195_1" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:7249px; line-height:15px; white-space:nowrap">
\r
713 Dim g_NameDic : Set g_NameDic = CreateObject( "Scripting.Dictionary" )<BR/>
\r
715 Function get_NameDelegator( Name, TrueName, InterfaceName )<BR/>
\r
716 If g_NameDic.Exists( Name +"__"+ TrueName ) Then<BR/>
\r
717 Set get_NameDelegator = g_NameDic.Item( Name +"__"+ TrueName +"_"+ InterfaceName )<BR/>
\r
718 Exit Function<BR/>
\r
721 Set get_NameDelegator = new_X( InterfaceName + "_Delegator" ) : With get_NameDelegator<BR/>
\r
722 .Name = Name<BR/>
\r
723 .m_Delegate = TrueName '// if validated was need.<BR/>
\r
724 If not g_bNeedValidateDelegate Then _<BR/>
\r
725 Set .m_Delegate = get_Object( TrueName ) '// if validated was not need.<BR/>
\r
726 End With<BR/>
\r
728 Set g_NameDic.Item( Name +"__"+ TrueName +"_"+ InterfaceName ) = get_NameDelegator<BR/>
\r
732 Class NameDelegator '// defined_as_interface<BR/>
\r
733 Public Name<BR/>
\r
734 Public Property Get TrueName() : TrueName = NameDelegator_getTrueName( Me ) : End Property<BR/>
\r
735 Public m_Delegate ' as ClassA or ClassB or string(before validated)<BR/>
\r
736 Public Property Get DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property<BR/>
\r
738 <DIV id="text195_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:38px; margin-top:7223px; line-height:15px; white-space:nowrap">
\r
739 <A name="get_NameDelegator">
\r
740 NameDelegator
\82Ì
\83N
\83\89\83X
\92è
\8b`</A></DIV>
\r
741 <DIV id="text195_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:5381px; line-height:15px; white-space:nowrap">
\r
742 \95¡
\90\94\82©
\82ç
\93¯
\82¶
\83C
\83\93\83X
\83^
\83\93\83X
\82ð
\8eQ
\8fÆ
\82µ
\81A
\83I
\83u
\83W
\83F
\83N
\83g
\82©
\82ç
\88ê
\94Ê
\96¼
\81iName
\83v
\83\8d\83p
\83e
\83B
\81j
\82ð
\8eæ
\93¾
\82·
\82é
\95K
\97v
\82ª<BR/>
\r
743 \82 \82é
\8fê
\8d\87\82Í
\81A
\88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82ª
\91½
\91Î
\82P
\82Ì
\8aÖ
\8cW
\82É
\82È
\82è
\81A
\8e\9f\82Ì
\82æ
\82¤
\82È
\88Ï
\8f÷
\82ð
\82µ
\82È
\82¢
\82Æ
\81AName
\83v
\83\8d\83p
\83e
\83B<BR/>
\r
744 \82ª
\82»
\82ê
\82¼
\82ê
\82Ì
\8fê
\96Ê
\82É
\89\9e\82¶
\82½
\88ê
\94Ê
\96¼
\82É
\82È
\82è
\82Ü
\82¹
\82ñ
\81B</DIV>
\r
745 <v:rect style="position:absolute; margin-left:49px; margin-top:6347px; width:496px; height:220px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
746 <DIV id="text195_4" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:6353px; line-height:15px; white-space:nowrap">
\r
747 '// Class Sample has_interface_of ClassI<BR/>
\r
749 Function get_Sample()<BR/>
\r
750 Set get_Sample = get_NameDelegator( "Sample", Sample_getTrueName(), "ClassI" )<BR/>
\r
753 Function Sample_getTrueName()<BR/>
\r
754 Dim ret : ret = GetVar( "Sample" )<BR/>
\r
755 If IsEmpty( ret ) Then<BR/>
\r
756 '// default is ClassA fixed<BR/>
\r
757 ret = "TrueSample" : SetVar "Sample", ret<BR/>
\r
759 Sample_getTrueName = ret<BR/>
\r
761 <DIV id="text195_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:171px; margin-top:6459px; line-height:13px; white-space:nowrap">
\r
762 <A href="..\vbslib.files\vbslib_60.html#GetVar">
\r
764 <v:rect style="position:absolute; margin-left:49px; margin-top:6618px; width:472px; height:295px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
765 <DIV id="text195_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:6624px; line-height:15px; white-space:nowrap">
\r
766 '// Class ClassA has_interface_of ClassI<BR/>
\r
768 Dim g_TrueSample<BR/>
\r
770 Function get_TrueSample()<BR/>
\r
771 If IsEmpty( g_TrueSample ) Then _<BR/>
\r
772 Set g_TrueSample = new TrueSample<BR/>
\r
773 Set get_TrueSample = g_TrueSample<BR/>
\r
777 Class TrueSample<BR/>
\r
778 Public Property Get Name() : Name = TypeName(Me) : End Property<BR/>
\r
779 Public Property Get TrueName() : TrueName = TypeName(Me) : End Property<BR/>
\r
780 '--- Name is factory pattern.<BR/>
\r
782 Public Value<BR/>
\r
783 Public Function Method1() : Method1 = "TrueSample.Method1" : End Function<BR/>
\r
785 <DIV id="text195_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:41px; margin-top:6328px; line-height:15px; white-space:nowrap">
\r
787 \88ê
\94Ê
\96¼(Sample)
\82Ì
\83N
\83\89\83X
\92è
\8b` (
\88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82ª
\91½
\91Î
\82P
\82à
\82 \82é
\8fê
\8d\87\81j</A></DIV>
\r
788 <DIV id="text195_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:41px; margin-top:6599px; line-height:15px; white-space:nowrap">
\r
789 <A name="NameClassA">
\r
790 \90³
\8e®
\96¼(TrueSample)
\82Ì
\83N
\83\89\83X
\92è
\8b`</A></DIV>
\r
791 <DIV id="text195_9" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:171px; margin-top:6399px; line-height:13px; white-space:nowrap">
\r
792 <A href="#get_NameDelegator">
\r
793 get_NameDelegator</A></DIV>
\r
794 <v:line style="position:absolute;" from="266,5490" to="214,5490" strokecolor="#000000" strokeweight="1pt"/>
\r
795 <v:oval style="position:absolute; margin-left:211px; margin-top:5487px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
796 <v:line style="position:absolute;" from="267,5464" to="215,5464" strokecolor="#000000" strokeweight="1pt"/>
\r
797 <v:oval style="position:absolute; margin-left:212px; margin-top:5461px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
798 <DIV id="text195_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:5582px; line-height:15px; white-space:nowrap">
\r
799 Name
\83v
\83\8d\83p
\83e
\83B
\82Í
\81A
\83\86\81[
\83U
\81[
\82ª
\8eæ
\82è
\88µ
\82Á
\82Ä
\82¢
\82é
\8fê
\96Ê
\81i
\83h
\83\81\83C
\83\93\81j
\82É
\82æ
\82Á
\82Ä
\92\8a\8fÛ
\93x
\82ª
\95Ï
\89»
\82µ
\82Ä
\81A
\93¯
\82¶<BR/>
\r
800 \83C
\83\93\83X
\83^
\83\93\83X
\82É
\91Î
\82µ
\82Ä
\95¡
\90\94\82Ì
\88ê
\94Ê
\96¼
\82ð
\8e\9d\82Â
\82±
\82Æ
\82É
\82È
\82è
\82Ü
\82·
\81B
\82±
\82Ì
\83P
\81[
\83X
\82É
\91Î
\89\9e\82·
\82é
\8eÀ
\91\95\82Í
\88Ï
\8f÷
\82Ì<BR/>
\r
801 \8c`
\91Ô
\82ð
\82Æ
\82é
\82Æ
\82æ
\82¢
\82Å
\82µ
\82å
\82¤
\81B<BR/>
\r
803 \91¼
\82Ì
\83h
\83\81\83C
\83\93\82Ì
\96¼
\91O
\82ð
\8eQ
\8fÆ
\82·
\82é
\95K
\97v
\82Í
\81A
\82Ù
\82Æ
\82ñ
\82Ç
\82 \82è
\82Ü
\82¹
\82ñ
\82ª
\81A
\82à
\82µ
\8eQ
\8fÆ
\82·
\82é
\82Ì
\82Å
\82 \82ê
\82Î
\81ANames<BR/>
\r
804 \82Æ
\82¢
\82¤
\8fW
\8d\87\82Ì
\83v
\83\8d\83p
\83e
\83B
\82É
\82È
\82è
\82Ü
\82·
\81B</DIV>
\r
805 <v:roundrect style="position:absolute; margin-left:72px; margin-top:5452px; width:91px; height:22px;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>
\r
806 <DIV id="text195_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:79px; margin-top:5456px; line-height:15px; white-space:nowrap">
\r
807 \8fê
\96ÊA
\82Ì
\8aÖ
\90\94</DIV>
\r
808 <v:line style="position:absolute;" from="163,5464" to="206,5464" strokecolor="#000000" strokeweight="1pt">
\r
809 <v:stroke dashstyle="dash"/>
\r
811 <v:line style="position:absolute;" from="206,5464" to="195,5460" strokecolor="#000000" strokeweight="1pt"/>
\r
812 <v:line style="position:absolute;" from="206,5464" to="195,5468" strokecolor="#000000" strokeweight="1pt"/>
\r
813 <v:line style="position:absolute;" from="163,5489" to="206,5489" strokecolor="#000000" strokeweight="1pt">
\r
814 <v:stroke dashstyle="dash"/>
\r
816 <v:line style="position:absolute;" from="206,5489" to="195,5485" strokecolor="#000000" strokeweight="1pt"/>
\r
817 <v:line style="position:absolute;" from="206,5489" to="195,5493" strokecolor="#000000" strokeweight="1pt"/>
\r
818 <v:line style="position:absolute;" from="377,5464" to="395,5464" strokecolor="#000000" strokeweight="1pt"/>
\r
819 <v:line style="position:absolute;" from="395,5464" to="395,5472" strokecolor="#000000" strokeweight="1pt"/>
\r
820 <v:line style="position:absolute;" from="395,5489" to="377,5489" strokecolor="#000000" strokeweight="1pt"/>
\r
821 <v:line style="position:absolute;" from="395,5472" to="420,5472" strokecolor="#000000" strokeweight="1pt"/>
\r
822 <DIV id="text195_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:5688px; line-height:15px; white-space:nowrap">
\r
823 \83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\8dí
\8f\9c\82Í
\81A
\83K
\81[
\83x
\83W
\83R
\83\8c\83N
\83V
\83\87\83\93\82É
\94C
\82¹
\82Ä
\81AClassI_Delegator
\82ª
\96³
\82
\82È
\82é
\82Ü
\82Å
\91¶
\8dÝ
\82³
\82¹<BR/>
\r
824 \82é
\82Æ
\82æ
\82¢
\82Å
\82µ
\82å
\82¤
\81B<BR/>
\r
826 \8eÀ
\91Ì
\82Ì
\83t
\83@
\83C
\83\8b\82ª
\8dí
\8f\9c\82³
\82ê
\82½
\83V
\83\87\81[
\83g
\83J
\83b
\83g
\82Ì
\82æ
\82¤
\82É
\81AClassI_Delegator
\82ª
\8eQ
\8fÆ
\82·
\82é
\81A
\90³
\8e®
\96¼
\82Ì<BR/>
\r
827 \83I
\83u
\83W
\83F
\83N
\83g
\82¾
\82¯
\82ð
\96³
\82
\82·
\82Æ
\82«
\82Í
\81A
\88ê
\94Ê
\96¼
\82©
\82ç
\88Ï
\8f÷
\90æ
\82ð
\8eQ
\8fÆ
\82µ
\82Ä
\82¢
\82é ClassI_Delegator::m_Delegate<BR/>
\r
828 \82ð Empty
\82É
\82µ
\82Ä
\83K
\81[
\83x
\83W
\83R
\83\8c\83N
\83V
\83\87\83\93\82ð
\93®
\82©
\82µ
\82Ä
\8dí
\8f\9c\82µ
\82Ü
\82·
\81B
\82Ü
\82½
\81AEmpty
\82É
\82·
\82ê
\82Î
\81A
\8dí
\8f\9c\82³
\82ê
\82½<BR/>
\r
829 \83I
\83u
\83W
\83F
\83N
\83g
\82É
\83A
\83N
\83Z
\83X
\82µ
\82æ
\82¤
\82Æ
\82µ
\82½
\82Æ
\82«
\82É
\81A
\82«
\82¿
\82ñ
\82Æ
\97á
\8aO
\82ª
\94
\90¶
\82·
\82é
\82æ
\82¤
\82É
\82È
\82è
\82Ü
\82·
\81B</DIV>
\r
830 <DIV id="text195_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:351px; margin-top:5435px; line-height:15px; white-space:nowrap">
\r
831 Name
\88È
\8aO
\82Í</DIV>
\r
832 <DIV id="text195_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:172px; margin-top:5440px; line-height:15px; white-space:nowrap">
\r
834 <v:rect style="position:absolute; margin-left:265px; margin-top:5453px; width:112px; height:20px;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>
\r
835 <DIV id="text195_23" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:273px; margin-top:5456px; line-height:15px; white-space:nowrap">
\r
836 \8fê
\96ÊA
\82Å
\82Ì Name</DIV>
\r
837 <v:rect style="position:absolute; margin-left:265px; margin-top:5479px; width:112px; height:20px;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>
\r
838 <DIV id="text195_24" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:273px; margin-top:5482px; line-height:15px; white-space:nowrap">
\r
839 \8fê
\96ÊB
\82Å
\82Ì Name</DIV>
\r
840 <v:rect style="position:absolute; margin-left:421px; margin-top:5464px; width:142px; height:26px;" fillcolor="#E6E6FF" strokecolor="#000000" strokeweight="1pt"/>
\r
841 <DIV id="text195_25" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:429px; margin-top:5470px; line-height:15px; white-space:nowrap">
\r
842 \82 \82é
\82P
\82Â
\82Ì
\83C
\83\93\83X
\83^
\83\93\83X</DIV>
\r
843 <DIV id="text195_26" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:456px; margin-top:5492px; text-align: center; line-height:15px; white-space:nowrap">
\r
845 \81i
\90³
\8e®
\96¼
\81j</DIV>
\r
846 <DIV id="text195_27" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:270px; margin-top:5505px; text-align: center; line-height:10px; white-space:nowrap">
\r
847 ClassI_Delegator
\83N
\83\89\83X<BR/>
\r
848 \81i
\88ê
\94Ê
\96¼
\81j</DIV>
\r
849 <DIV id="text195_28" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:19px; margin-top:5351px; line-height:15px; white-space:nowrap">
\r
850 <A name="NameDelegate">
\r
851 Name
\82Æ TrueName
\82ª
\91½
\91Î
\82P
\82Ì
\8fê
\8d\87</A></DIV>
\r
852 <DIV id="text195_29" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; font-weight: bold; margin-left:77px; margin-top:6098px; line-height:13px; white-space:nowrap">
\r
854 Sample_getTrueName</A></DIV>
\r
855 <DIV id="text195_30" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:42px; margin-top:6060px; line-height:13px; white-space:nowrap">
\r
856 <A href="vbs_memo_12.html#get_ClassA">
\r
857 get_Object</A></DIV>
\r
858 <DIV id="text195_31" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:25px; margin-top:6032px; line-height:15px; white-space:nowrap">
\r
859 \8f\88\97\9d\83t
\83\8d\81[</DIV>
\r
860 <DIV id="text195_32" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:104px; margin-top:6060px; line-height:13px; white-space:nowrap">
\r
862 <DIV id="text195_33" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:248px; margin-top:6058px; line-height:15px; white-space:nowrap">
\r
863 \88ê
\94Ê
\96¼ "Sample"
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é</DIV>
\r
864 <DIV id="text195_34" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:276px; margin-top:6096px; line-height:15px; white-space:nowrap">
\r
865 \88ê
\94Ê
\96¼ "Sample"
\82©
\82ç
\81A
\90³
\8e®
\96¼ "TrueSample"
\82ð
\91I
\91ð</DIV>
\r
866 <DIV id="text195_35" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:77px; margin-top:6118px; line-height:13px; white-space:nowrap">
\r
867 <A href="#get_NameDelegator">
\r
868 get_NameDelegator</A></DIV>
\r
869 <DIV id="text195_36" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:134px; margin-top:6177px; line-height:13px; white-space:nowrap">
\r
870 <A href="#ClassI_Delegator">
\r
871 new_ClassI_Delegator</A></DIV>
\r
872 <DIV id="text195_37" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:155px; margin-top:6193px; line-height:13px; white-space:nowrap">
\r
873 new ClassI_Delegator</DIV>
\r
874 <DIV id="text195_38" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:155px; margin-top:6274px; line-height:13px; white-space:nowrap">
\r
875 new TrueSample</DIV>
\r
876 <DIV id="text195_39" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:94px; margin-top:6141px; line-height:13px; white-space:nowrap">
\r
877 If not g_NameDic.Exists( Name +"__"+ TrueName +"_"+ InterfaceName ) Then</DIV>
\r
878 <DIV id="text195_40" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:294px; margin-top:6191px; line-height:15px; white-space:nowrap">
\r
879 InterfaceName
\83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X
\82ð
\8e\9d\82¿
\81A<BR/>
\r
880 TrueName
\82Ö
\88Ï
\8f÷
\82·
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\90¶
\90¬</DIV>
\r
881 <DIV id="text195_41" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:263px; margin-top:6272px; line-height:15px; white-space:nowrap">
\r
882 \90³
\8e®
\96¼
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\90¶
\90¬
\82·
\82é</DIV>
\r
883 <DIV id="text195_42" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:25px; margin-top:5818px; line-height:15px; white-space:nowrap">
\r
884 \83T
\83\93\83v
\83\8b\83t
\83@
\83C
\83\8b</DIV>
\r
885 <DIV id="text195_43" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:49px; margin-top:5843px; line-height:15px; white-space:nowrap">
\r
886 \81¨ T_NameDelegator
\83t
\83H
\83\8b\83_</DIV>
\r
887 <DIV id="text195_44" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:152px; margin-top:6078px; line-height:13px; white-space:nowrap">
\r
889 <DIV id="text195_45" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:216px; margin-top:6098px; line-height:13px; white-space:nowrap">
\r
891 <DIV id="text195_46" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0080; margin-left:233px; margin-top:6256px; line-height:13px; white-space:nowrap">
\r
893 <v:roundrect style="position:absolute; margin-left:72px; margin-top:5478px; width:91px; height:22px;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>
\r
894 <DIV id="text195_47" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:79px; margin-top:5482px; line-height:15px; white-space:nowrap">
\r
895 \8fê
\96ÊB
\82Ì
\8aÖ
\90\94</DIV>
\r
896 <DIV id="text195_48" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:426px; margin-top:5435px; line-height:15px; white-space:nowrap">
\r
897 <A href="vbs_memo_14.html#m_Delegate">
\r
899 <v:line style="position:absolute;" from="395,5480" to="421,5480" strokecolor="#000000" strokeweight="1pt"/>
\r
900 <v:line style="position:absolute;" from="395,5480" to="395,5489" strokecolor="#000000" strokeweight="1pt"/>
\r
901 <DIV id="text195_51" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:60px; margin-top:6078px; line-height:13px; white-space:nowrap">
\r
902 <A href="#ClassN_no">
\r
903 get_Sample</A></DIV>
\r
904 <DIV id="text195_52" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:25px; margin-top:5883px; line-height:15px; white-space:nowrap">
\r
905 \83f
\81[
\83^
\8d\
\91¢</DIV>
\r
906 <DIV id="text195_53" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:148px; margin-top:5914px; line-height:13px; white-space:nowrap">
\r
908 <DIV id="text195_54" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:49px; margin-top:5914px; line-height:13px; white-space:nowrap">
\r
910 <DIV id="text195_55" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:66px; margin-top:5952px; line-height:13px; white-space:nowrap">
\r
911 <A href="#ClassN" style="color:#FF0000">
\r
912 ClassI_Delegator</A></DIV>
\r
913 <DIV id="text195_56" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:175px; margin-top:5952px; line-height:13px; white-space:nowrap">
\r
915 <DIV id="text195_57" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:175px; margin-top:5933px; line-height:13px; white-space:nowrap">
\r
917 <DIV id="text195_58" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:66px; margin-top:5933px; line-height:13px; white-space:nowrap">
\r
919 <DIV id="text195_59" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:215px; margin-top:5933px; line-height:13px; white-space:nowrap">
\r
920 = Name +"__"+ TrueName +"_"+ InterfaceName</DIV>
\r
921 <DIV id="text195_60" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:196px; margin-top:5971px; line-height:13px; white-space:nowrap">
\r
923 <DIV id="text195_61" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:196px; margin-top:5987px; line-height:13px; white-space:nowrap">
\r
925 <DIV id="text195_62" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:84px; margin-top:5971px; line-height:13px; white-space:nowrap">
\r
927 <DIV id="text195_63" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:84px; margin-top:5987px; line-height:13px; white-space:nowrap">
\r
928 <A href="#NameClassA">
\r
929 TrueSample</A></DIV>
\r
930 <DIV id="text195_64" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:235px; margin-top:5971px; line-height:13px; white-space:nowrap">
\r
932 <v:line style="position:absolute;" from="218,5957" to="408,5957" strokecolor="#C0C0C0" strokeweight="1pt"/>
\r
933 <v:oval style="position:absolute; margin-left:405px; margin-top:5954px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#C0C0C0" strokeweight="1pt"/>
\r
934 <DIV id="text195_66" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:330px; margin-top:5966px; line-height:13px; white-space:nowrap">
\r
936 <DIV id="text195_67" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:88px; margin-top:7663px; line-height:15px; white-space:nowrap">
\r
937 <A href="..\vbslib.files\vbslib_22.html#get_NameDelegator">
\r
938 \81¨ get_NameDelegator (vbslib)</A></DIV>
\r
939 <DIV id="text195_68" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:50px; margin-top:7663px; line-height:15px; white-space:nowrap">
\r
941 <DIV id="text195_69" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:38px; margin-top:6940px; line-height:15px; white-space:nowrap">
\r
942 <A name="ClassI_Delegator">
\r
943 ClassI_Delegator
\83N
\83\89\83X
\92è
\8b`</A></DIV>
\r
944 <DIV id="text195_70" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:112px; margin-top:6158px; line-height:13px; white-space:nowrap">
\r
946 <DIV id="text195_71" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:148px; margin-top:6158px; line-height:13px; white-space:nowrap">
\r
947 ( InterfaceName + "_Delegator" )</DIV>
\r
948 <DIV id="text195_72" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:181px; margin-top:6118px; line-height:13px; white-space:nowrap">
\r
949 ( Name, TrueName, InterfaceName )</DIV>
\r
950 <DIV id="text195_73" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:201px; margin-top:5504px; line-height:12px; white-space:nowrap">
\r
952 <DIV id="text195_74" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:112px; margin-top:6219px; line-height:15px; white-space:nowrap">
\r
954 Set .m_Delegate = get_Object( TrueName )</DIV>
\r
955 <DIV id="text195_75" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:57px; margin-top:7595px; line-height:13px; white-space:nowrap">
\r
956 Public Property Get DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property</DIV>
\r
957 <DIV id="text195_76" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:50px; margin-top:7636px; line-height:15px; white-space:nowrap">
\r
958 DefineInfo
\83v
\83\8d\83p
\83e
\83B
\82Í
\81A
\83I
\83v
\83V
\83\87\83\93\82Å
\82·
\81B</DIV>
\r
959 <DIV id="text195_77" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:294px; margin-top:7636px; line-height:15px; white-space:nowrap">
\r
960 <A href="vbs_memo_14.html#DefineInfo">
\r
961 \81¨ DefineInfo
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
962 <DIV id="text195_78" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:226px; margin-top:6235px; line-height:13px; white-space:nowrap">
\r
963 <A href="vbs_memo_12.html#get_ClassA">
\r
964 get_Object</A></DIV>
\r
965 <DIV id="text195_79" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:134px; margin-top:6256px; line-height:13px; white-space:nowrap">
\r
966 <A href="#NameClassA">
\r
967 get_TrueSample</A></DIV>
\r
968 <v:rect style="position:absolute; margin-left:49px; margin-top:6960px; width:574px; height:235px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
969 <DIV id="text195_80" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:6966px; line-height:15px; white-space:nowrap">
\r
970 Class ClassI_Delegator '// has_interface_of NameDelegator and ClassI<BR/>
\r
971 Public Name<BR/>
\r
972 Public Property Get TrueName() : TrueName = NameDelegator_getTrueName( Me ) : End Property<BR/>
\r
973 Public m_Delegate ' as ClassA or ClassB or string(before validated)<BR/>
\r
974 '--- Name is factory pattern.<BR/>
\r
976 Public Property Let Value( v ) : m_Delegate.Value = v : End Property<BR/>
\r
977 Public Property Get Value( ) : Value = m_Delegate.Value : End Property<BR/>
\r
978 Public Function Method1() : Method1 = m_Delegate.Method1() : End Function<BR/>
\r
982 Function new_ClassI_Delegator() '// has_interface_of NameDelegator and ClassI<BR/>
\r
983 Set new_ClassI_Delegator = new ClassI_Delegator<BR/>
\r
985 <DIV id="text195_81" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#008000; margin-left:271px; margin-top:6176px; line-height:13px; white-space:nowrap">
\r
986 [ClassI_Delegator]</DIV>
\r
987 <v:line style="position:absolute;" from="217,5963" to="352,5963" strokecolor="#C0C0C0" strokeweight="1pt"/>
\r
988 <v:oval style="position:absolute; margin-left:349px; margin-top:5960px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#C0C0C0" strokeweight="1pt"/>
\r
989 <DIV id="text195_83" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:388px; margin-top:5962px; line-height:13px; white-space:nowrap">
\r
990 <A href="#get_NameDelegator">
\r
991 NameDelegator</A></DIV>
\r
992 <DIV id="text195_84" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:423px; margin-top:5949px; line-height:15px; white-space:nowrap">
\r
993 \88ê
\94Ê
\96¼
\82ð
\8e\9d\82Á
\82½
\83I
\83u
\83W
\83F
\83N
\83g</DIV>
\r
994 <DIV id="text195_85" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#800000; margin-left:289px; margin-top:5986px; line-height:15px; white-space:nowrap">
\r
995 \90³
\8e®
\96¼
\82ð
\8e\9d\82Á
\82½
\83I
\83u
\83W
\83F
\83N
\83g</DIV>
\r
996 <DIV id="text195_86" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:242px; margin-top:5843px; line-height:15px; white-space:nowrap">
\r
997 \81¨ T_NameDelegator_vbslib
\83t
\83H
\83\8b\83_</DIV>
\r
998 <DIV id="text195_87" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:262px; margin-top:5531px; line-height:15px; white-space:nowrap">
\r
999 \97á
\81F Windows<BR/>
\r
1000 \97á
\81F Windows7</DIV>
\r
1001 <DIV id="text195_88" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:419px; margin-top:5531px; line-height:15px; white-space:nowrap">
\r
1002 \97á
\81F Windows7</DIV>
\r
1004 <v:line from="0,5331" to="655,5331"/>
\r
1005 <v:line from="655,5331" to="655,7714"/>
\r
1006 <v:line from="655,7714" to="0,7714"/>
\r
1007 <v:line from="0,7714" to="0,5331"/>
\r
1011 <!-- page 196 -->
\r
1013 <A id="svgcats_vml_p196" class="to_tree" style="margin-top:7719px;" onClick="selectTreeElem( '196' );">
\81©</A>
\r
1014 <A href="#svgcats_vml_p197" class="to_next_page" style="margin-top:7719px;">
\81¥</A>
\r
1015 <A href="#svgcats_vml_p195" class="to_prev_page" style="margin-top:7719px;">
\81£</A>
\r
1016 <v:rect style="position:absolute; margin-left:0px; margin-top:7730px; width:598px; height:385px;" fillcolor="white"/>
\r
1017 <DIV id="text196_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:7747px; line-height:15px; white-space:nowrap">
\r
1018 <A name="ListOfName">
\r
1019 \96¼
\91O
\82Ì
\88ê
\97\97</A></DIV>
\r
1020 <DIV id="text196_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:7776px; line-height:15px; white-space:nowrap">
\r
1021 \83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\96¼
\91O
\82ð
\88ê
\97\97\82·
\82é
\82Æ
\82«
\82Í
\81A<BR/>
\r
1022 \8eæ
\93¾
\82µ
\82Ä
\81AName
\83v
\83\8d\83p
\83e
\83B
\82ð
\95\
\8e¦
\82µ
\82Ü
\82·
\81B TrueName
\82Í
\81A
\95K
\97v
\82È
\82ç
\95â
\8f\95\93I
\82É
\95\
\8e¦
\82µ
\82Ü
\82·
\81B</DIV>
\r
1023 <v:rect style="position:absolute; margin-left:48px; margin-top:7933px; width:256px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1024 <DIV id="text196_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:7940px; line-height:13px; white-space:nowrap">
\r
1025 Sub ClassI::Validate( Opt as variant )</DIV>
\r
1026 <DIV id="text196_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:7892px; line-height:15px; white-space:nowrap">
\r
1027 \82½
\82¾
\82µ
\81A
\82·
\82×
\82Ä
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\90¶
\90¬
\82·
\82é
\82Æ
\8e\9e\8aÔ
\82ª
\82©
\82©
\82é
\8fê
\8d\87\81A
\90¶
\90¬
\8e\9e\82É
\8eÀ
\8ds
\82·
\82é
\8f\89\8aú
\89»
\8f\88\97\9d<BR/>
\r
1028 (Class_Initialize)
\82ð Validate
\83\81\83\
\83b
\83h
\82É
\88Ú
\82·
\82Æ
\82æ
\82¢
\82Å
\82µ
\82å
\82¤
\81B</DIV>
\r
1029 <DIV id="text196_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:243px; margin-top:7776px; line-height:15px; white-space:nowrap">
\r
1030 <A href="vbs_memo_12.html#get_ObjectsFromFile">
\r
1031 get_ObjectsFormFile</A></DIV>
\r
1032 <DIV id="text196_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:362px; margin-top:7776px; line-height:15px; white-space:nowrap">
\r
1033 \82Å
\88ê
\97\97\82·
\82é
\82·
\82×
\82Ä
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð</DIV>
\r
1034 <v:rect style="position:absolute; margin-left:48px; margin-top:7818px; width:454px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1035 <DIV id="text196_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:7824px; line-height:15px; white-space:nowrap">
\r
1036 Dim samples, sample<BR/>
\r
1037 get_ObjectsFromFile "Lib\*_obj.vbs", "ClassI", samples '// [out] samples<BR/>
\r
1038 For Each sample In samples : echo sample.Name : Next</DIV>
\r
1039 <DIV id="text196_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:7982px; line-height:15px; white-space:nowrap">
\r
1040 \88ê
\97\97\82·
\82é
\82Æ
\82«
\82Í
\81A
\88ê
\94Ê
\96¼
\82ª Name
\83v
\83\8d\83p
\83e
\83B
\82É
\93ü
\82Á
\82Ä
\82¢
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82Æ
\81A
\90³
\8e®
\96¼
\82ª Name<BR/>
\r
1041 \83v
\83\8d\83p
\83e
\83B
\82É
\93ü
\82Á
\82Ä
\82¢
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\97¼
\95û
\82ð
\88ê
\97\97\82µ
\82Ü
\82·
\81B</DIV>
\r
1042 <DIV id="text196_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:49px; margin-top:8067px; line-height:15px; white-space:nowrap">
\r
1043 \81¨ T_NameList
\83t
\83H
\83\8b\83_</DIV>
\r
1044 <DIV id="text196_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:214px; margin-top:8067px; line-height:15px; white-space:nowrap">
\r
1045 \81¨ T_NameList_vbslib
\83t
\83H
\83\8b\83_</DIV>
\r
1046 <DIV id="text196_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:30px; margin-top:8039px; line-height:15px; white-space:nowrap">
\r
1047 \83T
\83\93\83v
\83\8b\83t
\83@
\83C
\83\8b</DIV>
\r
1049 <v:line from="0,7730" to="598,7730"/>
\r
1050 <v:line from="598,7730" to="598,8115"/>
\r
1051 <v:line from="598,8115" to="0,8115"/>
\r
1052 <v:line from="0,8115" to="0,7730"/>
\r
1056 <!-- page 197 -->
\r
1058 <A id="svgcats_vml_p197" class="to_tree" style="margin-top:8120px;" onClick="selectTreeElem( '197' );">
\81©</A>
\r
1059 <A href="#svgcats_vml_p198" class="to_next_page" style="margin-top:8120px;">
\81¥</A>
\r
1060 <A href="#svgcats_vml_p196" class="to_prev_page" style="margin-top:8120px;">
\81£</A>
\r
1061 <v:rect style="position:absolute; margin-left:0px; margin-top:8131px; width:622px; height:883px;" fillcolor="white"/>
\r
1062 <DIV id="text197_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:8148px; line-height:15px; white-space:nowrap">
\r
1064 Item
\83f
\83t
\83H
\83\8b\83g
\81E
\83v
\83\8d\83p
\83e
\83B :
\93®
\93I
\92è
\8b`
\83\81\83\93\83o
\81[ (vbsool)</A></DIV>
\r
1065 <v:rect style="position:absolute; margin-left:29px; margin-top:8180px; width:322px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1066 <DIV id="text197_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:8187px; line-height:13px; white-space:nowrap">
\r
1067 Default Property Item( Name as string ) as variant</DIV>
\r
1068 <DIV id="text197_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8216px; line-height:15px; white-space:nowrap">
\r
1069 VBScript
\82Í
\81AECMA Script (JavaScript)
\82Ì
\82æ
\82¤
\82É
\81A
\93®
\93I
\82É
\83\81\83\93\83o
\81[
\82ð
\92è
\8b`
\82·
\82é
\82±
\82Æ
\82Í
\82Å
\82«
\82Ü
\82¹
\82ñ
\82ª
\81A<BR/>
\r
1070 \83f
\83t
\83H
\83\8b\83g
\81E
\83v
\83\8d\83p
\83e
\83B
\82Æ
\81A
\8e«
\8f\91\81iDictionary
\83N
\83\89\83X
\81j
\82ð
\8eg
\82¤
\82±
\82Æ
\82Å
\81A
\93¯
\97l
\82Ì
\82±
\82Æ
\82ª
\82Å
\82«
\82Ü
\82·
\81B</DIV>
\r
1071 <DIV id="text197_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:74px; margin-top:8942px; line-height:15px; white-space:nowrap">
\r
1072 \81¨ JavaScript
\82Ì
\83N
\83\89\83X</DIV>
\r
1073 <DIV id="text197_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:33px; margin-top:8942px; line-height:15px; white-space:nowrap">
\r
1075 <DIV id="text197_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:215px; margin-top:8942px; line-height:15px; white-space:nowrap">
\r
1076 <A href="vbs_memo_08.html#dic">
\r
1077 \81¨ Dictionary
\83N
\83\89\83X</A></DIV>
\r
1078 <DIV id="text197_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:74px; margin-top:8966px; line-height:15px; white-space:nowrap">
\r
1080 \81¨ Items
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1081 <DIV id="text197_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8263px; line-height:15px; white-space:nowrap">
\r
1082 Item
\83v
\83\8d\83p
\83e
\83B
\82Í
\81ADictionary
\82â FolderItem
\82È
\82Ç
\82É
\8f\80\8b\92\82µ
\82Ä
\82¢
\82Ü
\82·
\81B<BR/>
\r
1083 ArrayClass(vbslib)
\82à
\81AItem
\83v
\83\8d\83p
\83e
\83B
\82ª
\8eg
\82¦
\82Ü
\82·
\81B</DIV>
\r
1084 <DIV id="text197_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:103px; margin-top:8309px; line-height:15px; white-space:nowrap">
\r
1085 \81¨ T_Item
\83t
\83H
\83\8b\83_</DIV>
\r
1086 <DIV id="text197_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8309px; line-height:15px; white-space:nowrap">
\r
1087 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1088 <v:rect style="position:absolute; margin-left:46px; margin-top:8390px; width:310px; height:145px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1089 <DIV id="text197_11" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:8396px; line-height:15px; white-space:nowrap">
\r
1090 Dim obj : Set obj = new ClassA<BR/>
\r
1091 obj.PropA = 1 '// Static defined property<BR/>
\r
1092 obj("PropB") = 12 '// Dynamic defined property<BR/>
\r
1093 obj("PropC") = "ABC"<BR/>
\r
1094 Set obj("PropD") = new ClassA<BR/>
\r
1096 WScript.Echo "PropA = "& obj.PropA<BR/>
\r
1097 WScript.Echo "PropB = "& obj("PropB")<BR/>
\r
1098 WScript.Echo "PropC = "& obj("PropC").Value</DIV>
\r
1099 <DIV id="text197_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8369px; line-height:15px; white-space:nowrap">
\r
1100 \8eg
\97p
\97á
\81F</DIV>
\r
1101 <v:rect style="position:absolute; margin-left:46px; margin-top:8581px; width:544px; height:340px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1102 <DIV id="text197_13" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:8587px; line-height:15px; white-space:nowrap">
\r
1104 Public PropA '// Static defined property<BR/>
\r
1106 '//=== Dynamic defined property : Item, Items, Keys<BR/>
\r
1107 Public Default Property Get Item( Name ) : LetSet Item, m_Dic( Name ) : End Property<BR/>
\r
1108 Public Property Let Item( Name, Value ) : m_Dic( Name ) = Value : End Property<BR/>
\r
1109 Public Property Set Item( Name, Object ) : Set m_Dic( Name ) = Object : End Property<BR/>
\r
1111 Public Property Get Keys() : Keys = m_Dic.Keys : End Property<BR/>
\r
1112 Public Property Get Items() : Items = m_Dic.Items : End Property<BR/>
\r
1114 Public m_Dic ' as Dictionary<BR/>
\r
1115 Private Sub Class_Initialize()<BR/>
\r
1116 Set m_Dic = CreateObject( "Scripting.Dictionary" )<BR/>
\r
1117 m_Dic.CompareMode = 1 '// NotCaseSensitive<BR/>
\r
1118 End Sub<BR/>
\r
1122 Sub LetSet( Out, In_ )<BR/>
\r
1123 If IsObject( In_ ) Then Set Out = In_ Else Out = In_<BR/>
\r
1125 <DIV id="text197_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8559px; line-height:15px; white-space:nowrap">
\r
1126 <A name="Item_def">
\r
1127 \92è
\8b`
\97á
\81F Item, Items, Keys
\83v
\83\8d\83p
\83e
\83B
\82ª
\82 \82é
\83N
\83\89\83X
\82Ì
\92è
\8b`</A></DIV>
\r
1128 <DIV id="text197_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:271px; margin-top:8309px; line-height:15px; white-space:nowrap">
\r
1129 vbslib
\82È
\82µ
\94Å</DIV>
\r
1130 <DIV id="text197_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:33px; margin-top:8966px; line-height:15px; white-space:nowrap">
\r
1132 <DIV id="text197_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:204px; margin-top:8966px; line-height:15px; white-space:nowrap">
\r
1134 \81¨ Keys
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1135 <DIV id="text197_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:103px; margin-top:8329px; line-height:15px; white-space:nowrap">
\r
1136 \81¨ T_Item_vbslib
\83t
\83H
\83\8b\83_</DIV>
\r
1137 <DIV id="text197_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:271px; margin-top:8329px; line-height:15px; white-space:nowrap">
\r
1138 vbslib
\8eg
\97p
\94Å</DIV>
\r
1139 <DIV id="text197_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:331px; margin-top:8966px; line-height:15px; white-space:nowrap">
\r
1140 \81¨ GetSetting
\8aÖ
\90\94</DIV>
\r
1142 <v:line from="0,8131" to="622,8131"/>
\r
1143 <v:line from="622,8131" to="622,9014"/>
\r
1144 <v:line from="622,9014" to="0,9014"/>
\r
1145 <v:line from="0,9014" to="0,8131"/>
\r
1149 <!-- page 198 -->
\r
1151 <A id="svgcats_vml_p198" class="to_tree" style="margin-top:9019px;" onClick="selectTreeElem( '198' );">
\81©</A>
\r
1152 <A href="#svgcats_vml_p199" class="to_next_page" style="margin-top:9019px;">
\81¥</A>
\r
1153 <A href="#svgcats_vml_p197" class="to_prev_page" style="margin-top:9019px;">
\81£</A>
\r
1154 <v:rect style="position:absolute; margin-left:0px; margin-top:9030px; width:497px; height:363px;" fillcolor="white"/>
\r
1155 <DIV id="text198_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:9047px; line-height:15px; white-space:nowrap">
\r
1157 Items
\83v
\83\8d\83p
\83e
\83B :
\93®
\93I
\92è
\8b`
\83\81\83\93\83o
\81[
\82Ì
\92l
\82Ì
\8fW
\8d\87 (vbsool)</A></DIV>
\r
1158 <v:rect style="position:absolute; margin-left:29px; margin-top:9079px; width:262px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1159 <DIV id="text198_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:9086px; line-height:13px; white-space:nowrap">
\r
1160 Property Get Items() as array of variant</DIV>
\r
1161 <v:rect style="position:absolute; margin-left:46px; margin-top:9180px; width:196px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1162 <DIV id="text198_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9186px; line-height:15px; white-space:nowrap">
\r
1163 For Each item In obj.Items<BR/>
\r
1164 If IsObject( item ) Then<BR/>
\r
1165 WScript.Echo item.Value<BR/>
\r
1166 Else<BR/>
\r
1167 WScript.Echo item<BR/>
\r
1168 End If<BR/>
\r
1170 <DIV id="text198_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9159px; line-height:15px; white-space:nowrap">
\r
1171 \8eg
\97p
\97á
\81F</DIV>
\r
1172 <DIV id="text198_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:97px; margin-top:9125px; line-height:15px; white-space:nowrap">
\r
1174 \81¨ Item
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1175 <DIV id="text198_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:9125px; line-height:15px; white-space:nowrap">
\r
1176 \83T
\83\93\83v
\83\8b</DIV>
\r
1177 <DIV id="text198_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9314px; line-height:15px; white-space:nowrap">
\r
1178 \8fã
\8bL
\82Í
\95W
\8f\80\8c`
\82Å
\82·
\82ª
\81A
\8f\88\97\9d\91¬
\93x
\82ª
\97v
\8b\81\82³
\82ê
\82é
\82Æ
\82«
\82Í
\8e\9f\82Ì
\82æ
\82¤
\82É
\82µ
\82Ä
\82
\82¾
\82³
\82¢
\81B</DIV>
\r
1179 <v:rect style="position:absolute; margin-left:46px; margin-top:9336px; width:226px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1180 <DIV id="text198_8" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9343px; line-height:13px; white-space:nowrap">
\r
1181 For Each item In obj.m_Dic.Items</DIV>
\r
1183 <v:line from="0,9030" to="497,9030"/>
\r
1184 <v:line from="497,9030" to="497,9393"/>
\r
1185 <v:line from="497,9393" to="0,9393"/>
\r
1186 <v:line from="0,9393" to="0,9030"/>
\r
1190 <!-- page 199 -->
\r
1192 <A id="svgcats_vml_p199" class="to_tree" style="margin-top:9398px;" onClick="selectTreeElem( '199' );">
\81©</A>
\r
1193 <A href="#svgcats_vml_p200" class="to_next_page" style="margin-top:9398px;">
\81¥</A>
\r
1194 <A href="#svgcats_vml_p198" class="to_prev_page" style="margin-top:9398px;">
\81£</A>
\r
1195 <v:rect style="position:absolute; margin-left:0px; margin-top:9409px; width:497px; height:310px;" fillcolor="white"/>
\r
1196 <DIV id="text199_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:9426px; line-height:15px; white-space:nowrap">
\r
1198 Keys
\83v
\83\8d\83p
\83e
\83B :
\93®
\93I
\92è
\8b`
\83\81\83\93\83o
\81[
\82Ì
\83\81\83\93\83o
\81[
\96¼
\82Ì
\8fW
\8d\87 (vbsool)</A></DIV>
\r
1199 <v:rect style="position:absolute; margin-left:29px; margin-top:9458px; width:250px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1200 <DIV id="text199_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:9465px; line-height:13px; white-space:nowrap">
\r
1201 Property Get Keys() as array of string</DIV>
\r
1202 <v:rect style="position:absolute; margin-left:46px; margin-top:9559px; width:184px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1203 <DIV id="text199_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9565px; line-height:15px; white-space:nowrap">
\r
1204 For Each name In obj.Keys<BR/>
\r
1205 WScript.Echo name<BR/>
\r
1207 <DIV id="text199_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9538px; line-height:15px; white-space:nowrap">
\r
1208 \8eg
\97p
\97á
\81F</DIV>
\r
1209 <DIV id="text199_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:97px; margin-top:9504px; line-height:15px; white-space:nowrap">
\r
1211 \81¨ Item
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1212 <DIV id="text199_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:9504px; line-height:15px; white-space:nowrap">
\r
1213 \83T
\83\93\83v
\83\8b</DIV>
\r
1214 <DIV id="text199_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9640px; line-height:15px; white-space:nowrap">
\r
1215 \8fã
\8bL
\82Í
\95W
\8f\80\8c`
\82Å
\82·
\82ª
\81A
\8f\88\97\9d\91¬
\93x
\82ª
\97v
\8b\81\82³
\82ê
\82é
\82Æ
\82«
\82Í
\8e\9f\82Ì
\82æ
\82¤
\82É
\82µ
\82Ä
\82
\82¾
\82³
\82¢
\81B</DIV>
\r
1216 <v:rect style="position:absolute; margin-left:46px; margin-top:9662px; width:220px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1217 <DIV id="text199_8" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9669px; line-height:13px; white-space:nowrap">
\r
1218 For Each item In obj.m_Dic.Keys</DIV>
\r
1220 <v:line from="0,9409" to="497,9409"/>
\r
1221 <v:line from="497,9409" to="497,9719"/>
\r
1222 <v:line from="497,9719" to="0,9719"/>
\r
1223 <v:line from="0,9719" to="0,9409"/>
\r
1227 <!-- page 200 -->
\r
1229 <A id="svgcats_vml_p200" class="to_tree" style="margin-top:9724px;" onClick="selectTreeElem( '200' );">
\81©</A>
\r
1230 <A href="vbs_memo_14.html#svgcats_vml_p201" class="to_next_page" style="margin-top:9724px;">
\81¥</A>
\r
1231 <A href="#svgcats_vml_p199" class="to_prev_page" style="margin-top:9724px;">
\81£</A>
\r
1232 <v:rect style="position:absolute; margin-left:0px; margin-top:9735px; width:585px; height:1823px;" fillcolor="white"/>
\r
1233 <DIV id="text200_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:9752px; line-height:15px; white-space:nowrap">
\r
1234 <A name="vbsool_event">
\r
1235 EventResponders :
\83C
\83x
\83\93\83g
\89\9e\93\9a (vbsool)</A></DIV>
\r
1236 <DIV id="text200_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11444px; line-height:15px; white-space:nowrap">
\r
1237 <A href="..\vbslib.files\vbslib_49.html#FuncRedir_add">
\r
1238 \81¨ FuncRedir_add (vbslib)</A></DIV>
\r
1239 <DIV id="text200_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:11444px; line-height:15px; white-space:nowrap">
\r
1241 <DIV id="text200_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11486px; line-height:15px; white-space:nowrap">
\r
1242 <A href="vbs_memo_14.html#delegate1">
\r
1243 \81¨
\82P
\82Â
\82Ì
\93o
\98^
\82³
\82ê
\82½
\8aÖ
\90\94\82ð
\8cÄ
\82Ñ
\8fo
\82·
\95Ï
\90\94\81A
\83f
\83\8a\83Q
\81[
\83g</A></DIV>
\r
1244 <DIV id="text200_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:219px; margin-top:11444px; line-height:15px; white-space:nowrap">
\r
1245 \8aÖ
\90\94\92è
\8b`
\82Ì
\83I
\81[
\83o
\81[
\83\89\83C
\83h</DIV>
\r
1246 <v:rect style="position:absolute; margin-left:42px; margin-top:9932px; width:256px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1247 <DIV id="text200_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:9939px; line-height:13px; white-space:nowrap">
\r
1248 Dim ClassE::OnEventX as EventResponders</DIV>
\r
1249 <DIV id="text200_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:9788px; line-height:15px; white-space:nowrap">
\r
1250 \83C
\83x
\83\93\83g
\82Æ
\82Í
\81A
\82 \82é
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\8fó
\91Ô
\95Ï
\89»
\82Ì
\82±
\82Æ
\82Å
\82·
\81B<BR/>
\r
1251 \83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\82Æ
\82«
\82É
\8ds
\82¤
\8f\88\97\9d\82Í
\81A
\83A
\83v
\83\8a\83P
\81[
\83V
\83\87\83\93\82É
\82æ
\82Á
\82Ä
\88Ù
\82È
\82è
\82Ü
\82·
\81B<BR/>
\r
1252 \82»
\82±
\82Å
\81A
\82 \82é
\83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\82Æ
\82«
\82É
\8ds
\82¤
\8f\88\97\9d\82ð
\8aÖ
\90\94\82É
\8bL
\8fq
\82µ
\82Ä
\81A
\82»
\82Ì
\8aÖ
\90\94\82ð
\83I
\83u
\83W
\83F
\83N
\83g
\82É<BR/>
\r
1253 \93o
\98^
\82µ
\82Ä
\82¨
\82
\82±
\82Æ
\82Å
\81A
\95K
\97v
\82È
\82Æ
\82«
\82É
\95K
\97v
\82È
\8f\88\97\9d\82ª
\82Å
\82«
\82é
\82æ
\82¤
\82É
\82È
\82è
\82Ü
\82·
\81B<BR/>
\r
1254 \91¼
\82Ì
\8c¾
\8cê
\82Å
\82Í
\81A
\8aÖ
\90\94\83|
\83C
\83\93\83^
\81A
\83R
\81[
\83\8b\83o
\83b
\83N
\8aÖ
\90\94\81A
\83\81\83\
\83b
\83h
\83|
\83C
\83\93\83^
\82È
\82Ç
\82Æ
\8cÄ
\82Î
\82ê
\82Ä
\82¢
\82Ü
\82·
\81B</DIV>
\r
1255 <DIV id="text200_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:10207px; line-height:15px; white-space:nowrap">
\r
1256 <A name="vbsool_event_declare">
\r
1257 \92è
\8b`
\81F
\83C
\83x
\83\93\83g
\82²
\82Æ
\82É
\81A
\83\81\83\
\83b
\83h
\82ð
\93o
\98^
\82Å
\82«
\82é
\83\81\83\93\83o
\81[
\95Ï
\90\94\82ð
\90é
\8c¾
\82·
\82é</A></DIV>
\r
1258 <DIV id="text200_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10025px; line-height:15px; white-space:nowrap">
\r
1259 <A href="#vbsool_event_declare">
\r
1260 \81¨
\92è
\8b`
\81F
\83C
\83x
\83\93\83g
\82²
\82Æ
\82É
\81A
\83\81\83\
\83b
\83h
\82ð
\93o
\98^
\82Å
\82«
\82é
\83\81\83\93\83o
\81[
\95Ï
\90\94\82ð
\90é
\8c¾
\82·
\82é</A></DIV>
\r
1261 <v:rect style="position:absolute; margin-left:42px; margin-top:10268px; width:262px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1262 <DIV id="text200_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10274px; line-height:15px; white-space:nowrap">
\r
1263 Class ClassE<BR/>
\r
1264 Public OnEventX ' as EventResponders<BR/>
\r
1266 Private Sub Class_Initialize()<BR/>
\r
1267 Set Me.OnEventX = new EventResponders<BR/>
\r
1268 End Sub<BR/>
\r
1270 <v:rect style="position:absolute; margin-left:133px; margin-top:9969px; width:364px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1271 <DIV id="text200_11" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:141px; margin-top:9976px; line-height:13px; white-space:nowrap">
\r
1272 Sub ClassA::OnEventX( Caller as ClassE, Args as variant )</DIV>
\r
1273 <v:line style="position:absolute;" from="78,9981" to="126,9981" strokecolor="#000000" strokeweight="1pt"/>
\r
1274 <v:shape style="position:absolute; margin-left:116px; margin-top:9976px; width:10px; height:10px"
\r
1275 fillcolor="#000000" strokecolor="#000000" strokeweight="1pt"
\r
1276 path="m 1000,500 l 0,0, 0,1000 x e"/>
\r
1277 <v:line style="position:absolute;" from="78,9981" to="78,9964" strokecolor="#000000" strokeweight="1pt"/>
\r
1278 <DIV id="text200_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:10422px; line-height:15px; white-space:nowrap">
\r
1279 <A name="vbsool_event_add">
\r
1280 \93o
\98^
\81F
\83R
\81[
\83\8b\83o
\83b
\83N
\82³
\82ê
\82é
\83\81\83\
\83b
\83h
\82ð
\81A
\83\81\83\93\83o
\81[
\95Ï
\90\94\82É
\93o
\98^
\82·
\82é</A></DIV>
\r
1281 <v:rect style="position:absolute; margin-left:42px; margin-top:10731px; width:508px; height:295px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1282 <DIV id="text200_15" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10737px; line-height:15px; white-space:nowrap">
\r
1283 Sub main()<BR/>
\r
1284 Dim obj : Set obj = new ClassE '// defined by Library<BR/>
\r
1285 Dim app : Set app = new ClassA '// defined by Application<BR/>
\r
1287 app.RespondFromClassE obj<BR/>
\r
1288 obj.Run '// call ClassA::OnEventX<BR/>
\r
1291 Class ClassA<BR/>
\r
1292 Public Sub RespondFromClassE( Caller )<BR/>
\r
1293 Caller.OnEventX.Add GetRef( "ClassA_onEventX" ), Me<BR/>
\r
1294 End Sub<BR/>
\r
1296 Public Sub OnEventX( Caller, Args )<BR/>
\r
1297 WScipt.Echo "Responded"<BR/>
\r
1298 End Sub<BR/>
\r
1301 Sub ClassA_onEventX( Me_, Caller, Args ) : Me_.OnEventX( Caller, Args ) : End Sub</DIV>
\r
1302 <DIV id="text200_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:11073px; line-height:15px; white-space:nowrap">
\r
1303 <A name="vbsool_event_call">
\r
1304 \8cÄ
\82Ñ
\8fo
\82µ
\81F
\83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\82ç
\81A
\93o
\98^
\82³
\82ê
\82Ä
\82¢
\82é
\83\81\83\
\83b
\83h
\82ð
\8cÄ
\82Ñ
\8fo
\82·</A></DIV>
\r
1305 <v:rect style="position:absolute; margin-left:42px; margin-top:11147px; width:256px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1306 <DIV id="text200_17" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:11153px; line-height:15px; white-space:nowrap">
\r
1308 Public OnEventX ' as EventResponders<BR/>
\r
1310 Public Sub Run()<BR/>
\r
1311 Me.OnEventX.Calls Me, Empty<BR/>
\r
1312 End Sub<BR/>
\r
1314 <DIV id="text200_18" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:110px; margin-top:10290px; line-height:13px; white-space:nowrap">
\r
1316 <DIV id="text200_19" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:62px; margin-top:10798px; line-height:13px; white-space:nowrap">
\r
1318 <DIV id="text200_20" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:254px; margin-top:10888px; line-height:13px; white-space:nowrap">
\r
1319 ClassA_onEventX</DIV>
\r
1320 <DIV id="text200_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10046px; line-height:15px; white-space:nowrap">
\r
1321 <A href="#vbsool_event_add">
\r
1322 \81¨
\93o
\98^
\81F
\83R
\81[
\83\8b\83o
\83b
\83N
\82³
\82ê
\82é
\83\81\83\
\83b
\83h
\82ð
\81A
\83\81\83\93\83o
\81[
\95Ï
\90\94\82É
\93o
\98^
\82·
\82é</A></DIV>
\r
1323 <DIV id="text200_22" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:200px; margin-top:10798px; line-height:13px; white-space:nowrap">
\r
1325 <DIV id="text200_23" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:158px; margin-top:10948px; line-height:13px; white-space:nowrap">
\r
1327 <DIV id="text200_24" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:92px; margin-top:11214px; line-height:13px; white-space:nowrap">
\r
1329 <DIV id="text200_25" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:116px; margin-top:10335px; line-height:13px; white-space:nowrap">
\r
1331 <DIV id="text200_26" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10067px; line-height:15px; white-space:nowrap">
\r
1332 <A href="#vbsool_event_call">
\r
1333 \81¨
\8cÄ
\82Ñ
\8fo
\82µ
\81F
\83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\82ç
\81A
\93o
\98^
\82³
\82ê
\82Ä
\82¢
\82é
\83\81\83\
\83b
\83h
\82ð
\8cÄ
\82Ñ
\8fo
\82·</A></DIV>
\r
1334 <DIV id="text200_27" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:50px; margin-top:11272px; line-height:15px; white-space:nowrap">
\r
1335 \95¡
\90\94\82Ì
\83\81\83\
\83b
\83h
\82ª
\93o
\98^
\82³
\82ê
\82Ä
\82¢
\82é
\82Æ
\82«
\82Í
\81ACalls
\83\81\83\
\83b
\83h
\82ð
\82P
\93x
\8cÄ
\82Ñ
\8fo
\82·
\82¾
\82¯
\82Å
\81A
\95¡
\90\94\82Ì<BR/>
\r
1336 \83\81\83\
\83b
\83h
\82ª
\8cÄ
\82Ñ
\8fo
\82³
\82ê
\82Ü
\82·
\81B</DIV>
\r
1337 <DIV id="text200_28" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11340px; line-height:15px; white-space:nowrap">
\r
1338 <A href="vbs_memo_14.html#vbsool_event_consider">
\r
1339 \81¨
\83C
\83x
\83\93\83g
\89\9e\93\9a\82Ì
\8eÀ
\91\95\95û
\96@
\82Ì
\8dl
\8e@</A></DIV>
\r
1340 <DIV id="text200_29" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10088px; line-height:15px; white-space:nowrap">
\r
1341 <A href="vbs_memo_14.html#EventResponders_ex">
\r
1342 \81¨ EventResponders
\82Ì
\8eÀ
\91\95\97á (vbslib
\82È
\82µ
\94Å
\81j</A></DIV>
\r
1343 <DIV id="text200_30" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:61px; margin-top:11507px; line-height:15px; white-space:nowrap">
\r
1344 \81¨
\83C
\83x
\83\93\83g
\8aÖ
\90\94\82Æ
\83p
\83\89\83\81\81[
\83^
\8eæ
\93¾
\8aÖ
\90\94 \81iC
\8c¾
\8cê
\81j</DIV>
\r
1345 <DIV id="text200_31" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:134px; margin-top:10933px; line-height:13px; white-space:nowrap">
\r
1347 <DIV id="text200_32" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11361px; line-height:15px; white-space:nowrap">
\r
1348 <A href="http://www.atmarkit.co.jp/fdotnet/vb6tonet/vb6tonet25/vb6tonet25_02.html" target="_blank">
\r
1349 \81¨
\81\97IT
\81FVB.NET
\83v
\83\8d\83O
\83\89\83~
\83\93\83O
\81@
\91æ25
\89ñ
\83C
\83x
\83\93\83g
\82Æ
\83C
\83x
\83\93\83g
\81E
\83n
\83\93\83h
\83\89 (Web)</A></DIV>
\r
1350 <DIV id="text200_33" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:11340px; line-height:15px; white-space:nowrap">
\r
1352 <DIV id="text200_34" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11465px; line-height:15px; white-space:nowrap">
\r
1353 <A href="..\vbslib.files\vbslib_49.html#CallForEach">
\r
1354 \81¨ CallForEach (vbslib)</A></DIV>
\r
1355 <DIV id="text200_35" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:219px; margin-top:11465px; line-height:15px; white-space:nowrap">
\r
1356 \8aÖ
\90\94\82ð
\95¡
\90\94\89ñ
\8cÄ
\82Ñ
\8fo
\82·</DIV>
\r
1357 <DIV id="text200_36" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:61px; margin-top:11382px; line-height:15px; white-space:nowrap">
\r
1358 \81¨
\83C
\83x
\83\93\83g(C#)</DIV>
\r
1359 <DIV id="text200_37" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:11104px; line-height:15px; white-space:nowrap">
\r
1360 \83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\83\81\83\
\83b
\83h
\82©
\82ç
\81A
\83C
\83x
\83\93\83g
\82É
\89\9e\93\9a\82·
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\83\81\83\
\83b
\83h
\82ð<BR/>
\r
1361 \8cÄ
\82Ñ
\8fo
\82·
\83R
\81[
\83h
\82ð
\81A
\92Ê
\8fí
\81A
\83\89\83C
\83u
\83\89\83\8a\82ª
\8f\91\82«
\82Ü
\82·
\81B</DIV>
\r
1362 <DIV id="text200_38" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10454px; line-height:15px; white-space:nowrap">
\r
1363 \83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\82ç
\83R
\81[
\83\8b\83o
\83b
\83N
\82³
\82ê
\82é
\83\81\83\
\83b
\83h
\82ð
\81A
\83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82·
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82É
\93o
\98^<BR/>
\r
1364 \82·
\82é
\83R
\81[
\83h
\82ð
\81A
\92Ê
\8fí
\81A
\83A
\83v
\83\8a\83P
\81[
\83V
\83\87\83\93\82ª
\8f\91\82«
\82Ü
\82·
\81B</DIV>
\r
1365 <DIV id="text200_39" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:9882px; line-height:15px; white-space:nowrap">
\r
1366 \92Ê
\8fí
\81A
\83\89\83C
\83u
\83\89\83\8a\82É
\82 \82é
\83N
\83\89\83X
\82ª
\81A
\83C
\83x
\83\93\83g
\82Ì
\92è
\8b`
\82Æ
\83\81\83\
\83b
\83h
\82Ì
\8cÄ
\82Ñ
\8fo
\82µ
\82ð
\8ds
\82¢
\81A
\83A
\83v
\83\8a\83P
\81[
\83V
\83\87\83\93<BR/>
\r
1367 \82ª
\81A
\83C
\83x
\83\93\83g
\82É
\89\9e\93\9a\82·
\82é
\83\81\83\
\83b
\83h
\82Ì
\92è
\8b`
\82Æ
\81A
\82»
\82Ì
\83\81\83\
\83b
\83h
\82Ì
\93o
\98^
\82ð
\8ds
\82¢
\82Ü
\82·
\81B</DIV>
\r
1368 <DIV id="text200_40" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10241px; line-height:15px; white-space:nowrap">
\r
1369 \92Ê
\8fí
\81A
\83\89\83C
\83u
\83\89\83\8a\82É
\82 \82é
\83N
\83\89\83X
\82ª
\81A
\83C
\83x
\83\93\83g
\82ð
\92è
\8b`
\82µ
\82Ü
\82·
\81B</DIV>
\r
1370 <DIV id="text200_41" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:317px; margin-top:9937px; line-height:15px; white-space:nowrap">
\r
1371 \83\89\83C
\83u
\83\89\83\8a\82Ì
\92\86 \81i
\83C
\83x
\83\93\83g
\94
\90¶
\8c³
\81j</DIV>
\r
1372 <DIV id="text200_42" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:425px; margin-top:9997px; line-height:15px; white-space:nowrap">
\r
1373 \83A
\83v
\83\8a\83P
\81[
\83V
\83\87\83\93</DIV>
\r
1374 <DIV id="text200_43" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:59px; margin-top:9984px; line-height:15px; white-space:nowrap">
\r
1375 \8cÄ
\82Ñ
\8fo
\82µ</DIV>
\r
1376 <DIV id="text200_44" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10711px; line-height:15px; white-space:nowrap">
\r
1377 \83A
\83v
\83\8a\83P
\81[
\83V
\83\87\83\93\82ª
\92è
\8b`
\82·
\82é ClassA
\83N
\83\89\83X
\82ª
\89\9e\93\9a\82·
\82é
\8fê
\8d\87\81F</DIV>
\r
1378 <DIV id="text200_45" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10504px; line-height:15px; white-space:nowrap">
\r
1379 \83A
\83v
\83\8a\83P
\81[
\83V
\83\87\83\93\82ª
\92è
\8b`
\82·
\82é OnEventX
\8aÖ
\90\94\82ª
\89\9e\93\9a\82·
\82é
\8fê
\8d\87\81F</DIV>
\r
1380 <v:rect style="position:absolute; margin-left:41px; margin-top:10524px; width:298px; height:160px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1381 <DIV id="text200_46" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:49px; margin-top:10530px; line-height:15px; white-space:nowrap">
\r
1382 Sub main()<BR/>
\r
1383 Dim obj : Set obj = new ClassE<BR/>
\r
1385 obj.OnEventX.Add GetRef( "OnEventX" ), Empty<BR/>
\r
1386 obj.Run '// call OnEventX<BR/>
\r
1389 Sub OnEventX( Dummy, Caller, Args )<BR/>
\r
1390 WScipt.Echo "Responded"<BR/>
\r
1392 <DIV id="text200_47" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:145px; margin-top:10651px; line-height:13px; white-space:nowrap">
\r
1394 <DIV id="text200_48" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:223px; margin-top:10576px; line-height:13px; white-space:nowrap">
\r
1396 <DIV id="text200_49" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:79px; margin-top:10636px; line-height:13px; white-space:nowrap">
\r
1398 <DIV id="text200_50" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:116px; margin-top:10888px; line-height:13px; white-space:nowrap">
\r
1400 <DIV id="text200_51" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:85px; margin-top:10576px; line-height:13px; white-space:nowrap">
\r
1402 <DIV id="text200_52" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:139px; margin-top:10576px; line-height:13px; white-space:nowrap">
\r
1403 <A href="vbs_memo_14.html#EventResponders_Add">
\r
1405 <DIV id="text200_53" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:200px; margin-top:10290px; line-height:13px; white-space:nowrap">
\r
1406 <A href="vbs_memo_14.html#EventResponders_ex">
\r
1407 EventResponders</A></DIV>
\r
1408 <DIV id="text200_54" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:170px; margin-top:10888px; line-height:13px; white-space:nowrap">
\r
1409 <A href="vbs_memo_14.html#EventResponders_Add">
\r
1411 <DIV id="text200_55" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:146px; margin-top:11214px; line-height:13px; white-space:nowrap">
\r
1412 <A href="vbs_memo_14.html#EventResponders_Calls">
\r
1414 <DIV id="text200_56" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:101px; margin-top:10123px; line-height:15px; white-space:nowrap">
\r
1415 \81¨ T_Item
\83t
\83H
\83\8b\83_</DIV>
\r
1416 <DIV id="text200_57" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:10123px; line-height:15px; white-space:nowrap">
\r
1417 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1418 <DIV id="text200_58" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:269px; margin-top:10123px; line-height:15px; white-space:nowrap">
\r
1419 vbslib
\82È
\82µ
\94Å</DIV>
\r
1420 <DIV id="text200_59" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:101px; margin-top:10143px; line-height:15px; white-space:nowrap">
\r
1421 \81¨ T_Item_vbslib
\83t
\83H
\83\8b\83_</DIV>
\r
1422 <DIV id="text200_60" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:269px; margin-top:10143px; line-height:15px; white-space:nowrap">
\r
1423 vbslib
\8eg
\97p
\94Å</DIV>
\r
1424 <DIV id="text200_61" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:110px; margin-top:11169px; line-height:13px; white-space:nowrap">
\r
1425 <A href="#vbsool_event_declare">
\r
1426 OnEventX</A></DIV>
\r
1427 <DIV id="text200_62" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:326px; margin-top:10088px; line-height:15px; white-space:nowrap">
\r
1428 <A href="..\vbslib.files\vbslib_23.html#EventResponders">
\r
1429 \81¨
\81ivbslib
\8eg
\97p
\94Å
\81j</A></DIV>
\r
1430 <DIV id="text200_63" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11403px; line-height:15px; white-space:nowrap">
\r
1431 <A href="http://d.hatena.ne.jp/m-hiyama/20071205/1196838087" target="_blank">
\r
1432 \81¨
\83C
\83x
\83\93\83g
\83\82\83f
\83\8b\82Ì
\8aT
\94O
\82Æ
\97p
\8cê
\96@
\82ª
\8d¬
\97\90\82µ
\82Ä
\82¢
\82é
\82Ì
\82Å
\81A
\83C
\83\89\83C
\83\89\83C
\82·
\82é
\82ñ
\82Å
\82·
\82ª (Web)</A></DIV>
\r
1434 <v:line from="0,9735" to="585,9735"/>
\r
1435 <v:line from="585,9735" to="585,11558"/>
\r
1436 <v:line from="585,11558" to="0,11558"/>
\r
1437 <v:line from="0,11558" to="0,9735"/>
\r
1439 <DIV style="position:absolute; margin-left:0px; margin-top:11558px;">
\r
1440 <A id="svgcats_vml_p200" class="to_tree" onClick="selectTreeElem( '200' );">
\81©</A></DIV>
\r
1441 <DIV style="position:absolute; margin-left:20px; margin-top:11558px;">
\r
1442 <A id="page_group_bottom" href="vbs_memo_14.html#page_group_top" style="text-decoration:none;">
\81«</A></DIV>
\r
1447 <TABLE height="100%" style="position:absolute; margin-top:-9999px"><TR><TD></TD></TR></TABLE>
\r
OSDN Git Service
