1 <HTML lang="ja" xmlns:v="urn:schemas-microsoft-com:vml">
\r
4 <meta http-equiv="Content-Type" content="text/html; charset=shift_jis">
\r
5 <TITLE>vbslib</TITLE>
\r
7 <STYLE type="text/css">
\r
8 <!-- v\:* { behavior: url(#default#VML); } -->
\r
9 A.to_tree { color:black; }
\r
10 A:visited { color:blue }
\r
11 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->
\r
12 div.tooltip { color:blue; }
\r
13 div.tooltip textarea { display:none; margin-top:-5px; overflow:hidden; }
\r
14 <!-- end of [PATCH_OF:urlrep_tooltip] -->
\r
17 <SCRIPT type="text/javascript">
\r
20 if ( !document.getElementsByTagName ) return;
\r
22 divs = document.getElementsByTagName( "A" );
\r
23 for ( i = 0; i < divs.length; i++ ) {
\r
24 if ( divs[i].className == "to_tree" ) {
\r
25 divs[i].style.color = "blue";
\r
26 divs[i].style.cursor = "hand";
\r
31 function selectTreeElem( num )
\r
33 if ( parent.frames.length == 0 ) {
\r
34 location.href = "../vbslib.html?f1=vbslib.files/vbslib_tree.html&sub1=svgcats_index_p" + num +
\r
35 "&f2=vbslib.files/vbslib_06.html&sub2=svgcats_vml_p" + num;
\r
38 tree_url = parent.tree.location.href;
\r
39 i1 = tree_url.lastIndexOf( "/" );
\r
40 i2 = tree_url.lastIndexOf( "\\" );
\r
41 if ( i2 > i1 ) i1 = i2;
\r
42 fname = tree_url.substring( i1 + 1 );
\r
43 i1 = fname.lastIndexOf( "#" );
\r
44 if ( i1 >= 0 ) fname = fname.substring( 0, i1 );
\r
45 fname2 = "vbslib.files/vbslib_tree.html";
\r
46 i1 = fname2.lastIndexOf( "/" );
\r
47 i2 = fname2.lastIndexOf( "\\" );
\r
48 if ( i2 > i1 ) i1 = i2;
\r
49 fname2 = fname2.substring( i1 + 1 );
\r
50 if ( fname == fname2 )
\r
51 parent.tree.selectTreeElem( "svgcats_index_p" + num );
\r
53 location.href = "../vbslib.html?f1=vbslib.files/vbslib_tree.html&sub1=svgcats_index_p" + num +
\r
54 "&f2=vbslib.files/vbslib_06.html&sub2=svgcats_vml_p" + num;
\r
58 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->
\r
59 function over( text, value, cols ){ text.style.display = "inline";
\r
60 text.cols=cols; text.rows=1; text.value=value; text.focus(); text.select(); }
\r
61 function out( text ){ text.style.display = "none"; }
\r
62 <!-- end of [PATCH_OF:urlrep_tooltip] -->
\r
68 <BODY bgcolor="#CCDDCC" onLoad="onLoad();">
\r
70 <DIV style="position:absolute; margin-left:0; margin-top:0; color:red; font-size:8pt;">
\r
71 (for Internet Explorer)</DIV>
\r
72 <v:rect style="position:absolute; margin-left:0; margin-top:0; width:130; height:16;" fillcolor="white" strokecolor="white"/>
\r
78 <DIV style="position:absolute; margin-left:0; margin-top:-16;">
\r
79 <A id="svgcats_vml_p126" class="to_tree" onClick="selectTreeElem( '126' );">
\81©</A></DIV>
\r
80 <DIV style="position:absolute; margin-left:40; margin-top:-13;">
\r
81 <A href="#svgcats_vml_p127" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
82 <DIV style="position:absolute; margin-left:58; margin-top:-13;">
\r
83 <A href="vbslib_05.html#svgcats_vml_p125" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
84 <DIV style="position:absolute; margin-left:20; margin-top:-16;">
\r
85 <A id="page_group_top" href="vbslib_05.html#page_group_bottom" style="text-decoration:none;">
\81ª</A></DIV>
\r
86 <v:rect style="position:absolute; margin-left:0; margin-top:0; width:533; height:1124;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
87 <DIV id="text126_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:17; line-height:15px; white-space:nowrap">
\r
88 <A name="ShakerSort">
\r
89 ShakerSort</A></DIV>
\r
90 <v:rect style="position:absolute; margin-left:23; margin-top:44; width:478; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
91 <DIV id="text126_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:31; margin-top:50; line-height:15px; white-space:nowrap">
\r
92 Sub ShakerSort( Arr as array of Object, iLeft as integer, iRight as integer,<BR/>
\r
93 CompareFunc as function, Param as variant )</DIV>
\r
94 <DIV id="text126_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31; margin-top:127; line-height:15px; white-space:nowrap">
\r
95 \81y
\88ø
\90\94\81z</DIV>
\r
96 <DIV id="text126_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:95; margin-top:127; line-height:15px; white-space:nowrap">
\r
98 <DIV id="text126_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:95; margin-top:146; line-height:15px; white-space:nowrap">
\r
100 <DIV id="text126_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:188; margin-top:127; line-height:15px; white-space:nowrap">
\r
101 \83\
\81[
\83g
\82·
\82é
\94z
\97ñ
\81B</DIV>
\r
102 <DIV id="text126_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:188; margin-top:146; line-height:15px; white-space:nowrap">
\r
103 \83\
\81[
\83g
\82·
\82é
\94Í
\88Í
\81B
\94z
\97ñ
\94Ô
\8d\86\82Ì
\8dÅ
\8f¬
\92l</DIV>
\r
104 <DIV id="text126_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31; margin-top:99; line-height:15px; white-space:nowrap">
\r
105 \94z
\97ñ
\82ð
\83V
\83F
\81[
\83J
\81[
\83\
\81[
\83g
\82µ
\82Ü
\82·
\81B
\88À
\92è
\83\
\81[
\83g
\82Å
\82·
\81B</DIV>
\r
106 <DIV id="text126_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:188; margin-top:165; line-height:15px; white-space:nowrap">
\r
107 \83\
\81[
\83g
\82·
\82é
\94Í
\88Í
\81B
\94z
\97ñ
\94Ô
\8d\86\82Ì
\8dÅ
\91å
\92l</DIV>
\r
108 <DIV id="text126_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:95; margin-top:165; line-height:15px; white-space:nowrap">
\r
110 <DIV id="text126_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:95; margin-top:184; line-height:15px; white-space:nowrap">
\r
112 <DIV id="text126_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:188; margin-top:184; line-height:15px; white-space:nowrap">
\r
113 \94ä
\8ar
\8aÖ
\90\94</DIV>
\r
114 <DIV id="text126_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:95; margin-top:203; line-height:15px; white-space:nowrap">
\r
116 <DIV id="text126_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:188; margin-top:203; line-height:15px; white-space:nowrap">
\r
117 compare_func
\82Ì
\91æ3
\88ø
\90\94</DIV>
\r
118 <v:rect style="position:absolute; margin-left:33; margin-top:261; width:412; height:325;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
119 <DIV id="text126_15" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:41; margin-top:267; line-height:15px; white-space:nowrap">
\r
120 Option Explicit<BR/>
\r
122 Class ClassA : Public id : End Class<BR/>
\r
124 Redim arr(5)<BR/>
\r
125 Set arr(1) = new ClassA : arr(1).id = 6<BR/>
\r
126 Set arr(2) = new ClassA : arr(2).id = 3<BR/>
\r
127 Set arr(3) = new ClassA : arr(3).id = 4<BR/>
\r
128 Set arr(4) = new ClassA : arr(4).id = 4<BR/>
\r
129 Set arr(5) = new ClassA : arr(5).id = 1<BR/>
\r
132 ShakerSort arr, 1, UBound( arr ), GetRef("CmpFunc1"), Empty<BR/>
\r
135 WScript.Echo arr(1).id &","& arr(2).id &","& arr(3).id &","& _<BR/>
\r
136 arr(4).id &","& arr(5).id<BR/>
\r
138 Function CmpFunc1( left, right, param )<BR/>
\r
139 CmpFunc1 = left.id - right.id '//
\8d~
\8f\87\82È
\82ç right.id - left.id<BR/>
\r
141 <DIV id="text126_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:31; margin-top:239; line-height:15px; white-space:nowrap">
\r
142 \83T
\83\93\83v
\83\8b</DIV>
\r
143 <DIV id="text126_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:138; margin-top:17; line-height:15px; white-space:nowrap">
\r
145 <DIV id="text126_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:73; margin-top:1076; line-height:15px; white-space:nowrap">
\r
146 \81¨ [T_ShakerSort] ShakerSort
\82Ì
\83e
\83X
\83g</DIV>
\r
147 <DIV id="text126_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:73; margin-top:1024; line-height:15px; white-space:nowrap">
\r
148 <A href="%usb_mem_e%\MyDoc\programming\
\83v
\83\8d\83O
\83\89\83~
\83\93\83O
\8c¾
\8cê
\81A
\8aÂ
\8b«\
\83A
\83\8b\83S
\83\8a\83Y
\83\80\
\83\
\81[
\83g.svg#ShakerSort" style="text-decoration: none">
\r
149 \81¨
\83V
\83F
\81[
\83J
\81[
\83\
\81[
\83g (ShakerSort)</A></DIV>
\r
150 <v:rect style="position:absolute; margin-left:33; margin-top:622; width:424; height:400;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
151 <DIV id="text126_20" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:41; margin-top:628; line-height:15px; white-space:nowrap">
\r
152 Dim line<BR/>
\r
153 ReDim lines(-1)<BR/>
\r
154 Set f = OpenForRead( target_result_txt )<BR/>
\r
155 Do Until f.AtEndOfStream<BR/>
\r
156 Set line = new String1<BR/>
\r
157 line.s = f.ReadLine()<BR/>
\r
158 ReDim Preserve lines( UBound( lines ) + 1 )<BR/>
\r
159 Set lines( UBound( lines ) ) = line<BR/>
\r
161 f = Empty<BR/>
\r
163 ShakerSort lines, 0, UBound( lines ), GetRef("StrCmpFunc"), Empty<BR/>
\r
165 Function StrCmpFunc( left, right, param )<BR/>
\r
166 If left.s < right.s Then<BR/>
\r
167 StrCmpFunc = +1<BR/>
\r
168 ElseIf left.s > right.s Then<BR/>
\r
169 StrCmpFunc = -1<BR/>
\r
171 StrCmpFunc = 0<BR/>
\r
175 Class String1<BR/>
\r
176 Public s<BR/>
\r
178 <DIV id="text126_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:603; line-height:15px; white-space:nowrap">
\r
179 \95¶
\8e\9a\97ñ
\82ð
\8f¸
\8f\87\82É
\83\
\81[
\83g
\82·
\82é
\83T
\83\93\83v
\83\8b</DIV>
\r
180 <DIV id="text126_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#FF0000; margin-left:282; margin-top:127; line-height:15px; white-space:nowrap">
\r
181 \94z
\97ñ
\82Ì
\97v
\91f
\82Í
\83I
\83u
\83W
\83F
\83N
\83g
\82Å
\82 \82é
\82±
\82Æ
\81B</DIV>
\r
182 <DIV id="text126_23" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:73; margin-top:1044; line-height:15px; white-space:nowrap">
\r
183 \81¨ PArray_doShakerSort (clib)</DIV>
\r
184 <DIV id="text126_24" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:31; margin-top:1076; line-height:15px; white-space:nowrap">
\r
186 <DIV id="text126_25" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:31; margin-top:1024; line-height:15px; white-space:nowrap">
\r
189 <v:line style="position:absolute;" from="0,0" to="533,0" strokecolor="#000000" strokeweight="1pt"/>
\r
190 <v:line style="position:absolute;" from="533,0" to="533,1124" strokecolor="#000000" strokeweight="1pt"/>
\r
191 <v:line style="position:absolute;" from="533,1124" to="0,1124" strokecolor="#000000" strokeweight="1pt"/>
\r
192 <v:line style="position:absolute;" from="0,1124" to="0,0" strokecolor="#000000" strokeweight="1pt"/>
\r
198 <DIV style="position:absolute; margin-left:0; margin-top:1124;">
\r
199 <A id="svgcats_vml_p127" class="to_tree" onClick="selectTreeElem( '127' );">
\81©</A></DIV>
\r
200 <DIV style="position:absolute; margin-left:40; margin-top:1127;">
\r
201 <A href="#svgcats_vml_p128" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
202 <DIV style="position:absolute; margin-left:58; margin-top:1127;">
\r
203 <A href="#svgcats_vml_p126" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
204 <v:rect style="position:absolute; margin-left:0; margin-top:1140; width:439; height:159;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
205 <DIV id="text127_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:1157; line-height:15px; white-space:nowrap">
\r
208 <v:rect style="position:absolute; margin-left:28; margin-top:1184; width:262; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
209 <DIV id="text127_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:1191; line-height:13px; white-space:nowrap">
\r
210 Function CInt2( v as string ) as integer</DIV>
\r
211 <DIV id="text127_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:1251; line-height:15px; white-space:nowrap">
\r
212 CInt
\82Å
\83G
\83\89\81[
\82ª
\94
\90¶
\82·
\82é
\92l
\82ð v
\82É
\8ew
\92è
\82µ
\82½
\82Æ
\82«
\82Í
\81A0
\82ð
\95Ô
\82µ
\82Ü
\82·
\81B</DIV>
\r
213 <DIV id="text127_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:1222; line-height:15px; white-space:nowrap">
\r
214 \95¶
\8e\9a\97ñ
\82ð
\90\94\92l
\82É
\95Ï
\8a·
\82µ
\82Ü
\82·
\81B</DIV>
\r
215 <DIV id="text127_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:120; margin-top:1157; line-height:15px; white-space:nowrap">
\r
218 <v:line style="position:absolute;" from="0,1140" to="439,1140" strokecolor="#000000" strokeweight="1pt"/>
\r
219 <v:line style="position:absolute;" from="439,1140" to="439,1299" strokecolor="#000000" strokeweight="1pt"/>
\r
220 <v:line style="position:absolute;" from="439,1299" to="0,1299" strokecolor="#000000" strokeweight="1pt"/>
\r
221 <v:line style="position:absolute;" from="0,1299" to="0,1140" strokecolor="#000000" strokeweight="1pt"/>
\r
227 <DIV style="position:absolute; margin-left:0; margin-top:1299;">
\r
228 <A id="svgcats_vml_p128" class="to_tree" onClick="selectTreeElem( '128' );">
\81©</A></DIV>
\r
229 <DIV style="position:absolute; margin-left:40; margin-top:1302;">
\r
230 <A href="#svgcats_vml_p129" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
231 <DIV style="position:absolute; margin-left:58; margin-top:1302;">
\r
232 <A href="#svgcats_vml_p127" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
233 <v:rect style="position:absolute; margin-left:0; margin-top:1315; width:576; height:357;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
234 <DIV id="text128_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:1332; line-height:15px; white-space:nowrap">
\r
235 <A name="MeltQuot">
\r
237 <DIV id="text128_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:70; margin-top:1626; line-height:15px; white-space:nowrap">
\r
238 <A href="vbslib_04.html#MeltCSV" style="text-decoration: none">
\r
239 \81¨ MeltCSV</A></DIV>
\r
240 <DIV id="text128_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32; margin-top:1626; line-height:15px; white-space:nowrap">
\r
242 <DIV id="text128_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:1395; line-height:15px; white-space:nowrap">
\r
243 " "
\82Å
\88Í
\82Ü
\82ê
\82½
\95\94\95ª
\82ð
\8eæ
\82è
\8fo
\82·
\81B</DIV>
\r
244 <v:rect style="position:absolute; margin-left:16; margin-top:1362; width:442; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
245 <DIV id="text128_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:24; margin-top:1369; line-height:13px; white-space:nowrap">
\r
246 Function MeltQuot( Line as string, in_out_Start as integer ) as string</DIV>
\r
247 <v:rect style="position:absolute; margin-left:28; margin-top:1504; width:286; height:100;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
248 <DIV id="text128_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:1510; line-height:15px; white-space:nowrap">
\r
251 s = MeltQuot( line, i )<BR/>
\r
252 If not IsEmoty( s ) Then
\81is
\82ð
\8eg
\82Á
\82½
\8f\88\97\9d\81j<BR/>
\r
253 If i = 0 Then Exit Do<BR/>
\r
255 <DIV id="text128_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:1419; line-height:15px; white-space:nowrap">
\r
256 \81y
\88ø
\90\94\81z</DIV>
\r
257 <DIV id="text128_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:1419; line-height:15px; white-space:nowrap">
\r
259 <DIV id="text128_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:1438; line-height:15px; white-space:nowrap">
\r
261 <DIV id="text128_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:180; margin-top:1419; line-height:15px; white-space:nowrap">
\r
262 \95¶
\8e\9a\97ñ
\91S
\91Ì</DIV>
\r
263 <DIV id="text128_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:180; margin-top:1438; line-height:15px; white-space:nowrap">
\r
264 \81i
\93ü
\97Í
\81j
\8eæ
\82è
\8fo
\82µ
\82ð
\8aJ
\8en
\82·
\82é
\95¶
\8e\9a\82Ì
\88Ê
\92u
\81A
\81i
\8fo
\97Í
\81j
\8e\9f\82É
\8eæ
\82è
\8fo
\82·
\81`</DIV>
\r
265 <DIV id="text128_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:1457; line-height:15px; white-space:nowrap">
\r
267 <DIV id="text128_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:180; margin-top:1457; line-height:15px; white-space:nowrap">
\r
268 " "
\82Å
\88Í
\82Ü
\82ê
\82½
\95\94\95ª
\95¶
\8e\9a\97ñ
\81BEmpty=
\8d\80\96Ú
\82É
\92l
\82ª
\96³
\82¢</DIV>
\r
269 <DIV id="text128_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:26; margin-top:1484; line-height:15px; white-space:nowrap">
\r
270 \83T
\83\93\83v
\83\8b</DIV>
\r
272 <v:line style="position:absolute;" from="0,1315" to="576,1315" strokecolor="#000000" strokeweight="1pt"/>
\r
273 <v:line style="position:absolute;" from="576,1315" to="576,1672" strokecolor="#000000" strokeweight="1pt"/>
\r
274 <v:line style="position:absolute;" from="576,1672" to="0,1672" strokecolor="#000000" strokeweight="1pt"/>
\r
275 <v:line style="position:absolute;" from="0,1672" to="0,1315" strokecolor="#000000" strokeweight="1pt"/>
\r
281 <DIV style="position:absolute; margin-left:0; margin-top:1672;">
\r
282 <A id="svgcats_vml_p129" class="to_tree" onClick="selectTreeElem( '129' );">
\81©</A></DIV>
\r
283 <DIV style="position:absolute; margin-left:40; margin-top:1675;">
\r
284 <A href="#svgcats_vml_p130" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
285 <DIV style="position:absolute; margin-left:58; margin-top:1675;">
\r
286 <A href="#svgcats_vml_p128" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
287 <v:rect style="position:absolute; margin-left:0; margin-top:1688; width:309; height:189;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
288 <DIV id="text129_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:1705; line-height:15px; white-space:nowrap">
\r
289 <A name="CreateGuid">
\r
290 CreateGuid</A></DIV>
\r
291 <v:rect style="position:absolute; margin-left:28; margin-top:1732; width:208; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
292 <DIV id="text129_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:1739; line-height:13px; white-space:nowrap">
\r
293 Function CreateGuid() as string</DIV>
\r
294 <DIV id="text129_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:1770; line-height:15px; white-space:nowrap">
\r
295 GUID
\82ð
\90¶
\90¬
\82µ
\82Ü
\82·
\81B</DIV>
\r
296 <v:rect style="position:absolute; margin-left:45; margin-top:1820; width:232; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
297 <DIV id="text129_4" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53; margin-top:1827; line-height:13px; white-space:nowrap">
\r
298 2D7E3038-E395-460A-86CC-C8AB3C3D5D54</DIV>
\r
299 <DIV id="text129_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:1799; line-height:15px; white-space:nowrap">
\r
300 \95Ô
\82è
\92l
\82Ì
\97á
\81F</DIV>
\r
301 <DIV id="text129_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:145; margin-top:1705; line-height:15px; white-space:nowrap">
\r
304 <v:line style="position:absolute;" from="0,1688" to="309,1688" strokecolor="#000000" strokeweight="1pt"/>
\r
305 <v:line style="position:absolute;" from="309,1688" to="309,1877" strokecolor="#000000" strokeweight="1pt"/>
\r
306 <v:line style="position:absolute;" from="309,1877" to="0,1877" strokecolor="#000000" strokeweight="1pt"/>
\r
307 <v:line style="position:absolute;" from="0,1877" to="0,1688" strokecolor="#000000" strokeweight="1pt"/>
\r
313 <DIV style="position:absolute; margin-left:0; margin-top:1877;">
\r
314 <A id="svgcats_vml_p130" class="to_tree" onClick="selectTreeElem( '130' );">
\81©</A></DIV>
\r
315 <DIV style="position:absolute; margin-left:40; margin-top:1880;">
\r
316 <A href="#svgcats_vml_p131" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
317 <DIV style="position:absolute; margin-left:58; margin-top:1880;">
\r
318 <A href="#svgcats_vml_p129" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
319 <v:rect style="position:absolute; margin-left:0; margin-top:1893; width:492; height:669;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
320 <DIV id="text130_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:1910; line-height:15px; white-space:nowrap">
\r
321 <A name="get_Object">
\r
322 get_Object</A></DIV>
\r
323 <v:rect style="position:absolute; margin-left:25; margin-top:1942; width:304; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
324 <DIV id="text130_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:33; margin-top:1949; line-height:13px; white-space:nowrap">
\r
325 Function get_Object( Name as string ) as Object</DIV>
\r
326 <DIV id="text130_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:1977; line-height:15px; white-space:nowrap">
\r
327 \90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\81i
\82Ü
\82½
\82Í
\89\89\8eZ
\8aí
\93I
\82È
\83I
\83u
\83W
\83F
\83N
\83g
\81j
\82ð
\8eæ
\93¾
\82µ
\82Ü
\82·
\81B</DIV>
\r
328 <DIV id="text130_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:2003; line-height:15px; white-space:nowrap">
\r
329 \81y
\88ø
\90\94\81z</DIV>
\r
330 <DIV id="text130_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:91; margin-top:2003; line-height:15px; white-space:nowrap">
\r
332 <DIV id="text130_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:157; margin-top:2003; line-height:15px; white-space:nowrap">
\r
333 \8eæ
\93¾
\82·
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\83N
\83\89\83X
\96¼</DIV>
\r
334 <DIV id="text130_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:91; margin-top:2022; line-height:15px; white-space:nowrap">
\r
336 <DIV id="text130_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:157; margin-top:2022; line-height:15px; white-space:nowrap">
\r
337 \83I
\83u
\83W
\83F
\83N
\83g</DIV>
\r
338 <DIV id="text130_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:2107; line-height:15px; white-space:nowrap">
\r
339 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
340 <DIV id="text130_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:74; margin-top:2492; line-height:15px; white-space:nowrap">
\r
341 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_08.html#get_ClassA" style="text-decoration: none">
\r
342 \81¨ get_ClassA, get_Object :
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\81A
\89\89\8eZ
\8aí
\97v
\8b\81</A></DIV>
\r
343 <DIV id="text130_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:29; margin-top:2492; line-height:15px; white-space:nowrap">
\r
345 <v:rect style="position:absolute; margin-left:56; margin-top:2127; width:262; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
346 <DIV id="text130_12" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:64; margin-top:2133; line-height:15px; white-space:nowrap">
\r
347 Dim name : name = "ClassA"<BR/>
\r
348 Dim obj : Set obj = get_Object( name )</DIV>
\r
349 <v:rect style="position:absolute; margin-left:43; margin-top:2356; width:334; height:115;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
350 <DIV id="text130_13" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:2362; line-height:15px; white-space:nowrap">
\r
351 Dim g_ClassA<BR/>
\r
353 Function get_ClassA() '// has_interface_of ClassI<BR/>
\r
354 If IsEmpty( g_ClassA ) Then _<BR/>
\r
355 Set g_ClassA = new ClassA : ErrCheck<BR/>
\r
356 Set get_ClassA = g_ClassA<BR/>
\r
358 <DIV id="text130_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:2302; line-height:15px; white-space:nowrap">
\r
359 get_Object
\82Í
\81A
\8b@
\94\
\93I
\82É
\82Í
\81A"get_" + Name
\82Ì
\8aÖ
\90\94\82ð
\8cÄ
\82Ñ
\8fo
\82·
\82¾
\82¯
\82È
\82Ì
\82Å
\81A<BR/>
\r
360 \95Ê
\93r
\8aÖ
\90\94\82ð
\97p
\88Ó
\82·
\82é
\95K
\97v
\82ª
\82 \82è
\82Ü
\82·
\81B<BR/>
\r
361 \82½
\82Æ
\82¦
\82Î
\81AName = "ClassA"
\82È
\82ç
\81Aget_ClassA
\82Ì
\8aÖ
\90\94\82ª
\8cÄ
\82Î
\82ê
\82Ü
\82·
\81B</DIV>
\r
362 <DIV id="text130_15" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:333; margin-top:2393; line-height:13px; white-space:nowrap">
\r
364 <DIV id="text130_16" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:147; margin-top:2393; line-height:13px; white-space:nowrap">
\r
366 <DIV id="text130_17" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:147; margin-top:2408; line-height:13px; white-space:nowrap">
\r
368 <DIV id="text130_18" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:189; margin-top:2423; line-height:13px; white-space:nowrap">
\r
370 <DIV id="text130_19" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:189; margin-top:2438; line-height:13px; white-space:nowrap">
\r
372 <DIV id="text130_20" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:111; margin-top:2423; line-height:13px; white-space:nowrap">
\r
374 <DIV id="text130_21" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:111; margin-top:2438; line-height:13px; white-space:nowrap">
\r
376 <DIV id="text130_22" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:93; margin-top:2363; line-height:13px; white-space:nowrap">
\r
378 <DIV id="text130_23" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:145; margin-top:1910; line-height:15px; white-space:nowrap">
\r
380 <DIV id="text130_24" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:2187; line-height:15px; white-space:nowrap">
\r
381 Name
\82ª
\95Ï
\90\94\82Å
\82Í
\82È
\82¢
\82Æ
\82«
\82Í
\81A
\92¼
\90Ú get_ClassA
\82ð
\8cÄ
\82Ñ
\8fo
\82·
\82±
\82Æ
\82ª
\82Å
\82«
\82Ü
\82·
\81B</DIV>
\r
382 <v:rect style="position:absolute; margin-left:56; margin-top:2209; width:226; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
383 <DIV id="text130_25" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:64; margin-top:2216; line-height:13px; white-space:nowrap">
\r
384 Dim obj : Set obj = get_ClassA()</DIV>
\r
385 <DIV id="text130_26" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:2250; line-height:15px; white-space:nowrap">
\r
386 new
\82Å
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\90¶
\90¬
\82·
\82é
\82Æ
\81Aget_ClassA
\82Å
\8eæ
\93¾
\82Å
\82«
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82Æ
\95Ê
\82Ì<BR/>
\r
387 \83C
\83\93\83X
\83^
\83\93\83X
\82É
\82È
\82è
\82Ü
\82·
\81B</DIV>
\r
388 <DIV id="text130_27" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#FF0000; margin-left:27; margin-top:2055; line-height:15px; white-space:nowrap">
\r
389 Name
\82ð
\93®
\93I
\82É
\95Ï
\82í
\82é
\82±
\82Æ
\82ª
\82È
\82¢
\82Æ
\82«
\82Í
\81Aget_ClassA
\8aÖ
\90\94\82ð
\92¼
\90Ú
\8cÄ
\82Ñ
\8fo
\82µ
\82Ä<BR/>
\r
390 \82
\82¾
\82³
\82¢
\81B</DIV>
\r
391 <DIV id="text130_28" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:72; margin-top:2514; line-height:15px; white-space:nowrap">
\r
392 \81¨ T_GetObject.vbs [T_IncludeObjs1]</DIV>
\r
393 <DIV id="text130_29" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:29; margin-top:2514; line-height:15px; white-space:nowrap">
\r
396 <v:line style="position:absolute;" from="0,1893" to="492,1893" strokecolor="#000000" strokeweight="1pt"/>
\r
397 <v:line style="position:absolute;" from="492,1893" to="492,2562" strokecolor="#000000" strokeweight="1pt"/>
\r
398 <v:line style="position:absolute;" from="492,2562" to="0,2562" strokecolor="#000000" strokeweight="1pt"/>
\r
399 <v:line style="position:absolute;" from="0,2562" to="0,1893" strokecolor="#000000" strokeweight="1pt"/>
\r
405 <DIV style="position:absolute; margin-left:0; margin-top:2562;">
\r
406 <A id="svgcats_vml_p131" class="to_tree" onClick="selectTreeElem( '131' );">
\81©</A></DIV>
\r
407 <DIV style="position:absolute; margin-left:40; margin-top:2565;">
\r
408 <A href="#svgcats_vml_p132" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
409 <DIV style="position:absolute; margin-left:58; margin-top:2565;">
\r
410 <A href="#svgcats_vml_p130" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
411 <v:rect style="position:absolute; margin-left:0; margin-top:2578; width:578; height:424;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
412 <DIV id="text131_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:2595; line-height:15px; white-space:nowrap">
\r
413 <A name="get_ObjectFromFile">
\r
414 get_ObjectFromFile</A></DIV>
\r
415 <v:rect style="position:absolute; margin-left:31; margin-top:2627; width:484; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
416 <DIV id="text131_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:39; margin-top:2634; line-height:13px; white-space:nowrap">
\r
417 Function get_ObjectFromFile( ModulePath as string, Name as string ) as Object</DIV>
\r
418 <DIV id="text131_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:2662; line-height:15px; white-space:nowrap">
\r
419 \83X
\83N
\83\8a\83v
\83g
\83t
\83@
\83C
\83\8b\82ð
\83C
\83\93\83N
\83\8b\81[
\83h
\82µ
\82Ä
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82µ
\82Ü
\82·
\81B</DIV>
\r
420 <DIV id="text131_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:2688; line-height:15px; white-space:nowrap">
\r
421 \81y
\88ø
\90\94\81z</DIV>
\r
422 <DIV id="text131_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:2688; line-height:15px; white-space:nowrap">
\r
424 <DIV id="text131_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:2707; line-height:15px; white-space:nowrap">
\r
426 <DIV id="text131_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:196; margin-top:2688; line-height:15px; white-space:nowrap">
\r
427 \83X
\83N
\83\8a\83v
\83g
\83t
\83@
\83C
\83\8b\82Ì
\83p
\83X</DIV>
\r
428 <DIV id="text131_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:196; margin-top:2707; line-height:15px; white-space:nowrap">
\r
429 \8eæ
\93¾
\82·
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\83N
\83\89\83X
\96¼</DIV>
\r
430 <DIV id="text131_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:2726; line-height:15px; white-space:nowrap">
\r
432 <DIV id="text131_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:196; margin-top:2726; line-height:15px; white-space:nowrap">
\r
433 \8eæ
\93¾
\82µ
\82½
\83I
\83u
\83W
\83F
\83N
\83g</DIV>
\r
434 <v:rect style="position:absolute; margin-left:43; margin-top:2781; width:436; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
435 <DIV id="text131_11" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:2788; line-height:13px; white-space:nowrap">
\r
436 Dim m : Set m = get_ObjectFromFile( "Lib\SampleLib.vbs", "Sample" )</DIV>
\r
437 <DIV id="text131_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:2759; line-height:15px; white-space:nowrap">
\r
438 \83T
\83\93\83v
\83\8b\81F SampleLib.vbs
\83t
\83@
\83C
\83\8b\82Å
\92è
\8b`
\82³
\82ê
\82Ä
\82¢
\82é Sample
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\81B</DIV>
\r
439 <DIV id="text131_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:51; margin-top:2823; line-height:15px; white-space:nowrap">
\r
440 \8fã
\8bL
\83T
\83\93\83v
\83\8b\82Í
\81A
\89º
\8bL
\82Æ
\93¯
\82¶
\82Å
\82·
\81B</DIV>
\r
441 <v:rect style="position:absolute; margin-left:43; margin-top:2845; width:196; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
442 <DIV id="text131_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:2851; line-height:15px; white-space:nowrap">
\r
443 include "Lib\SampleLib.vbs"<BR/>
\r
444 Dim m : Set m = get_Sample()</DIV>
\r
445 <DIV id="text131_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:27; margin-top:2912; line-height:15px; white-space:nowrap">
\r
446 \83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\95\94\95ª
\82Í
\81A
\8b@
\94\
\93I
\82É
\82Í
\81A"get_" + Name
\82Ì
\8aÖ
\90\94\82ð
\8cÄ
\82Ñ
\8fo
\82·
\82¾
\82¯
\82È
\82Ì
\82Å
\81A<BR/>
\r
447 \83X
\83N
\83\8a\83v
\83g
\83t
\83@
\83C
\83\8b\82Ì
\92\86\82Å
\81A
\95Ê
\93r
\8aÖ
\90\94\82ð
\92è
\8b`
\82·
\82é
\95K
\97v
\82ª
\82 \82è
\82Ü
\82·
\81B
\8eQ
\8dl</DIV>
\r
448 <DIV id="text131_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:420; margin-top:2927; line-height:15px; white-space:nowrap">
\r
449 <A href="#get_Object" style="text-decoration: none">
\r
450 \81¨ get_Object</A></DIV>
\r
451 <DIV id="text131_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:186; margin-top:2595; line-height:15px; white-space:nowrap">
\r
453 <DIV id="text131_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:75; margin-top:2955; line-height:15px; white-space:nowrap">
\r
454 \81¨ T_GetObject.vbs get_ObjectFromFile [T_NewModule]</DIV>
\r
455 <DIV id="text131_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:27; margin-top:2955; line-height:15px; white-space:nowrap">
\r
458 <v:line style="position:absolute;" from="0,2578" to="578,2578" strokecolor="#000000" strokeweight="1pt"/>
\r
459 <v:line style="position:absolute;" from="578,2578" to="578,3002" strokecolor="#000000" strokeweight="1pt"/>
\r
460 <v:line style="position:absolute;" from="578,3002" to="0,3002" strokecolor="#000000" strokeweight="1pt"/>
\r
461 <v:line style="position:absolute;" from="0,3002" to="0,2578" strokecolor="#000000" strokeweight="1pt"/>
\r
467 <DIV style="position:absolute; margin-left:0; margin-top:3002;">
\r
468 <A id="svgcats_vml_p132" class="to_tree" onClick="selectTreeElem( '132' );">
\81©</A></DIV>
\r
469 <DIV style="position:absolute; margin-left:40; margin-top:3005;">
\r
470 <A href="#svgcats_vml_p133" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
471 <DIV style="position:absolute; margin-left:58; margin-top:3005;">
\r
472 <A href="#svgcats_vml_p131" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
473 <v:rect style="position:absolute; margin-left:0; margin-top:3018; width:590; height:622;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
474 <DIV id="text132_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:3035; line-height:15px; white-space:nowrap">
\r
475 <A name="get_ObjectsFromFile">
\r
476 get_ObjectsFromFile</A></DIV>
\r
477 <DIV id="text132_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:237; margin-top:3035; line-height:15px; white-space:nowrap">
\r
479 <v:rect style="position:absolute; margin-left:31; margin-top:3067; width:496; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
480 <DIV id="text132_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:39; margin-top:3073; line-height:15px; white-space:nowrap">
\r
481 Sub get_ObjectsFromFile( GetFuncs as string or Array of Function,<BR/>
\r
482 InterfaceName as string, out_Objs as Array of Object )</DIV>
\r
483 <DIV id="text132_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:3120; line-height:15px; white-space:nowrap">
\r
484 \90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\81E
\83X
\83N
\83\8a\83v
\83g
\83t
\83@
\83C
\83\8b\82ð
\82·
\82×
\82Ä
\8eæ
\93¾
\82µ
\82Ä
\88ê
\97\97\82Å
\82«
\82é
\82æ
\82¤
\82É
\82µ
\82Ü
\82·
\81B</DIV>
\r
485 <DIV id="text132_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:3146; line-height:15px; white-space:nowrap">
\r
486 \81y
\88ø
\90\94\81z</DIV>
\r
487 <DIV id="text132_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:3146; line-height:15px; white-space:nowrap">
\r
489 <DIV id="text132_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:3165; line-height:15px; white-space:nowrap">
\r
490 InterfaceName</DIV>
\r
491 <DIV id="text132_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:211; margin-top:3146; line-height:15px; white-space:nowrap">
\r
492 \83X
\83N
\83\8a\83v
\83g
\82Ì
\83p
\83X
\81A
\82Ü
\82½
\82Í include_objs
\82Ì out_GetFuncs</DIV>
\r
493 <DIV id="text132_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:211; margin-top:3165; line-height:15px; white-space:nowrap">
\r
494 Empty
\82Ü
\82½
\82Í
\81A
\8eæ
\93¾
\82·
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82ª
\8e\9d\82Â
\83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X</DIV>
\r
495 <DIV id="text132_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:3184; line-height:15px; white-space:nowrap">
\r
497 <DIV id="text132_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:211; margin-top:3184; line-height:15px; white-space:nowrap">
\r
498 \8eæ
\93¾
\82µ
\82½
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\94z
\97ñ</DIV>
\r
499 <v:rect style="position:absolute; margin-left:43; margin-top:3239; width:454; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
500 <DIV id="text132_12" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:3246; line-height:13px; white-space:nowrap">
\r
501 get_ObjectsFromFile "Lib\*_obj.vbs", "ClassI", m_Objs '// [out] m_Objs</DIV>
\r
502 <DIV id="text132_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:3217; line-height:15px; white-space:nowrap">
\r
503 \83T
\83\93\83v
\83\8b\81F
\83C
\83\93\83N
\83\8b\81[
\83h
\82Æ
\93¯
\8e\9e\82É
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é</DIV>
\r
504 <v:rect style="position:absolute; margin-left:43; margin-top:3306; width:478; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
505 <DIV id="text132_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:3312; line-height:15px; white-space:nowrap">
\r
506 include_objs "Lib\*_obj.vbs", Empty, m_CreateFuncs '// [out] m_CreateFuncs<BR/>
\r
507 get_ObjectsFromFile m_CreateFuncs, "ClassI", m_Objs '// [out] m_Objs</DIV>
\r
508 <DIV id="text132_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:3284; line-height:15px; white-space:nowrap">
\r
509 \83T
\83\93\83v
\83\8b\81F
\83C
\83\93\83N
\83\8b\81[
\83h
\82µ
\82½
\8cã
\82Å
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\81i
\83t
\83@
\83C
\83\8b\82ð
\91\96\8d¸
\82µ
\82È
\82¢
\81j</DIV>
\r
510 <v:rect style="position:absolute; margin-left:43; margin-top:3435; width:394; height:115;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
511 <DIV id="text132_16" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:3441; line-height:15px; white-space:nowrap">
\r
512 Sub get_StaticObjects( InterfaceName, out_Obj )<BR/>
\r
513 If IsEmpty( InterfaceName ) or InterfaceName = "ClassI" Then<BR/>
\r
514 Set out_Obj = get_ClassA()<BR/>
\r
515 ElseIf InterfaceName = "ClassI2" Then<BR/>
\r
516 out_Obj = Array( get_ClassA(), get_ClassB() )<BR/>
\r
519 <DIV id="text132_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:3376; line-height:15px; white-space:nowrap">
\r
520 \90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\88ê
\97\97\82Å
\82«
\82é
\82æ
\82¤
\82É
\82·
\82é
\82É
\82Í
\81A
\82»
\82ê
\82¼
\82ê
\82Ì
\83X
\83N
\83\8a\83v
\83g
\82Å
\81Aget_StaticObjects<BR/>
\r
521 \8aÖ
\90\94\82ð
\92è
\8b`
\82·
\82é
\95K
\97v
\82ª
\82 \82è
\82Ü
\82·
\81B get_ObjectsFromFile
\82â include_objs
\82Í
\81A
\95Ê
\82Ì
\83X
\83N
\83\8a\83v
\83g<BR/>
\r
522 \83t
\83@
\83C
\83\8b\82Å
\82 \82ê
\82Î
\81A
\93¯
\82¶
\8aÖ
\90\94\96¼
\82Å
\82à
\88Ù
\82È
\82é
\8aÖ
\90\94\83C
\83\93\83X
\83^
\83\93\83X
\82É
\82È
\82è
\82Ü
\82·
\81B</DIV>
\r
523 <DIV id="text132_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:74; margin-top:3570; line-height:15px; white-space:nowrap">
\r
524 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_08.html#get_StaticObjects" style="text-decoration: none">
\r
525 \81¨ get_StaticObjects :
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g</A></DIV>
\r
526 <DIV id="text132_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:35; margin-top:3570; line-height:15px; white-space:nowrap">
\r
528 <DIV id="text132_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:74; margin-top:3593; line-height:15px; white-space:nowrap">
\r
529 \81¨ T_GetObject.vbs [T_IncludeObjs2] [T_IncludeObjs3]</DIV>
\r
530 <DIV id="text132_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:35; margin-top:3593; line-height:15px; white-space:nowrap">
\r
533 <v:line style="position:absolute;" from="0,3018" to="590,3018" strokecolor="#000000" strokeweight="1pt"/>
\r
534 <v:line style="position:absolute;" from="590,3018" to="590,3640" strokecolor="#000000" strokeweight="1pt"/>
\r
535 <v:line style="position:absolute;" from="590,3640" to="0,3640" strokecolor="#000000" strokeweight="1pt"/>
\r
536 <v:line style="position:absolute;" from="0,3640" to="0,3018" strokecolor="#000000" strokeweight="1pt"/>
\r
542 <DIV style="position:absolute; margin-left:0; margin-top:3640;">
\r
543 <A id="svgcats_vml_p133" class="to_tree" onClick="selectTreeElem( '133' );">
\81©</A></DIV>
\r
544 <DIV style="position:absolute; margin-left:40; margin-top:3643;">
\r
545 <A href="#svgcats_vml_p134" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
546 <DIV style="position:absolute; margin-left:58; margin-top:3643;">
\r
547 <A href="#svgcats_vml_p132" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
548 <v:rect style="position:absolute; margin-left:0; margin-top:3656; width:616; height:499;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
549 <DIV id="text133_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:3673; line-height:15px; white-space:nowrap">
\r
550 <A name="include_objs">
\r
551 include_objs</A></DIV>
\r
552 <v:rect style="position:absolute; margin-left:31; margin-top:3705; width:550; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
553 <DIV id="text133_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:39; margin-top:3712; line-height:13px; white-space:nowrap">
\r
554 Sub include_objs( Wildcard as string, Flags as Empty, out_GetFuncs as Array of Funcion )</DIV>
\r
555 <DIV id="text133_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:3740; line-height:15px; white-space:nowrap">
\r
556 \90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\81E
\83X
\83N
\83\8a\83v
\83g
\83t
\83@
\83C
\83\8b\82ð
\83C
\83\93\83N
\83\8b\81[
\83h
\82µ
\82Ü
\82·
\81B</DIV>
\r
557 <DIV id="text133_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:3766; line-height:15px; white-space:nowrap">
\r
558 \81y
\88ø
\90\94\81z</DIV>
\r
559 <DIV id="text133_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:3766; line-height:15px; white-space:nowrap">
\r
561 <DIV id="text133_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:3785; line-height:15px; white-space:nowrap">
\r
563 <DIV id="text133_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:228; margin-top:3766; line-height:15px; white-space:nowrap">
\r
564 \83X
\83N
\83\8a\83v
\83g
\83t
\83@
\83C
\83\8b\82Ì
\83p
\83X
\81A
\82Ü
\82½
\82Í
\83t
\83H
\83\8b\83_
\83p
\83X</DIV>
\r
565 <DIV id="text133_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:228; margin-top:3785; line-height:15px; white-space:nowrap">
\r
566 Empty
\82ð
\8ew
\92è
\82µ
\82Ä
\82
\82¾
\82³
\82¢</DIV>
\r
567 <DIV id="text133_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:3804; line-height:15px; white-space:nowrap">
\r
569 <DIV id="text133_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:228; margin-top:3804; line-height:15px; white-space:nowrap">
\r
570 Empty
\81A
\82Ü
\82½
\82Í
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\8aÖ
\90\94\82Ì
\8fW
\8d\87</DIV>
\r
571 <DIV id="text133_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:4049; line-height:15px; white-space:nowrap">
\r
572 out_CreateFuncs
\82ª Empty
\82Å
\82Í
\82È
\82¢
\82Æ
\82«
\82Ì
\83T
\83\93\83v
\83\8b</DIV>
\r
573 <DIV id="text133_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:3915; line-height:15px; white-space:nowrap">
\r
574 include_objs
\82Í
\81A
\83C
\83\93\83N
\83\8b\81[
\83h
\82Ì
\82Ý
\8ds
\82¢
\82Ü
\82·
\81B
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\90¶
\90¬
\82Í
\81Anew
\82Å
\90¶
\90¬
\82·
\82é
\82©
\81A<BR/>
\r
575 get_ObjectsFromFile
\82Å
\8ds
\82¢
\82Ü
\82·
\81B</DIV>
\r
576 <DIV id="text133_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:166; margin-top:3673; line-height:15px; white-space:nowrap">
\r
578 <DIV id="text133_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:3964; line-height:15px; white-space:nowrap">
\r
579 \83T
\83\93\83v
\83\8b\81F Lib
\83t
\83H
\83\8b\83_
\82ð
\83C
\83\93\83N
\83\8b\81[
\83h
\82µ
\82Ä
\81A
\82»
\82Ì
\92\86\82Å
\92è
\8b`
\82³
\82ê
\82½ ClassA
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\90¶
\90¬
\82·
\82é
\81B</DIV>
\r
580 <v:rect style="position:absolute; margin-left:43; margin-top:3986; width:286; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
581 <DIV id="text133_15" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:3992; line-height:15px; white-space:nowrap">
\r
582 include_objs "Lib\*_obj.vbs", Empty, Empty<BR/>
\r
583 Set obj : Set obj = new ClassA : ErrCheck</DIV>
\r
584 <DIV id="text133_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:340; margin-top:4049; line-height:15px; white-space:nowrap">
\r
585 \81¨ new_X_array</DIV>
\r
586 <DIV id="text133_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:3842; line-height:15px; white-space:nowrap">
\r
587 Flags = Empty
\82©
\82Â out_GetFuncs = Empty
\82È
\82ç
\81Ainclude
\82Å
\91ã
\97p
\82Å
\82«
\82Ü
\82·
\81B</DIV>
\r
588 <DIV id="text133_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:29; margin-top:4085; line-height:15px; white-space:nowrap">
\r
590 <DIV id="text133_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:71; margin-top:4085; line-height:15px; white-space:nowrap">
\r
591 <A href="vbslib_04.html#include" style="text-decoration: none">
\r
592 \81¨ include</A></DIV>
\r
593 <DIV id="text133_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:37; margin-top:3870; line-height:15px; white-space:nowrap">
\r
594 out_GetFuncs
\82Í
\81A
\90Ã
\93I
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\8aÖ
\90\94\82Ì
\8fW
\8d\87\82Å
\82·
\81B get_ObjectsFromFile
\82Ì
\91æ1
\88ø
\90\94<BR/>
\r
595 \82É
\93n
\82·
\82Æ
\81A
\95¶
\8e\9a\97ñ
\82ð
\93n
\82µ
\82½
\82Æ
\82«
\82æ
\82è
\8d\82\91¬
\82É
\8f\88\97\9d\82µ
\82Ü
\82·
\81B</DIV>
\r
596 <DIV id="text133_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:68; margin-top:4107; line-height:15px; white-space:nowrap">
\r
597 \81¨ T_GetObject.vbs [T_IncludeObjs3]</DIV>
\r
598 <DIV id="text133_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:29; margin-top:4107; line-height:15px; white-space:nowrap">
\r
601 <v:line style="position:absolute;" from="0,3656" to="616,3656" strokecolor="#000000" strokeweight="1pt"/>
\r
602 <v:line style="position:absolute;" from="616,3656" to="616,4155" strokecolor="#000000" strokeweight="1pt"/>
\r
603 <v:line style="position:absolute;" from="616,4155" to="0,4155" strokecolor="#000000" strokeweight="1pt"/>
\r
604 <v:line style="position:absolute;" from="0,4155" to="0,3656" strokecolor="#000000" strokeweight="1pt"/>
\r
610 <DIV style="position:absolute; margin-left:0; margin-top:4155;">
\r
611 <A id="svgcats_vml_p134" class="to_tree" onClick="selectTreeElem( '134' );">
\81©</A></DIV>
\r
612 <DIV style="position:absolute; margin-left:40; margin-top:4158;">
\r
613 <A href="#svgcats_vml_p135" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
614 <DIV style="position:absolute; margin-left:58; margin-top:4158;">
\r
615 <A href="#svgcats_vml_p133" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
616 <v:rect style="position:absolute; margin-left:0; margin-top:4171; width:586; height:329;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
617 <DIV id="text134_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:4188; line-height:15px; white-space:nowrap">
\r
618 <A name="get_DefineInfoObject">
\r
619 get_DefineInfoObject</A></DIV>
\r
620 <v:rect style="position:absolute; margin-left:24; margin-top:4219; width:502; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
621 <DIV id="text134_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:32; margin-top:4226; line-height:13px; white-space:nowrap">
\r
622 Sub get_DefineInfoObject( in_out_Object as DefineInfoClass, FullPath as string )</DIV>
\r
623 <DIV id="text134_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32; margin-top:4255; line-height:15px; white-space:nowrap">
\r
624 \92P
\8f\83\82È DefineInfo
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\90¶
\90¬
\82µ
\82Ü
\82·
\81B</DIV>
\r
625 <DIV id="text134_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:69; margin-top:4452; line-height:15px; white-space:nowrap">
\r
626 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_09.html#DefineInfo" style="text-decoration: none">
\r
627 \81¨ DefineInfo
\83v
\83\8d\83p
\83e
\83B (vbsool)</A></DIV>
\r
628 <DIV id="text134_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:32; margin-top:4452; line-height:15px; white-space:nowrap">
\r
630 <DIV id="text134_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32; margin-top:4282; line-height:15px; white-space:nowrap">
\r
631 DefineInfo
\83I
\83u
\83W
\83F
\83N
\83g
\82É FullPath
\83v
\83\8d\83p
\83e
\83B
\82µ
\82©
\95K
\97v
\82È
\82¢
\82Æ
\82«
\82Ì
\82Ý
\8eg
\82¦
\82Ü
\82·
\81B</DIV>
\r
632 <DIV id="text134_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:200; margin-top:4188; line-height:15px; white-space:nowrap">
\r
634 <v:rect style="position:absolute; margin-left:46; margin-top:4328; width:508; height:100;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
635 <DIV id="text134_8" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54; margin-top:4334; line-height:15px; white-space:nowrap">
\r
636 Dim g_SrcPath<BR/>
\r
637 Dim g_Sample_vbs : get_DefineInfoObject g_Sample_vbs, g_SrcPath<BR/>
\r
639 Class SampleObj<BR/>
\r
640 Public Property Get DefineInfo() : Set DefineInfo = g_Sample_vbs : End Property<BR/>
\r
642 <DIV id="text134_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:32; margin-top:4309; line-height:15px; white-space:nowrap">
\r
643 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
644 <DIV id="text134_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:390; margin-top:4350; line-height:13px; white-space:nowrap">
\r
645 <A href="vbslib_10.html#g_SrcPath" style="text-decoration: none">
\r
646 g_SrcPath</A></DIV>
\r
647 <v:line style="position:absolute;" from="336,4364" to="406,4393" strokecolor="#FF9F11" strokeweight="1pt"/>
\r
649 <v:line style="position:absolute;" from="0,4171" to="586,4171" strokecolor="#000000" strokeweight="1pt"/>
\r
650 <v:line style="position:absolute;" from="586,4171" to="586,4500" strokecolor="#000000" strokeweight="1pt"/>
\r
651 <v:line style="position:absolute;" from="586,4500" to="0,4500" strokecolor="#000000" strokeweight="1pt"/>
\r
652 <v:line style="position:absolute;" from="0,4500" to="0,4171" strokecolor="#000000" strokeweight="1pt"/>
\r
658 <DIV style="position:absolute; margin-left:0; margin-top:4500;">
\r
659 <A id="svgcats_vml_p135" class="to_tree" onClick="selectTreeElem( '135' );">
\81©</A></DIV>
\r
660 <DIV style="position:absolute; margin-left:40; margin-top:4503;">
\r
661 <A href="#svgcats_vml_p136" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
662 <DIV style="position:absolute; margin-left:58; margin-top:4503;">
\r
663 <A href="#svgcats_vml_p134" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
664 <v:rect style="position:absolute; margin-left:0; margin-top:4516; width:637; height:763;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
665 <DIV id="text135_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:4533; line-height:15px; white-space:nowrap">
\r
666 <A name="get_NameDelegator">
\r
667 get_NameDelegator</A></DIV>
\r
668 <v:rect style="position:absolute; margin-left:27; margin-top:4565; width:502; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
669 <DIV id="text135_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:35; margin-top:4571; line-height:15px; white-space:nowrap">
\r
670 Function get_NameDelegator( Name as string, TrueName as string,<BR/>
\r
671 InterfaceName as string ) as InterfaceName_Delegator</DIV>
\r
672 <DIV id="text135_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:4617; line-height:15px; white-space:nowrap">
\r
673 \90³
\8e®
\96¼
\83I
\83u
\83W
\83F
\83N
\83g
\82É
\88Ï
\8f÷
\82·
\82é
\81A
\88ê
\94Ê
\96¼
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82µ
\82Ü
\82·
\81B</DIV>
\r
674 <DIV id="text135_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:4643; line-height:15px; white-space:nowrap">
\r
675 \81y
\88ø
\90\94\81z</DIV>
\r
676 <DIV id="text135_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:4643; line-height:15px; white-space:nowrap">
\r
678 <DIV id="text135_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:4662; line-height:15px; white-space:nowrap">
\r
680 <DIV id="text135_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:198; margin-top:4643; line-height:15px; white-space:nowrap">
\r
682 <DIV id="text135_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:198; margin-top:4662; line-height:15px; white-space:nowrap">
\r
684 <DIV id="text135_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:4681; line-height:15px; white-space:nowrap">
\r
685 InterfaceName</DIV>
\r
686 <DIV id="text135_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:198; margin-top:4681; line-height:15px; white-space:nowrap">
\r
687 \83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X
\96¼ (*1)</DIV>
\r
688 <DIV id="text135_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:44; margin-top:5231; line-height:15px; white-space:nowrap">
\r
690 <DIV id="text135_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:200; margin-top:4533; line-height:15px; white-space:nowrap">
\r
692 <DIV id="text135_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:87; margin-top:5231; line-height:15px; white-space:nowrap">
\r
693 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_09.html#NameDelegate" style="text-decoration: none">
\r
694 \81¨
\96¼
\91O
\8eQ
\8fÆ
\81AName
\82Æ TrueName
\82ª
\91½
\91Î
\82P
\82Ì
\8fê
\8d\87</A></DIV>
\r
695 <DIV id="text135_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:198; margin-top:4700; line-height:15px; white-space:nowrap">
\r
696 \88ê
\94Ê
\96¼
\83I
\83u
\83W
\83F
\83N
\83g (*2)</DIV>
\r
697 <DIV id="text135_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97; margin-top:4700; line-height:15px; white-space:nowrap">
\r
699 <DIV id="text135_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:4735; line-height:15px; white-space:nowrap">
\r
701 <DIV id="text135_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:4815; line-height:15px; white-space:nowrap">
\r
703 <DIV id="text135_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:70; margin-top:4735; line-height:15px; white-space:nowrap">
\r
704 <A href="#NameDelegator" style="text-decoration: none">
\r
705 NameDelegator
\83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X</A></DIV>
\r
706 <DIV id="text135_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:70; margin-top:4815; line-height:15px; white-space:nowrap">
\r
707 InterfaceName + "_Delegator"
\83N
\83\89\83X(*1)
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\81B</DIV>
\r
708 <DIV id="text135_20" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:70; margin-top:4750; line-height:15px; white-space:nowrap">
\r
709 InterfaceName + "_Delegator"
\83N
\83\89\83X
\81i
\81\81 \88ê
\94Ê
\96¼
\83I
\83u
\83W
\83F
\83N
\83g
\82Ì
\83N
\83\89\83X
\81j
\82ª
\92è
\8b`
\82³
\82ê
\82Ä
\82¢
\82Ä
\81A<BR/>
\r
710 \82»
\82Ì
\83C
\83\93\83X
\83^
\83\93\83X
\82ð
\90¶
\90¬
\82·
\82é new_InterfaceName_Delegator
\8aÖ
\90\94\82ª
\92è
\8b`
\82³
\82ê
\82Ä
\82¢
\82é
\82±
\82Æ
\81B<BR/>
\r
711 new_InterfaceName_Delegator
\8aÖ
\90\94\82É
\82Â
\82¢
\82Ä
\82Í
\81A</DIV>
\r
712 <DIV id="text135_21" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:250; margin-top:4735; line-height:15px; white-space:nowrap">
\r
713 \82Æ
\81AInterfaceName
\83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X
\82ð
\8e\9d\82Á
\82½</DIV>
\r
714 <DIV id="text135_22" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:4868; line-height:15px; white-space:nowrap">
\r
715 <A name="NameDelegator">
\r
716 NameDelegator
\83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X</A></DIV>
\r
717 <v:rect style="position:absolute; margin-left:43; margin-top:4896; width:574; height:190;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
718 <DIV id="text135_23" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:51; margin-top:4902; line-height:15px; white-space:nowrap">
\r
719 Class NameDelegator '// defined_as_interface<BR/>
\r
720 Public Name<BR/>
\r
721 Public Property Get TrueName() : TrueName = NameDelegator_getTrueName( Me ) : End Property<BR/>
\r
722 Public m_Delegate ' as ClassA or ClassB or string(before validated)<BR/>
\r
723 Public Property Get DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property<BR/>
\r
726 Const F_ValidateOnlyDelegate = &h40000000<BR/>
\r
727 Dim g_bNeedValidateDelegate<BR/>
\r
728 Function NameDelegator_getTrueName( m )<BR/>
\r
729 Sub NameDelegator_validate( m, Flags )<BR/>
\r
730 Function NameDelegator_getXML( m )</DIV>
\r
731 <DIV id="text135_24" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:342; margin-top:4700; line-height:15px; white-space:nowrap">
\r
732 <A href="#NameDelegator" style="text-decoration: none">
\r
733 \81¨ NameDelegator
\83C
\83\93\83^
\81[
\83t
\83F
\83C
\83X</A></DIV>
\r
734 <DIV id="text135_25" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:51; margin-top:5093; line-height:15px; white-space:nowrap">
\r
735 DefineInfo
\83v
\83\8d\83p
\83e
\83B
\82Í
\81A
\83I
\83v
\83V
\83\87\83\93\82Å
\82·
\81B</DIV>
\r
736 <DIV id="text135_26" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:336; margin-top:4780; line-height:15px; white-space:nowrap">
\r
737 <A href="#new_X" style="text-decoration: none">
\r
738 \81¨ new_X</A></DIV>
\r
739 <DIV id="text135_27" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:51; margin-top:4963; line-height:13px; white-space:nowrap">
\r
740 Public Property Get DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property</DIV>
\r
741 <DIV id="text135_28" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:290; margin-top:5093; line-height:15px; white-space:nowrap">
\r
742 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_09.html#DefineInfo" style="text-decoration: none">
\r
743 \81¨ DefineInfo
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
744 <v:line style="position:absolute;" from="258,5181" to="206,5181" strokecolor="#000000" strokeweight="1pt"/>
\r
745 <v:oval style="position:absolute; margin-left:203; margin-top:5178; width:5; height:5;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
746 <v:line style="position:absolute;" from="259,5155" to="207,5155" strokecolor="#000000" strokeweight="1pt"/>
\r
747 <v:oval style="position:absolute; margin-left:204; margin-top:5152; width:5; height:5;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
748 <v:roundrect style="position:absolute; margin-left:64; margin-top:5143; width:91; height:22;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>
\r
749 <DIV id="text135_31" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:71; margin-top:5147; line-height:15px; white-space:nowrap">
\r
750 \8fê
\96ÊA
\82Ì
\8aÖ
\90\94</DIV>
\r
751 <v:line style="position:absolute;" from="155,5155" to="198,5155" strokecolor="#000000" strokeweight="1pt">
\r
752 <v:stroke dashstyle="dash"/>
\r
754 <v:line style="position:absolute;" from="198,5155" to="187,5151" strokecolor="#000000" strokeweight="1pt"/>
\r
755 <v:line style="position:absolute;" from="198,5155" to="187,5159" strokecolor="#000000" strokeweight="1pt"/>
\r
756 <v:line style="position:absolute;" from="155,5180" to="198,5180" strokecolor="#000000" strokeweight="1pt">
\r
757 <v:stroke dashstyle="dash"/>
\r
759 <v:line style="position:absolute;" from="198,5180" to="187,5176" strokecolor="#000000" strokeweight="1pt"/>
\r
760 <v:line style="position:absolute;" from="198,5180" to="187,5184" strokecolor="#000000" strokeweight="1pt"/>
\r
761 <v:line style="position:absolute;" from="369,5155" to="387,5155" strokecolor="#000000" strokeweight="1pt"/>
\r
762 <v:line style="position:absolute;" from="387,5155" to="387,5163" strokecolor="#000000" strokeweight="1pt"/>
\r
763 <v:line style="position:absolute;" from="387,5180" to="369,5180" strokecolor="#000000" strokeweight="1pt"/>
\r
764 <v:line style="position:absolute;" from="387,5163" to="412,5163" strokecolor="#000000" strokeweight="1pt"/>
\r
765 <DIV id="text135_38" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:343; margin-top:5126; line-height:15px; white-space:nowrap">
\r
766 Name
\88È
\8aO
\82Í</DIV>
\r
767 <DIV id="text135_39" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:164; margin-top:5131; line-height:15px; white-space:nowrap">
\r
769 <v:rect style="position:absolute; margin-left:257; margin-top:5144; width:112; height:20;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>
\r
770 <DIV id="text135_40" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:265; margin-top:5147; line-height:15px; white-space:nowrap">
\r
771 \8fê
\96ÊA
\82Å
\82Ì Name</DIV>
\r
772 <v:rect style="position:absolute; margin-left:257; margin-top:5170; width:112; height:20;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>
\r
773 <DIV id="text135_41" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:265; margin-top:5173; line-height:15px; white-space:nowrap">
\r
774 \8fê
\96ÊB
\82Å
\82Ì Name</DIV>
\r
775 <v:rect style="position:absolute; margin-left:413; margin-top:5155; width:142; height:26;" fillcolor="#E6E6FF" strokecolor="#000000" strokeweight="1pt"/>
\r
776 <DIV id="text135_42" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:421; margin-top:5161; line-height:15px; white-space:nowrap">
\r
777 \82 \82é
\82P
\82Â
\82Ì
\83C
\83\93\83X
\83^
\83\93\83X</DIV>
\r
778 <DIV id="text135_43" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:448; margin-top:5183; line-height:15px; white-space:nowrap">
\r
780 <DIV id="text135_44" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:262; margin-top:5195; line-height:12px; white-space:nowrap">
\r
781 ClassI_Delegator
\83N
\83\89\83X</DIV>
\r
782 <v:roundrect style="position:absolute; margin-left:64; margin-top:5169; width:91; height:22;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>
\r
783 <DIV id="text135_45" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:71; margin-top:5173; line-height:15px; white-space:nowrap">
\r
784 \8fê
\96ÊB
\82Ì
\8aÖ
\90\94</DIV>
\r
785 <DIV id="text135_46" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:418; margin-top:5126; line-height:15px; white-space:nowrap">
\r
786 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_09.html#m_Delegate" style="text-decoration: none">
\r
788 <v:line style="position:absolute;" from="387,5171" to="413,5171" strokecolor="#000000" strokeweight="1pt"/>
\r
789 <v:line style="position:absolute;" from="387,5171" to="387,5180" strokecolor="#000000" strokeweight="1pt"/>
\r
790 <DIV id="text135_49" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:193; margin-top:5195; line-height:12px; white-space:nowrap">
\r
793 <v:line style="position:absolute;" from="0,4516" to="637,4516" strokecolor="#000000" strokeweight="1pt"/>
\r
794 <v:line style="position:absolute;" from="637,4516" to="637,5279" strokecolor="#000000" strokeweight="1pt"/>
\r
795 <v:line style="position:absolute;" from="637,5279" to="0,5279" strokecolor="#000000" strokeweight="1pt"/>
\r
796 <v:line style="position:absolute;" from="0,5279" to="0,4516" strokecolor="#000000" strokeweight="1pt"/>
\r
802 <DIV style="position:absolute; margin-left:0; margin-top:5279;">
\r
803 <A id="svgcats_vml_p136" class="to_tree" onClick="selectTreeElem( '136' );">
\81©</A></DIV>
\r
804 <DIV style="position:absolute; margin-left:40; margin-top:5282;">
\r
805 <A href="#svgcats_vml_p137" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
806 <DIV style="position:absolute; margin-left:58; margin-top:5282;">
\r
807 <A href="#svgcats_vml_p135" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
808 <v:rect style="position:absolute; margin-left:0; margin-top:5295; width:614; height:428;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
809 <DIV id="text136_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:5312; line-height:15px; white-space:nowrap">
\r
812 <DIV id="text136_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:52; margin-top:5651; line-height:15px; white-space:nowrap">
\r
813 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_08.html#naming" style="text-decoration: none">
\r
814 \81¨
\96¼
\91O
\8eQ
\8fÆ (vbsool)</A></DIV>
\r
815 <DIV id="text136_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:20; margin-top:5651; line-height:15px; white-space:nowrap">
\r
817 <v:rect style="position:absolute; margin-left:24; margin-top:5343; width:274; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
818 <DIV id="text136_4" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:32; margin-top:5350; line-height:13px; white-space:nowrap">
\r
819 Function new_X( Name as string ) as object</DIV>
\r
820 <DIV id="text136_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24; margin-top:5378; line-height:15px; white-space:nowrap">
\r
821 \95¶
\8e\9a\97ñ
\82Å
\8ew
\92è
\82µ
\82½
\96¼
\91O
\82Ì
\83N
\83\89\83X
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\90¶
\90¬
\82µ
\82Ü
\82·
\81B</DIV>
\r
822 <v:rect style="position:absolute; margin-left:44; margin-top:5569; width:190; height:55;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
823 <DIV id="text136_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:52; margin-top:5575; line-height:15px; white-space:nowrap">
\r
824 Function new_ClassA()<BR/>
\r
825 Set new_ClassA = new ClassA<BR/>
\r
827 <DIV id="text136_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24; margin-top:5529; line-height:15px; white-space:nowrap">
\r
828 \8b@
\94\
\93I
\82É
\82Í
\81A"new_" + Name
\82Ì
\8aÖ
\90\94\82ð
\8cÄ
\82Ñ
\8fo
\82·
\82¾
\82¯
\82È
\82Ì
\82Å
\81A
\95Ê
\93r
\8aÖ
\90\94\82ð
\97p
\88Ó
\82·
\82é
\95K
\97v
\82ª
\82 \82è
\82Ü
\82·
\81B<BR/>
\r
829 \82½
\82Æ
\82¦
\82Î
\81AName = "ClassA"
\82È
\82ç
\81Anew_ClassA
\82Ì
\8aÖ
\90\94\82ª
\8cÄ
\82Î
\82ê
\82Ü
\82·
\81B</DIV>
\r
830 <DIV id="text136_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:147; margin-top:5312; line-height:15px; white-space:nowrap">
\r
832 <DIV id="text136_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:55; margin-top:5675; line-height:15px; white-space:nowrap">
\r
833 \81¨ new_from_file</DIV>
\r
834 <DIV id="text136_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:19; margin-top:5675; line-height:15px; white-space:nowrap">
\r
836 <DIV id="text136_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#FF0000; margin-left:24; margin-top:5408; line-height:15px; white-space:nowrap">
\r
837 \82½
\82¾
\82µ
\81A
\91½
\82
\82Ì
\8fê
\8d\87\81Aget_Object
\82Ì
\95û
\82ª
\93K
\82µ
\82Ä
\82¢
\82é
\82±
\82Æ
\82ª
\91½
\82¢
\82Ì
\82Å
\81Aget_Object
\82ð
\8eg
\82¤
\82±
\82Æ
\82ð
\8c\9f\93¢<BR/>
\r
838 \82µ
\82Ä
\82
\82¾
\82³
\82¢
\81B</DIV>
\r
839 <DIV id="text136_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:105; margin-top:5423; line-height:15px; white-space:nowrap">
\r
840 <A href="#get_Object" style="text-decoration: none">
\r
841 \81¨ get_Object</A></DIV>
\r
842 <DIV id="text136_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24; margin-top:5461; line-height:15px; white-space:nowrap">
\r
843 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
844 <v:rect style="position:absolute; margin-left:44; margin-top:5480; width:244; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
845 <DIV id="text136_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:52; margin-top:5487; line-height:13px; white-space:nowrap">
\r
846 Dim obj : Set obj = new_X( "ClassA" )</DIV>
\r
848 <v:line style="position:absolute;" from="0,5295" to="614,5295" strokecolor="#000000" strokeweight="1pt"/>
\r
849 <v:line style="position:absolute;" from="614,5295" to="614,5723" strokecolor="#000000" strokeweight="1pt"/>
\r
850 <v:line style="position:absolute;" from="614,5723" to="0,5723" strokecolor="#000000" strokeweight="1pt"/>
\r
851 <v:line style="position:absolute;" from="0,5723" to="0,5295" strokecolor="#000000" strokeweight="1pt"/>
\r
857 <DIV style="position:absolute; margin-left:0; margin-top:5723;">
\r
858 <A id="svgcats_vml_p137" class="to_tree" onClick="selectTreeElem( '137' );">
\81©</A></DIV>
\r
859 <DIV style="position:absolute; margin-left:40; margin-top:5726;">
\r
860 <A href="#svgcats_vml_p138" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
861 <DIV style="position:absolute; margin-left:58; margin-top:5726;">
\r
862 <A href="#svgcats_vml_p136" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
863 <v:rect style="position:absolute; margin-left:0; margin-top:5739; width:511; height:599;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
864 <DIV id="text137_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:5756; line-height:15px; white-space:nowrap">
\r
865 <A name="StrMatchKey">
\r
866 StrMatchKey
\83N
\83\89\83X</A></DIV>
\r
867 <DIV id="text137_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:173; margin-top:5756; line-height:15px; white-space:nowrap">
\r
869 <DIV id="text137_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24; margin-top:5970; line-height:15px; white-space:nowrap">
\r
871 <DIV id="text137_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24; margin-top:6089; line-height:15px; white-space:nowrap">
\r
873 <v:rect style="position:absolute; margin-left:45; margin-top:6116; width:388; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
874 <DIV id="text137_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53; margin-top:6123; line-height:13px; white-space:nowrap">
\r
875 Function StrMatchKey::IsMatch( TestStr as string ) as Boolean</DIV>
\r
876 <DIV id="text137_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24; margin-top:5793; line-height:15px; white-space:nowrap">
\r
877 *
\82Ì
\83\8f\83C
\83\8b\83h
\83J
\81[
\83h
\82ð
\8eg
\82Á
\82Ä
\81A
\83}
\83b
\83`
\82·
\82é
\82©
\82Ç
\82¤
\82©
\82ð
\8d\82\91¬
\82É
\94»
\92è
\82µ
\82Ü
\82·
\81B</DIV>
\r
878 <v:rect style="position:absolute; margin-left:45; margin-top:5998; width:184; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
879 <DIV id="text137_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53; margin-top:6005; line-height:13px; white-space:nowrap">
\r
880 Property Keyword as string</DIV>
\r
881 <DIV id="text137_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:43; margin-top:6035; line-height:15px; white-space:nowrap">
\r
882 \83\8f\83C
\83\8b\83h
\83J
\81[
\83h
\82ð
\8aÜ
\82Þ
\83L
\81[
\83\8f\81[
\83h
\81B</DIV>
\r
883 <DIV id="text137_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:43; margin-top:6150; line-height:15px; white-space:nowrap">
\r
884 TestStr
\82ª
\81A.Keyword
\82Å
\90Ý
\92è
\82µ
\82½
\83\8f\83C
\83\8b\83h
\83J
\81[
\83h
\82É
\83}
\83b
\83`
\82·
\82é
\82©
\82Ç
\82¤
\82©
\82ð
\95Ô
\82·
\81B<BR/>
\r
885 \91å
\95¶
\8e\9a\8f¬
\95¶
\8e\9a\82ð
\8bæ
\95Ê
\82µ
\82Ü
\82¹
\82ñ
\81B</DIV>
\r
886 <DIV id="text137_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24; margin-top:6207; line-height:15px; white-space:nowrap">
\r
887 .IsMatchULCase</DIV>
\r
888 <DIV id="text137_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:43; margin-top:6267; line-height:15px; white-space:nowrap">
\r
889 TestStr
\82ª
\81A.Keyword
\82Å
\90Ý
\92è
\82µ
\82½
\83\8f\83C
\83\8b\83h
\83J
\81[
\83h
\82É
\83}
\83b
\83`
\82·
\82é
\82©
\82Ç
\82¤
\82©
\82ð
\95Ô
\82·
\81B<BR/>
\r
890 \91å
\95¶
\8e\9a\8f¬
\95¶
\8e\9a\82ð
\8bæ
\95Ê
\82µ
\82Ü
\82·
\81B</DIV>
\r
891 <v:rect style="position:absolute; margin-left:45; margin-top:6233; width:388; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
892 <DIV id="text137_12" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53; margin-top:6240; line-height:13px; white-space:nowrap">
\r
893 Function StrMatchKey::IsMatch( TestStr as string ) as Boolean</DIV>
\r
894 <DIV id="text137_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:40; margin-top:5827; line-height:15px; white-space:nowrap">
\r
895 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
896 <v:rect style="position:absolute; margin-left:45; margin-top:5849; width:268; height:85;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
897 <DIV id="text137_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53; margin-top:5855; line-height:15px; white-space:nowrap">
\r
898 Dim match : Set match = new StrMatchKey<BR/>
\r
899 match.Keyword = LCase( "*.TXT" )<BR/>
\r
900 If match.IsMatch( "file1.txt" ) Then<BR/>
\r
901 :<BR/>
\r
902 End If</DIV>
\r
903 <DIV id="text137_15" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:179; margin-top:5886; line-height:13px; white-space:nowrap">
\r
905 <DIV id="text137_16" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:209; margin-top:5871; line-height:13px; white-space:nowrap">
\r
907 <DIV id="text137_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#FF0000; margin-left:43; margin-top:6051; line-height:15px; white-space:nowrap">
\r
908 \91å
\95¶
\8e\9a\8f¬
\95¶
\8e\9a\82ð
\8bæ
\95Ê
\82µ
\82È
\82¢
\82Æ
\82«
\82Í
\81ALCase
\82ð
\8eg
\82Á
\82Ä
\8f¬
\95¶
\8e\9a\82É
\82µ
\82Ä
\82
\82¾
\82³
\82¢
\81B</DIV>
\r
910 <v:line style="position:absolute;" from="0,5739" to="511,5739" strokecolor="#000000" strokeweight="1pt"/>
\r
911 <v:line style="position:absolute;" from="511,5739" to="511,6338" strokecolor="#000000" strokeweight="1pt"/>
\r
912 <v:line style="position:absolute;" from="511,6338" to="0,6338" strokecolor="#000000" strokeweight="1pt"/>
\r
913 <v:line style="position:absolute;" from="0,6338" to="0,5739" strokecolor="#000000" strokeweight="1pt"/>
\r
919 <DIV style="position:absolute; margin-left:0; margin-top:6338;">
\r
920 <A id="svgcats_vml_p138" class="to_tree" onClick="selectTreeElem( '138' );">
\81©</A></DIV>
\r
921 <DIV style="position:absolute; margin-left:40; margin-top:6341;">
\r
922 <A href="#svgcats_vml_p139" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
923 <DIV style="position:absolute; margin-left:58; margin-top:6341;">
\r
924 <A href="#svgcats_vml_p137" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
925 <v:rect style="position:absolute; margin-left:0; margin-top:6354; width:519; height:184;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
926 <DIV id="text138_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:6371; line-height:15px; white-space:nowrap">
\r
927 <A name="StringStream">
\r
928 StringStream
\83N
\83\89\83X</A></DIV>
\r
929 <DIV id="text138_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24; margin-top:6411; line-height:15px; white-space:nowrap">
\r
930 \95¶
\8e\9a\97ñ
\82ð</DIV>
\r
931 <DIV id="text138_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:80; margin-top:6411; line-height:15px; white-space:nowrap">
\r
933 <DIV id="text138_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:152; margin-top:6411; line-height:15px; white-space:nowrap">
\r
934 \82Æ
\93¯
\82¶
\82æ
\82¤
\82É
\83A
\83N
\83Z
\83X
\82µ
\82Ü
\82·
\81B</DIV>
\r
935 <DIV id="text138_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#408080; margin-left:31; margin-top:6452; line-height:13px; white-space:nowrap">
\r
936 .SetString( Str as string )</DIV>
\r
937 <DIV id="text138_6" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#408080; margin-left:31; margin-top:6472; line-height:13px; white-space:nowrap">
\r
939 <DIV id="text138_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#408080; margin-left:31; margin-top:6492; line-height:13px; white-space:nowrap">
\r
940 .AtEndOfStream</DIV>
\r
941 <DIV id="text138_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:225; margin-top:6471; line-height:15px; white-space:nowrap">
\r
942 1
\8ds
\8eæ
\82è
\8fo
\82µ
\82Ü
\82·
\81B TextStream
\8cÝ
\8a·</DIV>
\r
943 <DIV id="text138_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:225; margin-top:6490; line-height:15px; white-space:nowrap">
\r
944 \82·
\82×
\82Ä
\8eæ
\82è
\8fo
\82µ
\82½
\82©
\82Ç
\82¤
\82©
\81B TextStream
\8cÝ
\8a·</DIV>
\r
945 <DIV id="text138_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:225; margin-top:6452; line-height:15px; white-space:nowrap">
\r
946 \91S
\91Ì
\82Ì
\95¶
\8e\9a\97ñ
\82ð
\90Ý
\92è
\82·
\82é</DIV>
\r
947 <DIV id="text138_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:215; margin-top:6371; line-height:15px; white-space:nowrap">
\r
949 <DIV id="text138_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:253; margin-top:6373; line-height:12px; white-space:nowrap">
\r
950 [
\83e
\83X
\83g ]</DIV>
\r
952 <v:line style="position:absolute;" from="0,6354" to="519,6354" strokecolor="#000000" strokeweight="1pt"/>
\r
953 <v:line style="position:absolute;" from="519,6354" to="519,6538" strokecolor="#000000" strokeweight="1pt"/>
\r
954 <v:line style="position:absolute;" from="519,6538" to="0,6538" strokecolor="#000000" strokeweight="1pt"/>
\r
955 <v:line style="position:absolute;" from="0,6538" to="0,6354" strokecolor="#000000" strokeweight="1pt"/>
\r
961 <DIV style="position:absolute; margin-left:0; margin-top:6538;">
\r
962 <A id="svgcats_vml_p139" class="to_tree" onClick="selectTreeElem( '139' );">
\81©</A></DIV>
\r
963 <DIV style="position:absolute; margin-left:40; margin-top:6541;">
\r
964 <A href="#svgcats_vml_p140" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
965 <DIV style="position:absolute; margin-left:58; margin-top:6541;">
\r
966 <A href="#svgcats_vml_p138" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
967 <v:rect style="position:absolute; margin-left:0; margin-top:6554; width:519; height:204;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
968 <DIV id="text139_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:6571; line-height:15px; white-space:nowrap">
\r
970 <v:rect style="position:absolute; margin-left:25; margin-top:6601; width:268; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
971 <DIV id="text139_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:33; margin-top:6608; line-height:13px; white-space:nowrap">
\r
972 Function LenK( Str as string ) as integer</DIV>
\r
973 <DIV id="text139_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:6638; line-height:15px; white-space:nowrap">
\r
974 \89p
\95¶
\8e\9a\82ð 1
\95¶
\8e\9a\81A
\93ú
\96{
\8cê
\81i
\95¶
\8e\9a\83R
\81[
\83h256
\88È
\8fã
\81j
\82ð 2
\95¶
\8e\9a\82Æ
\82µ
\82Ä
\95¶
\8e\9a\90\94\82ð
\95Ô
\82µ
\82Ü
\82·
\81B</DIV>
\r
975 <DIV id="text139_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:6666; line-height:15px; white-space:nowrap">
\r
976 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
977 <v:rect style="position:absolute; margin-left:41; margin-top:6686; width:154; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
978 <DIV id="text139_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:49; margin-top:6692; line-height:15px; white-space:nowrap">
\r
979 LenK( "123" ) = 3<BR/>
\r
980 LenK( "123
\82 \82¢
\82¤" ) = 9</DIV>
\r
981 <DIV id="text139_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:90; margin-top:6571; line-height:15px; white-space:nowrap">
\r
984 <v:line style="position:absolute;" from="0,6554" to="519,6554" strokecolor="#000000" strokeweight="1pt"/>
\r
985 <v:line style="position:absolute;" from="519,6554" to="519,6758" strokecolor="#000000" strokeweight="1pt"/>
\r
986 <v:line style="position:absolute;" from="519,6758" to="0,6758" strokecolor="#000000" strokeweight="1pt"/>
\r
987 <v:line style="position:absolute;" from="0,6758" to="0,6554" strokecolor="#000000" strokeweight="1pt"/>
\r
993 <DIV style="position:absolute; margin-left:0; margin-top:6758;">
\r
994 <A id="svgcats_vml_p140" class="to_tree" onClick="selectTreeElem( '140' );">
\81©</A></DIV>
\r
995 <DIV style="position:absolute; margin-left:40; margin-top:6761;">
\r
996 <A href="#svgcats_vml_p141" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
997 <DIV style="position:absolute; margin-left:58; margin-top:6761;">
\r
998 <A href="#svgcats_vml_p139" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
999 <v:rect style="position:absolute; margin-left:0; margin-top:6774; width:563; height:417;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1000 <DIV id="text140_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:6791; line-height:15px; white-space:nowrap">
\r
1001 <A name="DateAddStr">
\r
1002 DateAddStr</A></DIV>
\r
1003 <v:rect style="position:absolute; margin-left:25; margin-top:6821; width:400; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1004 <DIV id="text140_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:33; margin-top:6828; line-height:13px; white-space:nowrap">
\r
1005 Function DateAddStr( BaseDate as Date, Plus as string ) as Date</DIV>
\r
1006 <DIV id="text140_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:6858; line-height:15px; white-space:nowrap">
\r
1007 \93ú
\95t
\8e\9e\8d\8f\82Ì
\89Á
\8c¸
\8eZ
\82ð
\82µ
\82Ü
\82·
\81B</DIV>
\r
1008 <DIV id="text140_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:6886; line-height:15px; white-space:nowrap">
\r
1009 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1010 <v:rect style="position:absolute; margin-left:41; margin-top:6906; width:502; height:70;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1011 <DIV id="text140_5" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:49; margin-top:6912; line-height:15px; white-space:nowrap">
\r
1012 d = DateAddStr( CDate("2009/1/1"), "+1month 10days" ) '// d = CDate("2009/2/11")<BR/>
\r
1013 t = DateAddStr( CDate("17:00"), "-8hours" ) '// t = CDate("9:00")<BR/>
\r
1014 t = DateAddStr( CDate("10:00"), "+1hours -5min" ) '// t = CDate("10:55")<BR/>
\r
1015 t = DateAddStr( CDate("10:00"), "-1hours -5min" ) '// t = CDate("9:05")</DIV>
\r
1016 <DIV id="text140_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:118; margin-top:6791; line-height:15px; white-space:nowrap">
\r
1018 <DIV id="text140_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24; margin-top:6995; line-height:15px; white-space:nowrap">
\r
1019 Plus
\88ø
\90\94</DIV>
\r
1020 <DIV id="text140_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:7022; line-height:15px; white-space:nowrap">
\r
1021 \90æ
\93ª
\82Í
\81A"+"
\82© "-"
\82ð
\8ew
\92è
\82µ
\82Ü
\82·
\81B
\8fÈ
\97ª
\82·
\82é
\82Æ "+"
\82É
\82È
\82è
\82Ü
\82·
\81B<BR/>
\r
1022 \90æ
\93ª
\88È
\8aO
\82É
\82à
\81A"+"
\82© "-"
\82ð
\8ew
\92è
\82Å
\82«
\82Ü
\82·
\82ª
\81A
\90æ
\93ª
\82Ì "-"
\82Ì
\89e
\8b¿
\82ð
\8eó
\82¯
\82Ü
\82·
\81B</DIV>
\r
1023 <DIV id="text140_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:33; margin-top:7067; line-height:15px; white-space:nowrap">
\r
1024 \92P
\88Ê
\82É
\8ew
\92è
\82Å
\82«
\82é
\83L
\81[
\83\8f\81[
\83h
\82Í
\8e\9f\82Ì
\82à
\82Ì
\82ª
\82 \82è
\82Ü
\82·
\81B</DIV>
\r
1025 <DIV id="text140_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:48; margin-top:7090; line-height:15px; white-space:nowrap">
\r
1026 "year", "years", "month", "months", "day", "days"<BR/>
\r
1027 "hour", "hours", "minute", "minutes", "min", "second", "seconds", "sec"</DIV>
\r
1028 <DIV id="text140_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:75; margin-top:7143; line-height:15px; white-space:nowrap">
\r
1029 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_07.html#DateAdd" style="text-decoration: none">
\r
1030 \81¨ DateAdd (VBScript)</A></DIV>
\r
1031 <DIV id="text140_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:33; margin-top:7143; line-height:15px; white-space:nowrap">
\r
1033 <DIV id="text140_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:229; margin-top:7143; line-height:15px; white-space:nowrap">
\r
1034 \81¨
\8e\9e\8aÔ
\82Ì
\89Á
\8c¸
\8eZ (clib)</DIV>
\r
1036 <v:line style="position:absolute;" from="0,6774" to="563,6774" strokecolor="#000000" strokeweight="1pt"/>
\r
1037 <v:line style="position:absolute;" from="563,6774" to="563,7191" strokecolor="#000000" strokeweight="1pt"/>
\r
1038 <v:line style="position:absolute;" from="563,7191" to="0,7191" strokecolor="#000000" strokeweight="1pt"/>
\r
1039 <v:line style="position:absolute;" from="0,7191" to="0,6774" strokecolor="#000000" strokeweight="1pt"/>
\r
1043 <!-- page 141 -->
\r
1045 <DIV style="position:absolute; margin-left:0; margin-top:7191;">
\r
1046 <A id="svgcats_vml_p141" class="to_tree" onClick="selectTreeElem( '141' );">
\81©</A></DIV>
\r
1047 <DIV style="position:absolute; margin-left:40; margin-top:7194;">
\r
1048 <A href="#svgcats_vml_p142" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1049 <DIV style="position:absolute; margin-left:58; margin-top:7194;">
\r
1050 <A href="#svgcats_vml_p140" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1051 <v:rect style="position:absolute; margin-left:0; margin-top:7207; width:576; height:408;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1052 <DIV id="text141_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:7224; line-height:15px; white-space:nowrap">
\r
1053 <A name="KeyClass">
\r
1054 KeyClass</A></DIV>
\r
1055 <v:rect style="position:absolute; margin-left:28; margin-top:7383; width:340; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1056 <DIV id="text141_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:7390; line-height:13px; white-space:nowrap">
\r
1057 Function KeyClass::IsSame( Key as object ) as boolean</DIV>
\r
1058 <v:rect style="position:absolute; margin-left:28; margin-top:7316; width:334; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1059 <DIV id="text141_3" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:7323; line-height:13px; white-space:nowrap">
\r
1060 Function KeyClass::SetKey( Key as object ) as object</DIV>
\r
1061 <DIV id="text141_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:7351; line-height:15px; white-space:nowrap">
\r
1062 \83L
\81[
\82Æ
\82È
\82é
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\93o
\98^
\82µ
\82Ü
\82·
\81B
\88ê
\93x
\82µ
\82©
\93o
\98^
\82Å
\82«
\82Ü
\82¹
\82ñ
\81B
\95Ô
\82è
\92l
\82Í
\81AKey
\82Å
\82·
\81B</DIV>
\r
1063 <DIV id="text141_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:7420; line-height:15px; white-space:nowrap">
\r
1064 \88È
\91O
\93o
\98^
\82µ
\82½
\83L
\81[
\82Æ
\93¯
\82¶
\82©
\82Ç
\82¤
\82©
\82ð
\94»
\92è
\82µ
\82Ü
\82·
\81B</DIV>
\r
1065 <DIV id="text141_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:29; margin-top:7458; line-height:15px; white-space:nowrap">
\r
1066 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1067 <v:rect style="position:absolute; margin-left:40; margin-top:7479; width:364; height:70;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1068 <DIV id="text141_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:48; margin-top:7485; line-height:15px; white-space:nowrap">
\r
1069 Dim g_AppKey<BR/>
\r
1071 Dim AppKey : Set AppKey = new KeyClass ' for Ident only<BR/>
\r
1072 Set g_AppKey = new KeyClass : g_AppKey.SetKey( AppKey )</DIV>
\r
1073 <v:rect style="position:absolute; margin-left:40; margin-top:7558; width:442; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1074 <DIV id="text141_8" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:48; margin-top:7565; line-height:13px; white-space:nowrap">
\r
1075 If not g_AppKey.IsSame( AppKey ) Then Err.Raise 1,,"Invalied AppKey"</DIV>
\r
1076 <DIV id="text141_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:24; margin-top:7255; line-height:15px; white-space:nowrap">
\r
1077 \88È
\91O
\93o
\98^
\82µ
\82½
\93Á
\92è
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82©
\82Ç
\82¤
\82©
\82ð
\94»
\92è
\82µ
\82Ü
\82·
\81B<BR/>
\r
1078 KeyClass
\82©
\82ç
\93Á
\92è
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\8eæ
\93¾
\82·
\82é
\82±
\82Æ
\82Í
\82Å
\82«
\82È
\82¢
\82Ì
\82Å
\81A
\83O
\83\8d\81[
\83o
\83\8b\83X
\83R
\81[
\83v
\82É
\81A<BR/>
\r
1079 KeyClass
\83I
\83u
\83W
\83F
\83N
\83g
\82ð
\92u
\82¢
\82Ä
\82à
\81A
\93Á
\92è
\82Ì
\83I
\83u
\83W
\83F
\83N
\83g
\82Ö
\82Ì
\8eQ
\8fÆ
\82ð
\95¡
\90»
\82·
\82é
\82±
\82Æ
\82©
\82ç
\8eç
\82è
\82Ü
\82·
\81B</DIV>
\r
1081 <v:line style="position:absolute;" from="0,7207" to="576,7207" strokecolor="#000000" strokeweight="1pt"/>
\r
1082 <v:line style="position:absolute;" from="576,7207" to="576,7615" strokecolor="#000000" strokeweight="1pt"/>
\r
1083 <v:line style="position:absolute;" from="576,7615" to="0,7615" strokecolor="#000000" strokeweight="1pt"/>
\r
1084 <v:line style="position:absolute;" from="0,7615" to="0,7207" strokecolor="#000000" strokeweight="1pt"/>
\r
1088 <!-- page 142 -->
\r
1090 <DIV style="position:absolute; margin-left:0; margin-top:7615;">
\r
1091 <A id="svgcats_vml_p142" class="to_tree" onClick="selectTreeElem( '142' );">
\81©</A></DIV>
\r
1092 <DIV style="position:absolute; margin-left:40; margin-top:7618;">
\r
1093 <A href="#svgcats_vml_p143" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1094 <DIV style="position:absolute; margin-left:58; margin-top:7618;">
\r
1095 <A href="#svgcats_vml_p141" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1096 <v:rect style="position:absolute; margin-left:0; margin-top:7631; width:587; height:319;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1097 <DIV id="text142_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:19; margin-top:7648; line-height:15px; white-space:nowrap">
\r
1099 \83V
\83X
\83e
\83\80\81AOS
\81A
\83\8c\83W
\83X
\83g
\83\8a</A></DIV>
\r
1100 <DIV id="text142_2" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:65; margin-top:7876; line-height:15px; white-space:nowrap">
\r
1101 \81¨
\83\8c\83W
\83X
\83g
\83\8a (VBS)</DIV>
\r
1102 <DIV id="text142_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:26; margin-top:7876; line-height:15px; white-space:nowrap">
\r
1104 <DIV id="text142_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:35; margin-top:7683; line-height:15px; white-space:nowrap">
\r
1105 <A href="#RegEnumKey" style="text-decoration: none">
\r
1106 \81¨ RegEnumKey</A></DIV>
\r
1107 <DIV id="text142_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:158; margin-top:7683; line-height:15px; white-space:nowrap">
\r
1108 \83\8c\83W
\83X
\83g
\83\8a\82Ì
\83T
\83u
\83L
\81[
\82ð
\97ñ
\8b\93\82µ
\82Ü
\82·
\81B</DIV>
\r
1109 <DIV id="text142_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:35; margin-top:7704; line-height:15px; white-space:nowrap">
\r
1110 <A href="#RegEnumValues" style="text-decoration: none">
\r
1111 \81¨ RegEnumValues</A></DIV>
\r
1112 <DIV id="text142_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:158; margin-top:7704; line-height:15px; white-space:nowrap">
\r
1113 \8ew
\92è
\82Ì
\83\8c\83W
\83X
\83g
\83\8a\81E
\83L
\81[
\82É
\93ü
\82Á
\82Ä
\82¢
\82é
\92l
\82ð
\97ñ
\8b\93\82µ
\82Ü
\82·
\81B</DIV>
\r
1114 <DIV id="text142_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:35; margin-top:7746; line-height:15px; white-space:nowrap">
\r
1115 <A href="#RegExport" style="text-decoration: none">
\r
1116 \81¨ RegExport</A></DIV>
\r
1117 <DIV id="text142_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:158; margin-top:7746; line-height:15px; white-space:nowrap">
\r
1118 \83\8c\83W
\83X
\83g
\83\8a\81E
\83L
\81[
\82Ì
\92l
\82ð .reg
\83t
\83@
\83C
\83\8b\82É
\8fo
\97Í
\82µ
\82Ü
\82·
\81B</DIV>
\r
1119 <DIV id="text142_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:35; margin-top:7788; line-height:15px; white-space:nowrap">
\r
1120 <A href="#RegWrite" style="text-decoration: none">
\r
1121 \81¨ RegWrite</A></DIV>
\r
1122 <DIV id="text142_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:35; margin-top:7821; line-height:15px; white-space:nowrap">
\r
1123 <A href="vbslib_07.html#RegWriteOpenExt" style="text-decoration: none">
\r
1124 \81¨ RegWriteOpenExt</A></DIV>
\r
1125 <DIV id="text142_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:35; margin-top:7840; line-height:15px; white-space:nowrap">
\r
1126 <A href="vbslib_07.html#RegWriteAsterExt" style="text-decoration: none">
\r
1127 \81¨ RegWriteAsterExt</A></DIV>
\r
1128 <DIV id="text142_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:180; margin-top:7821; line-height:15px; white-space:nowrap">
\r
1129 \8ew
\92è
\82Ì
\8ag
\92£
\8eq
\82Ì [
\8aJ
\82(&O)]
\83\81\83j
\83\85\81[
\82Ì
\83R
\83}
\83\93\83h
\82ð
\93o
\98^
\82µ
\82Ü
\82·
\81B</DIV>
\r
1130 <DIV id="text142_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:180; margin-top:7840; line-height:15px; white-space:nowrap">
\r
1131 \82·
\82×
\82Ä
\82Ì
\83t
\83@
\83C
\83\8b\82É
\91Î
\82·
\82é
\83R
\83\93\83e
\83L
\83X
\83g
\83\81\83j
\83\85\81[
\82ð
\92Ç
\89Á
\93o
\98^
\82µ
\82Ü
\82·
\81B</DIV>
\r
1132 <DIV id="text142_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:180; margin-top:7788; line-height:15px; white-space:nowrap">
\r
1133 \83\8c\83W
\83X
\83g
\83\8a\82É
\83\89\83C
\83g
\82µ
\82Ü
\82·
\81B</DIV>
\r
1134 <DIV id="text142_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:35; margin-top:7725; line-height:15px; white-space:nowrap">
\r
1135 <A href="#RegExists" style="text-decoration: none">
\r
1136 \81¨ RegExists</A></DIV>
\r
1137 <DIV id="text142_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:158; margin-top:7725; line-height:15px; white-space:nowrap">
\r
1138 \8ew
\92è
\82Ì
\83\8c\83W
\83X
\83g
\83\8a\81E
\83L
\81[
\82©
\92l
\82ª
\91¶
\8dÝ
\82·
\82é
\82©
\82Ç
\82¤
\82©
\82ð
\94»
\92è
\82µ
\82Ü
\82·
\81B</DIV>
\r
1139 <DIV id="text142_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:65; margin-top:7902; line-height:15px; white-space:nowrap">
\r
1140 <A href="vbslib_10.html#var" style="text-decoration: none">
\r
1141 \81¨
\83o
\81[
\83W
\83\87\83\93\94»
\92è
\81A
\8aÂ
\8b«
\95Ï
\90\94</A></DIV>
\r
1143 <v:line style="position:absolute;" from="0,7631" to="587,7631" strokecolor="#000000" strokeweight="1pt"/>
\r
1144 <v:line style="position:absolute;" from="587,7631" to="587,7950" strokecolor="#000000" strokeweight="1pt"/>
\r
1145 <v:line style="position:absolute;" from="587,7950" to="0,7950" strokecolor="#000000" strokeweight="1pt"/>
\r
1146 <v:line style="position:absolute;" from="0,7950" to="0,7631" strokecolor="#000000" strokeweight="1pt"/>
\r
1150 <!-- page 143 -->
\r
1152 <DIV style="position:absolute; margin-left:0; margin-top:7950;">
\r
1153 <A id="svgcats_vml_p143" class="to_tree" onClick="selectTreeElem( '143' );">
\81©</A></DIV>
\r
1154 <DIV style="position:absolute; margin-left:40; margin-top:7953;">
\r
1155 <A href="#svgcats_vml_p144" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1156 <DIV style="position:absolute; margin-left:58; margin-top:7953;">
\r
1157 <A href="#svgcats_vml_p142" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1158 <v:rect style="position:absolute; margin-left:0; margin-top:7966; width:544; height:381;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1159 <DIV id="text143_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:7983; line-height:15px; white-space:nowrap">
\r
1160 <A name="RegEnumKey">
\r
1161 RegEnumKey</A></DIV>
\r
1162 <v:rect style="position:absolute; margin-left:28; margin-top:8019; width:484; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1163 <DIV id="text143_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:8026; line-height:13px; white-space:nowrap">
\r
1164 Sub RegEnumKey( Path as string, out_Keys as array of string, Opt as integer )</DIV>
\r
1165 <DIV id="text143_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8056; line-height:15px; white-space:nowrap">
\r
1166 \83\8c\83W
\83X
\83g
\83\8a\82Ì
\83T
\83u
\83L
\81[
\82ð
\97ñ
\8b\93\82µ
\82Ü
\82·
\81B</DIV>
\r
1167 <DIV id="text143_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8082; line-height:15px; white-space:nowrap">
\r
1168 \81y
\88ø
\90\94\81z</DIV>
\r
1169 <DIV id="text143_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:8082; line-height:15px; white-space:nowrap">
\r
1171 <DIV id="text143_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:8101; line-height:15px; white-space:nowrap">
\r
1173 <DIV id="text143_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:8082; line-height:15px; white-space:nowrap">
\r
1174 \83\8c\83W
\83X
\83g
\83\8a\82Ì
\83L
\81[
\82Ì
\83p
\83X</DIV>
\r
1175 <DIV id="text143_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:8101; line-height:15px; white-space:nowrap">
\r
1176 \81i
\8fo
\97Í
\81j
\83T
\83u
\83L
\81[
\82Ì
\96¼
\91O
\82Ì
\94z
\97ñ</DIV>
\r
1177 <DIV id="text143_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8161; line-height:15px; white-space:nowrap">
\r
1178 \83t
\83@
\83C
\83\8b\81F</DIV>
\r
1179 <v:rect style="position:absolute; margin-left:97; margin-top:8159; width:75; height:19;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
1180 <DIV id="text143_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:105; margin-top:8163; line-height:13px; white-space:nowrap">
\r
1182 <v:rect style="position:absolute; margin-left:34; margin-top:8246; width:364; height:70;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1183 <DIV id="text143_11" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:42; margin-top:8252; line-height:15px; white-space:nowrap">
\r
1184 Dim keys<BR/>
\r
1186 RegEnumKey "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\" + _<BR/>
\r
1187 "Windows\CurrentVersion", keys, Empty</DIV>
\r
1188 <DIV id="text143_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:28; margin-top:8227; line-height:15px; white-space:nowrap">
\r
1189 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1190 <DIV id="text143_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:8120; line-height:15px; white-space:nowrap">
\r
1192 <DIV id="text143_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:8120; line-height:15px; white-space:nowrap">
\r
1193 \83I
\83v
\83V
\83\87\83\93\81B Empty
\82© F_SubFolder</DIV>
\r
1194 <DIV id="text143_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:151; margin-top:7988; line-height:12px; white-space:nowrap">
\r
1195 <A href="#system" style="text-decoration: none">
\r
1196 [
\90e:
\83V
\83X
\83e
\83\80\81AOS
\81A
\83\8c\83W
\83X
\83g
\83\8a ]</A></DIV>
\r
1197 <DIV id="text143_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:319; margin-top:7986; line-height:15px; white-space:nowrap">
\r
1199 <DIV id="text143_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8195; line-height:15px; white-space:nowrap">
\r
1200 \83T
\83u
\83L
\81[
\82ª
\96³
\82¢
\82Æ
\82«
\82Í
\81AUBound( out_Keys ) = -1
\82É
\82È
\82è
\82Ü
\82·
\81B</DIV>
\r
1202 <v:line style="position:absolute;" from="0,7966" to="544,7966" strokecolor="#000000" strokeweight="1pt"/>
\r
1203 <v:line style="position:absolute;" from="544,7966" to="544,8347" strokecolor="#000000" strokeweight="1pt"/>
\r
1204 <v:line style="position:absolute;" from="544,8347" to="0,8347" strokecolor="#000000" strokeweight="1pt"/>
\r
1205 <v:line style="position:absolute;" from="0,8347" to="0,7966" strokecolor="#000000" strokeweight="1pt"/>
\r
1209 <!-- page 144 -->
\r
1211 <DIV style="position:absolute; margin-left:0; margin-top:8347;">
\r
1212 <A id="svgcats_vml_p144" class="to_tree" onClick="selectTreeElem( '144' );">
\81©</A></DIV>
\r
1213 <DIV style="position:absolute; margin-left:40; margin-top:8350;">
\r
1214 <A href="#svgcats_vml_p145" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1215 <DIV style="position:absolute; margin-left:58; margin-top:8350;">
\r
1216 <A href="#svgcats_vml_p143" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1217 <v:rect style="position:absolute; margin-left:0; margin-top:8363; width:502; height:455;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1218 <DIV id="text144_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:8380; line-height:15px; white-space:nowrap">
\r
1219 <A name="RegEnumValues">
\r
1220 RegEnumValues</A></DIV>
\r
1221 <v:rect style="position:absolute; margin-left:28; margin-top:8415; width:454; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1222 <DIV id="text144_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:8422; line-height:13px; white-space:nowrap">
\r
1223 Sub RegEnumValues( Path as string, out_Values as array of RegValueName )</DIV>
\r
1224 <DIV id="text144_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8452; line-height:15px; white-space:nowrap">
\r
1225 \8ew
\92è
\82Ì
\83\8c\83W
\83X
\83g
\83\8a\81E
\83L
\81[
\82É
\93ü
\82Á
\82Ä
\82¢
\82é
\92l
\82ð
\97ñ
\8b\93\82µ
\82Ü
\82·
\81B</DIV>
\r
1226 <DIV id="text144_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8478; line-height:15px; white-space:nowrap">
\r
1227 \81y
\88ø
\90\94\81z</DIV>
\r
1228 <DIV id="text144_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:8478; line-height:15px; white-space:nowrap">
\r
1230 <DIV id="text144_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:8497; line-height:15px; white-space:nowrap">
\r
1232 <DIV id="text144_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:8478; line-height:15px; white-space:nowrap">
\r
1233 \83\8c\83W
\83X
\83g
\83\8a\82Ì
\83L
\81[
\82Ì
\83p
\83X</DIV>
\r
1234 <DIV id="text144_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:8497; line-height:15px; white-space:nowrap">
\r
1235 \81i
\8fo
\97Í
\81j
\92l
\82Æ
\8c^
\96¼
\82Ì
\94z
\97ñ</DIV>
\r
1236 <DIV id="text144_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8528; line-height:15px; white-space:nowrap">
\r
1237 \83t
\83@
\83C
\83\8b\81F</DIV>
\r
1238 <v:rect style="position:absolute; margin-left:97; margin-top:8526; width:75; height:19;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
1239 <DIV id="text144_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:105; margin-top:8530; line-height:13px; white-space:nowrap">
\r
1241 <v:rect style="position:absolute; margin-left:34; margin-top:8710; width:166; height:70;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1242 <DIV id="text144_11" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:42; margin-top:8716; line-height:15px; white-space:nowrap">
\r
1243 Class RegValueName<BR/>
\r
1244 Public Name as string<BR/>
\r
1245 Public Type_ as string<BR/>
\r
1247 <DIV id="text144_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:18; margin-top:8687; line-height:15px; white-space:nowrap">
\r
1248 <A name="RegValueName">
\r
1249 RegValueName
\83N
\83\89\83X</A></DIV>
\r
1250 <DIV id="text144_13" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#0000FF; margin-left:390; margin-top:8422; line-height:13px; white-space:nowrap">
\r
1251 <A href="#RegValueName" style="text-decoration: none">
\r
1252 RegValueName</A></DIV>
\r
1253 <v:rect style="position:absolute; margin-left:34; margin-top:8592; width:430; height:70;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1254 <DIV id="text144_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:42; margin-top:8598; line-height:15px; white-space:nowrap">
\r
1255 Dim values<BR/>
\r
1257 RegEnumValues "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\" + _<BR/>
\r
1258 "CurrentVersion\Setup", values</DIV>
\r
1259 <DIV id="text144_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:28; margin-top:8573; line-height:15px; white-space:nowrap">
\r
1260 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1261 <DIV id="text144_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:329; margin-top:8497; line-height:15px; white-space:nowrap">
\r
1262 <A href="#RegValueName" style="text-decoration: none">
\r
1263 \81¨ RegValueName
\83N
\83\89\83X</A></DIV>
\r
1264 <DIV id="text144_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:180; margin-top:8385; line-height:12px; white-space:nowrap">
\r
1265 <A href="#system" style="text-decoration: none">
\r
1266 [
\90e:
\83V
\83X
\83e
\83\80\81AOS
\81A
\83\8c\83W
\83X
\83g
\83\8a ]</A></DIV>
\r
1267 <DIV id="text144_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:338; margin-top:8383; line-height:15px; white-space:nowrap">
\r
1270 <v:line style="position:absolute;" from="0,8363" to="502,8363" strokecolor="#000000" strokeweight="1pt"/>
\r
1271 <v:line style="position:absolute;" from="502,8363" to="502,8818" strokecolor="#000000" strokeweight="1pt"/>
\r
1272 <v:line style="position:absolute;" from="502,8818" to="0,8818" strokecolor="#000000" strokeweight="1pt"/>
\r
1273 <v:line style="position:absolute;" from="0,8818" to="0,8363" strokecolor="#000000" strokeweight="1pt"/>
\r
1277 <!-- page 145 -->
\r
1279 <DIV style="position:absolute; margin-left:0; margin-top:8818;">
\r
1280 <A id="svgcats_vml_p145" class="to_tree" onClick="selectTreeElem( '145' );">
\81©</A></DIV>
\r
1281 <DIV style="position:absolute; margin-left:40; margin-top:8821;">
\r
1282 <A href="#svgcats_vml_p146" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1283 <DIV style="position:absolute; margin-left:58; margin-top:8821;">
\r
1284 <A href="#svgcats_vml_p144" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1285 <v:rect style="position:absolute; margin-left:0; margin-top:8834; width:476; height:311;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1286 <DIV id="text145_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:8851; line-height:15px; white-space:nowrap">
\r
1287 <A name="RegExists">
\r
1288 RegExists</A></DIV>
\r
1289 <v:rect style="position:absolute; margin-left:28; margin-top:8886; width:226; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1290 <DIV id="text145_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:8893; line-height:13px; white-space:nowrap">
\r
1291 Sub RegExists( RegPath as string )</DIV>
\r
1292 <DIV id="text145_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8923; line-height:15px; white-space:nowrap">
\r
1293 \8ew
\92è
\82Ì
\83\8c\83W
\83X
\83g
\83\8a\81E
\83L
\81[
\82©
\92l
\82ª
\91¶
\8dÝ
\82·
\82é
\82©
\82Ç
\82¤
\82©
\82ð
\94»
\92è
\82µ
\82Ü
\82·
\81B</DIV>
\r
1294 <DIV id="text145_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8949; line-height:15px; white-space:nowrap">
\r
1295 \81y
\88ø
\90\94\81z</DIV>
\r
1296 <DIV id="text145_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:8949; line-height:15px; white-space:nowrap">
\r
1298 <DIV id="text145_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:8949; line-height:15px; white-space:nowrap">
\r
1299 \83\8c\83W
\83X
\83g
\83\8a\82Ì
\83L
\81[
\82Ì
\83p
\83X</DIV>
\r
1300 <DIV id="text145_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9036; line-height:15px; white-space:nowrap">
\r
1301 \83t
\83@
\83C
\83\8b\81F</DIV>
\r
1302 <v:rect style="position:absolute; margin-left:97; margin-top:9034; width:75; height:19;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
1303 <DIV id="text145_8" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:105; margin-top:9038; line-height:13px; white-space:nowrap">
\r
1305 <v:rect style="position:absolute; margin-left:44; margin-top:9088; width:400; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1306 <DIV id="text145_9" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:52; margin-top:9095; line-height:13px; white-space:nowrap">
\r
1307 If RegExists( "HKEY_CURRENT_USER\Software\_Test\" ) Then Fail</DIV>
\r
1308 <DIV id="text145_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9069; line-height:15px; white-space:nowrap">
\r
1309 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1310 <DIV id="text145_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:8982; line-height:15px; white-space:nowrap">
\r
1311 Path
\82Ì
\96\96\94ö
\82ª \
\82Ì
\82Æ
\82«
\82Í
\81A
\83L
\81[
\82ª
\82 \82é
\82©
\82Ç
\82¤
\82©
\82ð
\94»
\92è
\82µ
\82Ü
\82·
\81B<BR/>
\r
1312 Path
\82Ì
\96\96\94ö
\82ª \
\82Å
\82Í
\82È
\82¢
\82Æ
\82«
\82Í
\81A
\92l
\82ª
\82 \82é
\82©
\82Ç
\82¤
\82©
\82ð
\94»
\92è
\82µ
\82Ü
\82·
\81B</DIV>
\r
1313 <DIV id="text145_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:301; margin-top:8851; line-height:15px; white-space:nowrap">
\r
1315 <DIV id="text145_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:142; margin-top:8855; line-height:12px; white-space:nowrap">
\r
1316 <A href="#system" style="text-decoration: none">
\r
1317 [
\90e:
\83V
\83X
\83e
\83\80\81AOS
\81A
\83\8c\83W
\83X
\83g
\83\8a ]</A></DIV>
\r
1319 <v:line style="position:absolute;" from="0,8834" to="476,8834" strokecolor="#000000" strokeweight="1pt"/>
\r
1320 <v:line style="position:absolute;" from="476,8834" to="476,9145" strokecolor="#000000" strokeweight="1pt"/>
\r
1321 <v:line style="position:absolute;" from="476,9145" to="0,9145" strokecolor="#000000" strokeweight="1pt"/>
\r
1322 <v:line style="position:absolute;" from="0,9145" to="0,8834" strokecolor="#000000" strokeweight="1pt"/>
\r
1326 <!-- page 146 -->
\r
1328 <DIV style="position:absolute; margin-left:0; margin-top:9145;">
\r
1329 <A id="svgcats_vml_p146" class="to_tree" onClick="selectTreeElem( '146' );">
\81©</A></DIV>
\r
1330 <DIV style="position:absolute; margin-left:40; margin-top:9148;">
\r
1331 <A href="#svgcats_vml_p147" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1332 <DIV style="position:absolute; margin-left:58; margin-top:9148;">
\r
1333 <A href="#svgcats_vml_p145" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1334 <v:rect style="position:absolute; margin-left:0; margin-top:9161; width:529; height:232;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1335 <DIV id="text146_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:9178; line-height:15px; white-space:nowrap">
\r
1336 <A name="RegRead">
\r
1338 <v:rect style="position:absolute; margin-left:22; margin-top:9208; width:232; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1339 <DIV id="text146_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:30; margin-top:9215; line-height:13px; white-space:nowrap">
\r
1340 Function RegRead( Path ) as variant</DIV>
\r
1341 <DIV id="text146_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:30; margin-top:9329; line-height:15px; white-space:nowrap">
\r
1342 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_01.html#Shell_RegRead" style="text-decoration: none">
\r
1343 RegRead (Shell)</A></DIV>
\r
1344 <DIV id="text146_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:131; margin-top:9329; line-height:15px; white-space:nowrap">
\r
1345 \82Æ
\82Ì
\88á
\82¢
\82Í
\81A
\83L
\81[
\82ª
\8c©
\82Â
\82©
\82ç
\82È
\82¢
\82Æ
\82«
\82É
\83G
\83\89\81[
\82É
\82È
\82é
\82Ì
\82Å
\82Í
\82È
\82
\81A</DIV>
\r
1346 <DIV id="text146_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30; margin-top:9345; line-height:15px; white-space:nowrap">
\r
1347 Empty
\82ð
\95Ô
\82·
\82Æ
\82±
\82ë
\82Å
\82·
\81B</DIV>
\r
1348 <DIV id="text146_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30; margin-top:9249; line-height:15px; white-space:nowrap">
\r
1349 \83\8c\83W
\83X
\83g
\83\8a\82©
\82ç
\83\8a\81[
\83h
\82µ
\82Ü
\82·
\81B</DIV>
\r
1350 <DIV id="text146_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9277; line-height:15px; white-space:nowrap">
\r
1351 \81y
\88ø
\90\94\81z</DIV>
\r
1352 <DIV id="text146_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:98; margin-top:9297; line-height:15px; white-space:nowrap">
\r
1353 \95Ô
\82è
\92l</DIV>
\r
1354 <DIV id="text146_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:183; margin-top:9297; line-height:15px; white-space:nowrap">
\r
1355 \92l
\81A
\82Ü
\82½
\82Í Empty</DIV>
\r
1356 <DIV id="text146_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:183; margin-top:9278; line-height:15px; white-space:nowrap">
\r
1357 \83\8a\81[
\83h
\82·
\82é
\8fê
\8f\8a\81B
\83L
\81[
\82Ü
\82½
\82Í
\92l
\82Ì
\96¼
\91O
\82Ö
\82Ì
\83p
\83X
\81B</DIV>
\r
1358 <DIV id="text146_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:98; margin-top:9278; line-height:15px; white-space:nowrap">
\r
1360 <DIV id="text146_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:305; margin-top:9180; line-height:15px; white-space:nowrap">
\r
1362 <DIV id="text146_13" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:142; margin-top:9182; line-height:12px; white-space:nowrap">
\r
1363 <A href="#system" style="text-decoration: none">
\r
1364 [
\90e:
\83V
\83X
\83e
\83\80\81AOS
\81A
\83\8c\83W
\83X
\83g
\83\8a ]</A></DIV>
\r
1366 <v:line style="position:absolute;" from="0,9161" to="529,9161" strokecolor="#000000" strokeweight="1pt"/>
\r
1367 <v:line style="position:absolute;" from="529,9161" to="529,9393" strokecolor="#000000" strokeweight="1pt"/>
\r
1368 <v:line style="position:absolute;" from="529,9393" to="0,9393" strokecolor="#000000" strokeweight="1pt"/>
\r
1369 <v:line style="position:absolute;" from="0,9393" to="0,9161" strokecolor="#000000" strokeweight="1pt"/>
\r
1373 <!-- page 147 -->
\r
1375 <DIV style="position:absolute; margin-left:0; margin-top:9393;">
\r
1376 <A id="svgcats_vml_p147" class="to_tree" onClick="selectTreeElem( '147' );">
\81©</A></DIV>
\r
1377 <DIV style="position:absolute; margin-left:40; margin-top:9396;">
\r
1378 <A href="#svgcats_vml_p148" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1379 <DIV style="position:absolute; margin-left:58; margin-top:9396;">
\r
1380 <A href="#svgcats_vml_p146" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1381 <v:rect style="position:absolute; margin-left:0; margin-top:9409; width:520; height:336;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1382 <DIV id="text147_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:9426; line-height:15px; white-space:nowrap">
\r
1383 <A name="RegExport">
\r
1384 RegExport</A></DIV>
\r
1385 <v:rect style="position:absolute; margin-left:28; margin-top:9461; width:460; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1386 <DIV id="text147_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:36; margin-top:9468; line-height:13px; white-space:nowrap">
\r
1387 Sub RegExport( RegPath as string, OutFilePath as string, Opt as variant )</DIV>
\r
1388 <DIV id="text147_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9498; line-height:15px; white-space:nowrap">
\r
1389 \8ew
\92è
\82Ì
\83\8c\83W
\83X
\83g
\83\8a\81E
\83L
\81[
\82É
\93ü
\82Á
\82Ä
\82¢
\82é
\92l
\82ð .reg
\83t
\83@
\83C
\83\8b\82É
\8fo
\97Í
\82µ
\82Ü
\82·
\81B</DIV>
\r
1390 <DIV id="text147_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9524; line-height:15px; white-space:nowrap">
\r
1391 \81y
\88ø
\90\94\81z</DIV>
\r
1392 <DIV id="text147_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:9524; line-height:15px; white-space:nowrap">
\r
1394 <DIV id="text147_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:9543; line-height:15px; white-space:nowrap">
\r
1396 <DIV id="text147_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:9524; line-height:15px; white-space:nowrap">
\r
1397 \83\8c\83W
\83X
\83g
\83\8a\82Ì
\83L
\81[
\82Ì
\83p
\83X</DIV>
\r
1398 <DIV id="text147_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:9543; line-height:15px; white-space:nowrap">
\r
1399 \8fo
\97Í
\83t
\83@
\83C
\83\8b\83p
\83X</DIV>
\r
1400 <DIV id="text147_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9611; line-height:15px; white-space:nowrap">
\r
1401 \83t
\83@
\83C
\83\8b\81F</DIV>
\r
1402 <v:rect style="position:absolute; margin-left:97; margin-top:9609; width:75; height:19;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
1403 <DIV id="text147_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:105; margin-top:9613; line-height:13px; white-space:nowrap">
\r
1405 <DIV id="text147_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:100; margin-top:9562; line-height:15px; white-space:nowrap">
\r
1407 <DIV id="text147_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:185; margin-top:9562; line-height:15px; white-space:nowrap">
\r
1408 \83I
\83v
\83V
\83\87\83\93\81B Empty
\82© F_SubFolder</DIV>
\r
1409 <v:rect style="position:absolute; margin-left:42; margin-top:9666; width:364; height:40;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1410 <DIV id="text147_13" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50; margin-top:9672; line-height:15px; white-space:nowrap">
\r
1411 RegExport "HKEY_CURRENT_USER\Control Panel\Keyboard", _<BR/>
\r
1412 "keyboard.reg", F_SubFolder</DIV>
\r
1413 <DIV id="text147_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9647; line-height:15px; white-space:nowrap">
\r
1414 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1415 <DIV id="text147_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:142; margin-top:9430; line-height:12px; white-space:nowrap">
\r
1416 <A href="#system" style="text-decoration: none">
\r
1417 [
\90e:
\83V
\83X
\83e
\83\80\81AOS
\81A
\83\8c\83W
\83X
\83g
\83\8a ]</A></DIV>
\r
1418 <DIV id="text147_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:291; margin-top:9427; line-height:15px; white-space:nowrap">
\r
1421 <v:line style="position:absolute;" from="0,9409" to="520,9409" strokecolor="#000000" strokeweight="1pt"/>
\r
1422 <v:line style="position:absolute;" from="520,9409" to="520,9745" strokecolor="#000000" strokeweight="1pt"/>
\r
1423 <v:line style="position:absolute;" from="520,9745" to="0,9745" strokecolor="#000000" strokeweight="1pt"/>
\r
1424 <v:line style="position:absolute;" from="0,9745" to="0,9409" strokecolor="#000000" strokeweight="1pt"/>
\r
1428 <!-- page 148 -->
\r
1430 <DIV style="position:absolute; margin-left:0; margin-top:9745;">
\r
1431 <A id="svgcats_vml_p148" class="to_tree" onClick="selectTreeElem( '148' );">
\81©</A></DIV>
\r
1432 <DIV style="position:absolute; margin-left:40; margin-top:9748;">
\r
1433 <A href="vbslib_07.html#svgcats_vml_p149" style="font-size=8pt;text-decoration:none;">
\81¥</A></DIV>
\r
1434 <DIV style="position:absolute; margin-left:58; margin-top:9748;">
\r
1435 <A href="#svgcats_vml_p147" style="font-size=8pt;text-decoration:none;">
\81£</A></DIV>
\r
1436 <v:rect style="position:absolute; margin-left:0; margin-top:9761; width:490; height:367;" fillcolor="white" strokecolor="black" strokeweight="1pt"/>
\r
1437 <DIV id="text148_1" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24; margin-top:9778; line-height:15px; white-space:nowrap">
\r
1438 <A name="RegWrite">
\r
1439 RegWrite</A></DIV>
\r
1440 <v:rect style="position:absolute; margin-left:22; margin-top:9808; width:220; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1441 <DIV id="text148_2" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:30; margin-top:9815; line-height:13px; white-space:nowrap">
\r
1442 Sub RegWrite( Path, Value, Type )</DIV>
\r
1443 <DIV id="text148_3" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30; margin-top:9849; line-height:15px; white-space:nowrap">
\r
1444 \83\8c\83W
\83X
\83g
\83\8a\82É
\83\89\83C
\83g
\82µ
\82Ü
\82·
\81B</DIV>
\r
1445 <DIV id="text148_4" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9877; line-height:15px; white-space:nowrap">
\r
1446 \81y
\88ø
\90\94\81z</DIV>
\r
1447 <DIV id="text148_5" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:98; margin-top:9897; line-height:15px; white-space:nowrap">
\r
1449 <DIV id="text148_6" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:98; margin-top:9916; line-height:15px; white-space:nowrap">
\r
1451 <DIV id="text148_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:183; margin-top:9897; line-height:15px; white-space:nowrap">
\r
1453 <DIV id="text148_8" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:183; margin-top:9916; line-height:15px; white-space:nowrap">
\r
1454 \92l
\82Ì
\83^
\83C
\83v</DIV>
\r
1455 <DIV id="text148_9" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:183; margin-top:9878; line-height:15px; white-space:nowrap">
\r
1456 \83\89\83C
\83g
\82·
\82é
\8fê
\8f\8a\81B
\83L
\81[
\82Ü
\82½
\82Í
\92l
\82Ì
\96¼
\91O
\82Ö
\82Ì
\83p
\83X
\81B</DIV>
\r
1457 <DIV id="text148_10" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:98; margin-top:9878; line-height:15px; white-space:nowrap">
\r
1459 <DIV id="text148_11" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30; margin-top:9997; line-height:15px; white-space:nowrap">
\r
1460 Path
\82É
\82æ
\82Á
\82Ä
\82Í
\8aÇ
\97\9d\8eÒ
\8c \8cÀ
\82ª
\95K
\97v
\82Å
\82·</DIV>
\r
1461 <DIV id="text148_12" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:30; margin-top:10050; line-height:15px; white-space:nowrap">
\r
1462 \83T
\83\93\83v
\83\8b\81F</DIV>
\r
1463 <v:rect style="position:absolute; margin-left:37; margin-top:10071; width:376; height:25;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>
\r
1464 <DIV id="text148_13" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:45; margin-top:10078; line-height:13px; white-space:nowrap">
\r
1465 RegWrite "HKEY_CLASSES_ROOT\.ext\", "ExtSample", "REG_SZ"</DIV>
\r
1466 <DIV id="text148_14" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:296; margin-top:9779; line-height:15px; white-space:nowrap">
\r
1468 <DIV id="text148_15" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#0000FF; margin-left:142; margin-top:9782; line-height:12px; white-space:nowrap">
\r
1469 <A href="#system" style="text-decoration: none">
\r
1470 [
\90e:
\83V
\83X
\83e
\83\80\81AOS
\81A
\83\8c\83W
\83X
\83g
\83\8a ]</A></DIV>
\r
1471 <DIV id="text148_16" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:36; margin-top:9956; line-height:15px; white-space:nowrap">
\r
1472 \83t
\83@
\83C
\83\8b\81F</DIV>
\r
1473 <v:rect style="position:absolute; margin-left:97; margin-top:9954; width:75; height:19;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>
\r
1474 <DIV id="text148_17" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:105; margin-top:9958; line-height:13px; white-space:nowrap">
\r
1476 <DIV id="text148_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:30; margin-top:10014; line-height:15px; white-space:nowrap">
\r
1477 <A href="..\VBS
\83\81\83\82.files\VBS
\83\81\83\82_01.html#Shell_RegWrite" style="text-decoration: none">
\r
1478 RegWrite (Shell)</A></DIV>
\r
1479 <DIV id="text148_19" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:132; margin-top:10014; line-height:15px; white-space:nowrap">
\r
1480 \82Æ
\82Ì
\88á
\82¢
\82Í
\81A
\83G
\83\89\81[
\83\81\83b
\83Z
\81[
\83W
\82Ì
\93à
\97e
\82Å
\82·
\81B</DIV>
\r
1482 <v:line style="position:absolute;" from="0,9761" to="490,9761" strokecolor="#000000" strokeweight="1pt"/>
\r
1483 <v:line style="position:absolute;" from="490,9761" to="490,10128" strokecolor="#000000" strokeweight="1pt"/>
\r
1484 <v:line style="position:absolute;" from="490,10128" to="0,10128" strokecolor="#000000" strokeweight="1pt"/>
\r
1485 <v:line style="position:absolute;" from="0,10128" to="0,9761" strokecolor="#000000" strokeweight="1pt"/>
\r
1487 <DIV style="position:absolute; margin-left:0; margin-top:10128;">
\r
1488 <A id="svgcats_vml_p148" class="to_tree" onClick="selectTreeElem( '148' );">
\81©</A></DIV>
\r
1489 <DIV style="position:absolute; margin-left:20; margin-top:10128;">
\r
1490 <A id="page_group_bottom" href="vbslib_07.html#page_group_top" style="text-decoration:none;">
\81«</A></DIV>
\r
1495 <TABLE height="100%" style="position:absolute; margin-top:-9999"><TR><TD></TD></TR></TABLE>
\r