OSDN Git Service

Version 4.90
[vbslib/main.git] / _src / _vbslib manual.files / vbs_memo.files / vbs_memo_11.html
1 <?xml version="1.0" encoding="Shift_JIS"?>\r
2 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"\r
3  "http://www.w3.org/TR/html4/strict.dtd">\r
4 <!-- saved from url=(0014)about:internet --> <!-- for too much local security warning -->\r
5 <HTML lang="ja" xmlns:v="urn:schemas-microsoft-com:vml"> \r
6 <HEAD>\r
7 \r
8 <META http-equiv="Content-Type" content="text/html; charset=shift_jis"/>\r
9 <TITLE>VBS\83\81\83\82</TITLE>\r
10 \r
11 <STYLE type="text/css">\r
12 v\:line, v\:rect, v\:fill, v\:image, v\:stroke, v\:roundrect, v\:oval, v\:shape, v\:path, v\:textpath\r
13   { behavior: url(#default#VML); }\r
14 A { text-decoration:none; }\r
15 A.to_tree { color:#CCDDCC; position:absolute; margin-left:0px; font-size:8pt; }\r
16 A.to_next_page { position:absolute; margin-left:40px; font-size:8pt; }\r
17 A.to_prev_page { position:absolute; margin-left:58px; font-size:8pt; }\r
18 A:visited { color:blue }\r
19 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->\r
20 DIV.tooltip { color:blue; }\r
21 DIV.tooltip textarea { display:none; margin-top:-5px; overflow:hidden; }\r
22 <!-- end of [PATCH_OF:urlrep_tooltip] -->\r
23 </STYLE>\r
24 \r
25 <SCRIPT type="text/javascript">\r
26 //<![CDATA[\r
27 \r
28 function  onLoad()\r
29 {\r
30   var  divs, i\r
31 \r
32   if ( !document.getElementsByTagName )  return;\r
33 \r
34   divs = document.getElementsByTagName( "A" );\r
35   for ( i = 0; i < divs.length; i++ ) {\r
36     if ( divs[i].className == "to_tree" ) {\r
37       divs[i].style.color = "blue";\r
38       divs[i].style.cursor = "hand";\r
39     }\r
40   }\r
41 }\r
42 \r
43 function  selectTreeElem( num )\r
44 {\r
45   var tree_url, i1, i2, fname, fname2\r
46 \r
47   if ( parent.frames.length == 0 ) {\r
48     location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +\r
49      "&f2=vbs_memo.files/vbs_memo_11.html&sub2=svgcats_vml_p" + num;\r
50   }\r
51   else {\r
52     tree_url = parent.tree.location.href;\r
53     i1 = tree_url.lastIndexOf( "/" );\r
54     i2 = tree_url.lastIndexOf( "\\" );\r
55     if ( i2 > i1 )  i1 = i2;\r
56     fname = tree_url.substring( i1 + 1 );\r
57     i1 = fname.lastIndexOf( "#" );\r
58     if ( i1 >= 0 )  fname = fname.substring( 0, i1 );\r
59     fname2 = "vbs_memo.files/vbs_memo_tree.html";\r
60     i1 = fname2.lastIndexOf( "/" );\r
61     i2 = fname2.lastIndexOf( "\\" );\r
62     if ( i2 > i1 )  i1 = i2;\r
63     fname2 = fname2.substring( i1 + 1 );\r
64     if ( fname == fname2 )\r
65       parent.tree.selectTreeElem( "svgcats_index_p" + num );\r
66     else\r
67       location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +\r
68        "&f2=vbs_memo.files/vbs_memo_11.html&sub2=svgcats_vml_p" + num;\r
69   }\r
70 }\r
71 \r
72 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->\r
73 function  over( text, value, cols ){ text.style.display = "inline";\r
74   text.cols=cols; text.rows=1; text.value=value; text.focus(); text.select(); }\r
75 function  out( text ){ text.style.display = "none"; }\r
76 <!-- end of [PATCH_OF:urlrep_tooltip] -->\r
77 \r
78 //]]>\r
79 </SCRIPT>\r
80 \r
81 </HEAD>\r
82 <BODY bgcolor="#CCDDCC" onLoad="onLoad();">\r
83 \r
84 <DIV style="position:absolute; margin-left:0px; margin-top:8px; color:red; font-size:8pt;">\r
85 (for Internet Explorer)</DIV>\r
86 <v:rect style="position:absolute; margin-left:0px; margin-top:8px; width:130px; height:16px;" fillcolor="white" strokecolor="white"/>\r
87 \r
88 <PAGESET>\r
89  \r
90 <!-- page 172 --> \r
91 <PAGE>\r
92 <A id="svgcats_vml_p172" class="to_tree" style="margin-top:-11px;" onClick="selectTreeElem( '172' );">\81©</A>\r
93 <A href="#svgcats_vml_p173" class="to_next_page" style="margin-top:-11px;">\81¥</A>\r
94 <A href="vbs_memo_10.html#svgcats_vml_p171" class="to_prev_page" style="margin-top:-11px;">\81£</A>\r
95 <DIV style="position:absolute; margin-left:20px; margin-top:-16px;">\r
96 <A id="page_group_top" href="vbs_memo_10.html#page_group_bottom" style="text-decoration:none;">\81ª</A></DIV>\r
97 <v:rect style="position:absolute; margin-left:0px; margin-top:0px; width:561px; height:856px;" fillcolor="white"/>\r
98 <DIV id="text172_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:17px; line-height:15px; white-space:nowrap">\r
99 <A name="get_StaticObjects">\r
100 get_StaticObjects : \90Ã\93I\83I\83u\83W\83F\83N\83g\82Ì\88ê\97\97</A></DIV>\r
101 <DIV id="text172_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:654px; line-height:15px; white-space:nowrap">\r
102 \83I\83u\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\81i.vbs\83t\83@\83C\83\8b\81\82É\93ü\82Á\82Ä\82¢\82é\90Ã\93I\83I\83u\83W\83F\83N\83g\82Ì\88ê\97\97\82Í\81A<BR/>\r
103 get_StaticObjects \82Æ\82¢\82¤\8aÖ\90\94\96¼\82Å\8eæ\93¾\82Å\82«\82é\82æ\82¤\95W\8f\80\89»\82µ\82Ü\82·\81B<BR/>\r
104 out_Obj \82É\95Ô\82·\83I\83u\83W\83F\83N\83g\82Í\81AInterfaceName \82É\93ü\82Á\82½\96¼\91O\82Ì\83C\83\93\83^\81[\83t\83F\83C\83X\82ð<BR/>\r
105 \8e\9d\82Á\82Ä\82¢\82é\82à\82Ì\81A\82Ü\82½\82Í\81A\83N\83\89\83X\82ª InterfaceName \82Ì\82à\82Ì\82Æ\82µ\82Ü\82·\81B<BR/>\r
106 out_Obj \82ª Empty \82ð\95Ô\82·\82Æ\82«\82Í\81A\91Î\89\9e\82·\82é\83I\83u\83W\83F\83N\83g\82ª\91\8dÝ\82µ\82È\82¢\82±\82Æ\82ð\8e¦\82µ\82Ü\82·\81B<BR/>\r
107 \91Î\89\9e\82·\82é\90Ã\93I\83I\83u\83W\83F\83N\83g\82ª\95¡\90\94\82 \82é\82Æ\82«\82Í\81Aout_Obj \82É\94z\97ñ\82ð\95Ô\82µ\82Ü\82·\81B<BR/>\r
108 get_StaticObjects \82ª\8cÄ\82Î\82ê\82é\82Æ\82«\82Ì\83J\83\8c\83\93\83g\81E\83t\83H\83\8b\83_\82Í\81A\95s\92è\82Å\82·\81B</DIV>\r
109 <DIV id="text172_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#0000FF; margin-left:329px; margin-top:20px; line-height:12px; white-space:nowrap">\r
110 <A href="vbs_memo_10.html#vbsool">\r
111\90e: vbsool : \83I\83u\83W\83F\83N\83g\8bL\8fq\96@ ]</A></DIV>\r
112 <v:rect style="position:absolute; margin-left:29px; margin-top:49px; width:436px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
113 <DIV id="text172_4" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:56px; line-height:13px; white-space:nowrap">\r
114 Sub&nbsp; get_StaticObjects( InterfaceName as string, out_Objs as variant )</DIV>\r
115 <DIV id="text172_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:196px; margin-top:113px; line-height:15px; white-space:nowrap">\r
116 \97v\8b\81\82·\82é\90Ã\93I\83I\83u\83W\83F\83N\83g\82Ì\83C\83\93\83^\81[\83t\83F\83C\83X\82Ì\96¼\91O</DIV>\r
117 <DIV id="text172_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:97px; margin-top:113px; line-height:15px; white-space:nowrap">\r
118 InterfaceName</DIV>\r
119 <DIV id="text172_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:113px; line-height:15px; white-space:nowrap">\r
120 \81y\88ø\90\94\81z</DIV>\r
121 <DIV id="text172_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:87px; line-height:15px; white-space:nowrap">\r
122 \83I\83u\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\81i.vbs\83t\83@\83C\83\8b\81\82É\93ü\82Á\82Ä\82¢\82é\90Ã\93I\83I\83u\83W\83F\83N\83g\82Ì\88ê\97\97\82ð\8eæ\93¾\82µ\82Ü\82·\81B</DIV>\r
123 <DIV id="text172_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:97px; margin-top:132px; line-height:15px; white-space:nowrap">\r
124 out_Obj</DIV>\r
125 <DIV id="text172_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:196px; margin-top:132px; line-height:15px; white-space:nowrap">\r
126 \81i\8fo\97Í\81\90Ã\93I\83I\83u\83W\83F\83N\83g\81A\82Ü\82½\82Í\82»\82Ì\94z\97ñ</DIV>\r
127 <DIV id="text172_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:188px; margin-top:175px; line-height:15px; white-space:nowrap">\r
128 <A href="vbs_memo_10.html#get_ObjectsFromFile">\r
129 get_ObjectsFromFile</A></DIV>\r
130 <DIV id="text172_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:175px; line-height:15px; white-space:nowrap">\r
131 get_StaticObjects \8aÖ\90\94\82Í\81A</DIV>\r
132 <DIV id="text172_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:310px; margin-top:175px; line-height:15px; white-space:nowrap">\r
133 \8aÖ\90\94\82©\82ç\8cÄ\82Î\82ê\82Ü\82·\81B</DIV>\r
134 <DIV id="text172_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:456px; line-height:15px; white-space:nowrap">\r
135 \8f\88\97\9d\83t\83\8d\81[\81F</DIV>\r
136 <DIV id="text172_15" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:66px; margin-top:479px; line-height:13px; white-space:nowrap">\r
137 get_ObjectsFromFile</DIV>\r
138 <DIV id="text172_16" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:105px; margin-top:518px; line-height:13px; white-space:nowrap">\r
139 include \81i\83I\83u\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82Ì\82P\82Â\81j</DIV>\r
140 <DIV id="text172_17" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:85px; margin-top:499px; line-height:13px; white-space:nowrap">\r
141 For \81i\83I\83u\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82Ì\83\8b\81[\83v\81j</DIV>\r
142 <DIV id="text172_18" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:105px; margin-top:535px; line-height:13px; white-space:nowrap">\r
143 get_StaticObjects</DIV>\r
144 <DIV id="text172_19" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:591px; line-height:15px; white-space:nowrap">\r
145 get_StaticObjects\8aÖ\90\94\82Í\81A\82»\82ê\82¼\82ê\82Ì\83I\83u\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82Å\92è\8b`\82µ\82Ü\82·\81B<BR/>\r
146 \95¡\90\94\82Ì\83I\83u\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82Å\92è\8b`\82µ\82Ä\82à\81Aget_ObjectsFromFile \82Í\81A\82»\82ê\82¼\82ê\82Ì<BR/>\r
147 get_StaticObjects \8aÖ\90\94\82ð\8bæ\95Ê\82µ\82Ä\8cÄ\82Ñ\8fo\82µ\82Ü\82·\81B</DIV>\r
148 <DIV id="text172_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:210px; line-height:15px; white-space:nowrap">\r
149 get_StaticObjects \8aÖ\90\94\82Í\81A</DIV>\r
150 <DIV id="text172_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:191px; margin-top:210px; line-height:15px; white-space:nowrap">\r
151 <A href="vbs_memo_10.html#get_ClassA">\r
152 \90Ã\93I\83I\83u\83W\83F\83N\83g</A></DIV>\r
153 <DIV id="text172_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:284px; margin-top:210px; line-height:15px; white-space:nowrap">\r
154 \82ð\83\86\81[\83U\81[\82ª\8eg\82¦\82é\82æ\82¤\82É\82·\82é\82½\82ß\82É\81A</DIV>\r
155 <DIV id="text172_23" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:36px; margin-top:226px; line-height:15px; white-space:nowrap">\r
156 \83\89\83C\83u\83\89\83\8a\82ª\8eÀ\91\95\82·\82é\8aÖ\90\94\82Ì\82P\82Â\82Å\82·\81\83\89\83C\83u\83\89\83\8a\82©\82ç\8c©\82ê\82Î\81Aget_StaticObjects<BR/>\r
157 \8aÖ\90\94\82Í\81A\83I\83u\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82Ì\92\86\82Å\92è\8b`\82µ\82Ä\82¢\82é\90Ã\93I\83I\83u\83W\83F\83N\83g\82Ì\88ê\97\97\82ð\81A<BR/>\r
158 \83R\81[\83\8b\8c³\82Ö\93n\82·\8f\88\97\9d\82ð\82µ\82Ü\82·\81B</DIV>\r
159 <v:rect style="position:absolute; margin-left:69px; margin-top:308px; width:394px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
160 <DIV id="text172_24" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:77px; margin-top:314px; line-height:15px; white-space:nowrap">\r
161 Sub&nbsp; get_StaticObjects( InterfaceName, out_Obj )<BR/>\r
162 &nbsp; If IsEmpty( InterfaceName ) or&nbsp; InterfaceName = "ClassI" Then<BR/>\r
163 &nbsp; &nbsp; Set&nbsp; out_Obj = get_ClassA()<BR/>\r
164 &nbsp; ElseIf InterfaceName = "ClassI2" Then<BR/>\r
165 &nbsp; &nbsp; out_Obj = Array( get_ClassA(),&nbsp; get_ClassB() )<BR/>\r
166 &nbsp; End If<BR/>\r
167 End Sub</DIV>\r
168 <DIV id="text172_25" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:51px; margin-top:288px; line-height:15px; white-space:nowrap">\r
169 \92è\8b`\83T\83\93\83v\83\8b\81F</DIV>\r
170 <DIV id="text172_26" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:127px; margin-top:552px; line-height:13px; white-space:nowrap">\r
171 get_Object</DIV>\r
172 <DIV id="text172_27" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:284px; margin-top:779px; line-height:15px; white-space:nowrap">\r
173 <A href="..\vbslib.files\vbslib_12.html#get_ObjectsFromFile">\r
174 \81¨ get_ObjectsFromFile (vbslib)</A></DIV>\r
175 <DIV id="text172_28" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:32px; margin-top:779px; line-height:15px; white-space:nowrap">\r
176 \8eQ\8dl</DIV>\r
177 <DIV id="text172_29" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:74px; margin-top:779px; line-height:15px; white-space:nowrap">\r
178 <A href="vbs_memo_10.html#get_ObjectsFromFile">\r
179 \81¨ get_ObjectsFromFile \82Ì\90à\96¾</A></DIV>\r
180 <DIV id="text172_30" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:32px; margin-top:808px; line-height:15px; white-space:nowrap">\r
181 \83T\83\93\83v\83\8b\83t\83@\83C\83\8b</DIV>\r
182 <DIV id="text172_31" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:150px; margin-top:808px; line-height:15px; white-space:nowrap">\r
183 \81¨ T_NameList \83t\83H\83\8b\83_</DIV>\r
184 <DIV id="text172_32" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:313px; margin-top:808px; line-height:15px; white-space:nowrap">\r
185 \81¨ T_NameList_vbslib \83t\83H\83\8b\83_</DIV>\r
186 \r
187 <v:line from="0,0" to="561,0"/>\r
188 <v:line from="561,0" to="561,856"/>\r
189 <v:line from="561,856" to="0,856"/>\r
190 <v:line from="0,856" to="0,0"/>\r
191 \r
192 </PAGE>\r
193  \r
194 <!-- page 173 --> \r
195 <PAGE>\r
196 <A id="svgcats_vml_p173" class="to_tree" style="margin-top:861px;" onClick="selectTreeElem( '173' );">\81©</A>\r
197 <A href="#svgcats_vml_p174" class="to_next_page" style="margin-top:861px;">\81¥</A>\r
198 <A href="#svgcats_vml_p172" class="to_prev_page" style="margin-top:861px;">\81£</A>\r
199 <v:rect style="position:absolute; margin-left:0px; margin-top:872px; width:579px; height:976px;" fillcolor="white"/>\r
200 <DIV id="text173_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:889px; line-height:15px; white-space:nowrap">\r
201 <A name="get_ModuleConsts">\r
202 get_ModuleConsts : \83N\83\89\83X\82Ì\92è\90\94 (vbsool)</A></DIV>\r
203 <DIV id="text173_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:922px; line-height:15px; white-space:nowrap">\r
204 \92è\90\94\82Í\81A\90Ã\93I\83I\83u\83W\83F\83N\83g\82Ì\83\81\83\93\83o\81[\95Ï\90\94\82É\8ai\94[\82µ\82Ü\82·\81B<BR/>\r
205 \92è\90\94\83V\83\93\83{\83\8b\82ª\81A\83O\83\8d\81[\83o\83\8b\81E\83X\83R\81[\83v\82Ì\83V\83\93\83{\83\8b\82Å\82Í\82È\82­\82È\82é\82Ì\82Å\81A\96¼\91O\82Ì\8fÕ\93Ë\82Ì\89Â\94\\90«\82ª<BR/>\r
206 \92á\82­\82È\82è\82Ü\82·\81B</DIV>\r
207 <v:rect style="position:absolute; margin-left:45px; margin-top:1281px; width:460px; height:535px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
208 <DIV id="text173_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:1287px; line-height:15px; white-space:nowrap">\r
209 Class&nbsp; ClassA<BR/>\r
210 &nbsp; &nbsp; Public&nbsp; c<BR/>\r
211 &nbsp; &nbsp; Private Sub&nbsp; Class_Initialize()<BR/>\r
212 &nbsp; &nbsp; &nbsp; &nbsp; Set Me.c = get_ClassAConsts()<BR/>\r
213 &nbsp; &nbsp; End Sub<BR/>\r
214 End Class<BR/>\r
215 <BR/>\r
216 <BR/>\r
217 '*************************************************************************<BR/>\r
218 '&nbsp; &lt;&lt;&lt; [get_ClassAConsts] &gt;&gt;&gt;<BR/>\r
219 '*************************************************************************<BR/>\r
220 Dim&nbsp; g_ClassAConsts<BR/>\r
221 <BR/>\r
222 Function&nbsp; get_ClassAConsts()<BR/>\r
223 &nbsp; &nbsp; If IsEmpty( g_ClassAConsts ) Then _<BR/>\r
224 &nbsp; &nbsp; &nbsp; &nbsp; Set g_ClassAConsts = new ClassAConsts<BR/>\r
225 &nbsp; &nbsp; Set get_ClassAConsts = g_ClassAConsts<BR/>\r
226 End Function<BR/>\r
227 <BR/>\r
228 <BR/>\r
229 Class&nbsp; ClassAConsts<BR/>\r
230 &nbsp; &nbsp; Public&nbsp; CutTag, ExistOnly<BR/>\r
231 <BR/>\r
232 &nbsp; &nbsp; Private Sub&nbsp; Class_Initialize()<BR/>\r
233 &nbsp; &nbsp; &nbsp; &nbsp; CutTag = 1<BR/>\r
234 &nbsp; &nbsp; &nbsp; &nbsp; ExistOnly = 2<BR/>\r
235 &nbsp; &nbsp; End Sub<BR/>\r
236 <BR/>\r
237 &nbsp; &nbsp; Public Function&nbsp; ToStr( Number )<BR/>\r
238 &nbsp; &nbsp; &nbsp; &nbsp; Select Case&nbsp; Number<BR/>\r
239 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Case CutTag : ToStr = "CutTag"<BR/>\r
240 &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; Case ExistOnly : ToStr = "ExistOnly"<BR/>\r
241 &nbsp; &nbsp; &nbsp; &nbsp; End Select<BR/>\r
242 &nbsp; &nbsp; End Function<BR/>\r
243 End Class</DIV>\r
244 <DIV id="text173_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1260px; line-height:15px; white-space:nowrap">\r
245 \92è\8b`\97á\81F</DIV>\r
246 <DIV id="text173_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1030px; line-height:15px; white-space:nowrap">\r
247 \8eg\97p\97á\82P\81F</DIV>\r
248 <v:rect style="position:absolute; margin-left:45px; margin-top:1053px; width:238px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
249 <DIV id="text173_6" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:1059px; line-height:15px; white-space:nowrap">\r
250 &nbsp; Dim&nbsp; c : Set c = get_ClassAConsts()<BR/>\r
251 <BR/>\r
252 &nbsp; copy_ex&nbsp; src, dst, c.CutTag</DIV>\r
253 <DIV id="text173_7" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:179px; margin-top:1090px; line-height:13px; white-space:nowrap">\r
254 c.CutTag</DIV>\r
255 <DIV id="text173_8" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:167px; margin-top:1060px; line-height:13px; white-space:nowrap">\r
256 get_ClassAConsts</DIV>\r
257 <DIV id="text173_9" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:125px; margin-top:1603px; line-height:13px; white-space:nowrap">\r
258 CutTag</DIV>\r
259 <DIV id="text173_10" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:101px; margin-top:1648px; line-height:13px; white-space:nowrap">\r
260 CutTag</DIV>\r
261 <v:roundrect style="position:absolute; margin-left:351px; margin-top:884px; width:72px; height:20px;" arcsize="0.500000" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
262 <DIV id="text173_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#FF0000; font-weight: bold; margin-left:359px; margin-top:887px; line-height:15px; white-space:nowrap">\r
263 ver2 \8có\95â</DIV>\r
264 <DIV id="text173_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:1136px; line-height:15px; white-space:nowrap">\r
265 \8eg\97p\97á\82Q\81F</DIV>\r
266 <v:rect style="position:absolute; margin-left:45px; margin-top:1159px; width:214px; height:70px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
267 <DIV id="text173_13" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:1165px; line-height:15px; white-space:nowrap">\r
268 Sub&nbsp; main()<BR/>\r
269 &nbsp; Dim&nbsp; obj : Set obj = new ClassA<BR/>\r
270 &nbsp; copy_ex&nbsp; src, dst, obj.c.CutTag<BR/>\r
271 End Sub</DIV>\r
272 <DIV id="text173_14" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:179px; margin-top:1196px; line-height:13px; white-space:nowrap">\r
273 obj.c.CutTag</DIV>\r
274 <DIV id="text173_15" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:167px; margin-top:1333px; line-height:13px; white-space:nowrap">\r
275 get_ClassAConsts</DIV>\r
276 <DIV id="text173_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:66px; margin-top:992px; line-height:15px; white-space:nowrap">\r
277 <A href="vbs_memo_06.html#name_space_contamination">\r
278 \81¨ \96¼\91O\8bó\8aÔ\82Ì\89\98\90õ\82Ì\91Î\8dô</A></DIV>\r
279 <v:roundrect style="position:absolute; margin-left:260px; margin-top:989px; width:56px; height:20px;" arcsize="0.500000" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
280 <DIV id="text173_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#FF0000; font-weight: bold; margin-left:268px; margin-top:992px; line-height:15px; white-space:nowrap">\r
281 \96¢\8am\94F</DIV>\r
282 <DIV id="text173_18" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:26px; margin-top:992px; line-height:15px; white-space:nowrap">\r
283 \8eQ\8dl</DIV>\r
284 \r
285 <v:line from="0,872" to="579,872"/>\r
286 <v:line from="579,872" to="579,1848"/>\r
287 <v:line from="579,1848" to="0,1848"/>\r
288 <v:line from="0,1848" to="0,872"/>\r
289 \r
290 </PAGE>\r
291  \r
292 <!-- page 174 --> \r
293 <PAGE>\r
294 <A id="svgcats_vml_p174" class="to_tree" style="margin-top:1853px;" onClick="selectTreeElem( '174' );">\81©</A>\r
295 <A href="#svgcats_vml_p175" class="to_next_page" style="margin-top:1853px;">\81¥</A>\r
296 <A href="#svgcats_vml_p173" class="to_prev_page" style="margin-top:1853px;">\81£</A>\r
297 <v:rect style="position:absolute; margin-left:0px; margin-top:1864px; width:581px; height:702px;" fillcolor="white"/>\r
298 <v:line style="position:absolute;" from="193,2159" to="226,2159" strokecolor="#000000" strokeweight="1pt">\r
299     <v:stroke dashstyle="dash"/>\r
300 </v:line>\r
301 <v:line style="position:absolute;" from="226,2159" to="215,2155" strokecolor="#000000" strokeweight="1pt"/>\r
302 <v:line style="position:absolute;" from="226,2159" to="215,2163" strokecolor="#000000" strokeweight="1pt"/>\r
303 <DIV id="text174_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:2232px; line-height:15px; white-space:nowrap">\r
304 \91½\82­\82Ì\8fê\8d\87\81A\83N\83\89\83X\82É\8f\8a\91®\82µ\82È\82¢\8aÖ\90\94\82Ì\92\86\82Ì\8dÅ\8f\89\82Å get_Object \82µ\82½\8cã\82Å\81AValidate \83\81\83\\83b\83h<BR/>\r
305 \82ð\8cÄ\82Ñ\8fo\82µ\82Ü\82·\81B Validate \82Í\81A\83p\83\89\83\81\81[\83^\82É\8ew\92è\82µ\82½\8fó\91Ô\82É\83I\83u\83W\83F\83N\83g\82ð\82·\82é\83\81\83\\83b\83h\82Å\82·\81B</DIV>\r
306 <v:rect style="position:absolute; margin-left:56px; margin-top:2270px; width:328px; height:70px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
307 <DIV id="text174_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:64px; margin-top:2276px; line-height:15px; white-space:nowrap">\r
308 Sub&nbsp; FuncA()<BR/>\r
309 &nbsp; Dim&nbsp; m : Set m = get_ClassA() : m.Validate&nbsp; Empty <BR/>\r
310 &nbsp; m.MethodA<BR/>\r
311 End Sub</DIV>\r
312 <DIV id="text174_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:1916px; line-height:15px; white-space:nowrap">\r
313 \89\89\8eZ\8aí\93I\82È\83I\83u\83W\83F\83N\83g\82Æ\82Í\81A\83C\83\93\83X\83^\83\93\83X\82ð\93Á\92è\82·\82é\95K\97v\82ª\96³\82¢\83I\83u\83W\83F\83N\83g\82Ì\82±\82Æ\82Å\81A<BR/>\r
314 \90Ø\82è\91Ö\82¦\82é\82±\82Æ\82Í\82 \82Á\82Ä\82à\93¯\8e\9e\82É\95¡\90\94\91\8dÝ\82µ\82È\82­\82Ä\82à\96Ú\93I\82Ì\8fo\97Í\82ª\93¾\82ç\82ê\82é\82à\82Ì\82Å\82·\81B<BR/>\r
315 \83\86\81[\83U\81[\82Í\89\89\8eZ\8aí\82Ì\8eí\97Þ (ClassV) \82ð\8ew\92è\82µ\82Ü\82·\81B</DIV>\r
316 <DIV id="text174_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:28px; margin-top:2411px; line-height:15px; white-space:nowrap">\r
317 ClassV_validate \82Å\8eæ\93¾\82µ\82½\83I\83u\83W\83F\83N\83g\82ð\96¾\8e¦\93I\82É\8dí\8f\9c\82·\82é\95K\97v\82Í\82 \82è\82Ü\82¹\82ñ\81B<BR/>\r
318 \96¾\8e¦\93I\82É\8dí\8f\9c\82ð\8ew\92è\82µ\82½\82è\81A\8dí\8f\9c\82·\82é\8b\96\89Â\82ð\82µ\82½\82è\82·\82é ClassI \82Ì\83\81\83\93\83o\8aÖ\90\94\82ð\8dì\82Á\82Ä\82à<BR/>\r
319 \8d\\82¢\82Ü\82¹\82ñ\82ª\81A\83L\83\83\83b\83V\83\85\82Ì\82æ\82¤\82É\81A\8fó\8bµ\82É\89\9e\82\82Ä\8e©\93®\93I\82É\94»\92f\82·\82é\82±\82Æ\82ª\8f\88\97\9d\8cø\97¦\82ª<BR/>\r
320 \97Ç\82¢\82±\82Æ\82à\82 \82è\82Ü\82·\81B</DIV>\r
321 <v:rect style="position:absolute; margin-left:56px; margin-top:2147px; width:136px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
322 <DIV id="text174_6" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:64px; margin-top:2154px; line-height:13px; white-space:nowrap">\r
323 Dim&nbsp; g_obj as ClassI</DIV>\r
324 <DIV id="text174_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:64px; margin-top:2179px; line-height:15px; white-space:nowrap">\r
325 \83C\83\93\83^\81[\83t\83F\83C\83X\82ð<BR/>\r
326 \8eQ\8fÆ\82·\82é\95Ï\90\94</DIV>\r
327 <v:line style="position:absolute;" from="234,2159" to="350,2159" strokecolor="#000000" strokeweight="1pt">\r
328     <v:stroke dashstyle="dash"/>\r
329 </v:line>\r
330 <v:shape style="position:absolute; margin-left:234px; margin-top:2154px; width:10px; height:10px"\r
331  fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"\r
332  path="m 0,500 l 1000,1000, 1000,0 x e"/>\r
333 <A href="vbs_memo_10.html#vbsool_ClassI">\r
334 <v:rect style="position:absolute; margin-left:345px; margin-top:2133px; width:54px; height:18px;" fillcolor="#FFFFFF" strokecolor="#C0C0C0" strokeweight="1pt">\r
335 <v:fill opacity="0.00"/>\r
336 </v:rect>\r
337 </A>\r
338 <DIV id="text174_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:355px; margin-top:2135px; line-height:15px; white-space:nowrap">\r
339 <A href="vbs_memo_10.html#vbsool_ClassI">\r
340 ClassI</A></DIV>\r
341 <v:line style="position:absolute;" from="434,2159" to="365,2159" strokecolor="#000000" strokeweight="1pt"/>\r
342 <v:oval style="position:absolute; margin-left:362px; margin-top:2156px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
343 <DIV id="text174_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:296px; margin-top:2171px; line-height:15px; white-space:nowrap">\r
344 \83I\83u\83W\83F\83N\83g\82Ì<BR/>\r
345 \83C\83\93\83^\81[\83t\83F\83C\83X</DIV>\r
346 <DIV id="text174_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:406px; margin-top:2178px; line-height:15px; white-space:nowrap">\r
347 \83I\83u\83W\83F\83N\83g\81i\83A\83g\83\80\81j</DIV>\r
348 <A href="vbs_memo_10.html#vbsool_ClassA">\r
349 <v:rect style="position:absolute; margin-left:423px; margin-top:2146px; width:55px; height:26px;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>\r
350 </A>\r
351 <DIV id="text174_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:431px; margin-top:2152px; line-height:15px; white-space:nowrap">\r
352 <A href="vbs_memo_10.html#vbsool_ClassA">\r
353 ClassA</A></DIV>\r
354 <DIV id="text174_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#FF0000; margin-left:237px; margin-top:2135px; line-height:15px; white-space:nowrap">\r
355 get_Object \8aÖ\90\94</DIV>\r
356 <DIV id="text174_15" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:2071px; line-height:15px; white-space:nowrap">\r
357 \83I\83u\83W\83F\83N\83g\82ð\91\80\8dì\82·\82é\83C\83\93\83^\81[\83t\83F\83C\83X(ClassI\81j\82Í\81A\89\89\8eZ\8aí\82Ì\8eí\97Þ(ClassV)\82Æ\88Ù\82È\82é\82±\82Æ\82ª<BR/>\r
358 \82 \82è\82Ü\82·\81\82³\82ç\82É ClassV \82Í\81A\83C\83\93\83X\83^\83\93\83X\82Ì\83N\83\89\83X(ClassA)\82Æ\88Ù\82È\82é\82±\82Æ\82à\82 \82è\82Ü\82·\81B<BR/>\r
359 \82½\82Æ\82¦\82Î\81AClassI =\83R\83\93\83p\83C\83\89\81AClassV = C\8c¾\8cê\83R\83\93\83p\83C\83\89\81AClassA = A\8eÐ\90»\83R\83\93\83p\83C\83\89ver2\81B</DIV>\r
360 <DIV id="text174_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:1977px; line-height:15px; white-space:nowrap">\r
361 \8fó\8bµ\82â\90Ý\92è\82É\89\9e\82\82Ä\81A\93K\90Ø\82È ClassA \82Ì\83C\83\93\83X\83^\83\93\83X\82ª\95Ô\82è\82Ü\82·\81\93à\95\94\82Å\81A\83C\83\93\83X\83^\83\93\83X\82ª<BR/>\r
362 \90\90¬\82³\82ê\82é\82©\82à\82µ\82ê\82È\82¢\82µ\81A\88ø\90\94\82ð\82»\82Ì\82Ü\82Ü\88Û\8e\9d\82·\82é\82¾\82¯\82©\82à\82µ\82ê\82Ü\82¹\82ñ\81B\8aî\96{\93I\82É<BR/>\r
363 \83C\83\93\83X\83^\83\93\83X\82Í\82P\82Â\81i\83V\83\93\83O\83\8c\83g\83\93\81j\82Å\82·\82ª\81A\83}\83\8b\83`\83R\83A\82ð\90\82©\82µ\82½\82è\81A\83}\83\8b\83`\83X\83\8c\83b\83h\82Å\83\8c\83C\83e<BR/>\r
364 \83\93\83V\82ð\92Z\82­\82·\82é\82½\82ß\82É\81AOpt \88ø\90\94\82É\81A\90V\8bK\83C\83\93\83X\83^\83\93\83X\82ð\8ew\92è\82·\82é\82±\82Æ\82ª\82 \82é\82©\82à\82µ\82ê\82Ü\82¹\82ñ\81B<BR/>\r
365 \81iVBScript \82Í\81A\8aî\96{\93I\82É\83V\83\93\83O\83\8b\83X\83\8c\83b\83h\82Å\82·\82ª\81j</DIV>\r
366 <DIV id="text174_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:13px; margin-top:2380px; line-height:15px; white-space:nowrap">\r
367 \89\89\8eZ\8aí\93I\82È\83I\83u\83W\83F\83N\83g\82Ì\83\89\83C\83t\83T\83C\83N\83\8b</DIV>\r
368 <DIV id="text174_18" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:2502px; line-height:15px; white-space:nowrap">\r
369 <A href="..\vbslib.files\vbslib_31.html#g_test_data">\r
370 \81¨ \83O\83\8d\81[\83o\83\8b\81E\83e\83X\83g\81E\83I\83u\83W\83F\83N\83g, SampleTest</A></DIV>\r
371 <DIV id="text174_19" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:20px; margin-top:1883px; line-height:15px; white-space:nowrap">\r
372 <A name="op_obj">\r
373 \83\89\83C\83u\83\89\83\8a\81E\83I\83u\83W\83F\83N\83g\81A\89\89\8eZ\8aí\93I\82È\83I\83u\83W\83F\83N\83g</A></DIV>\r
374 <DIV id="text174_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:12px; margin-top:2502px; line-height:15px; white-space:nowrap">\r
375 \8eQ\8dl</DIV>\r
376 <DIV id="text174_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#0000FF; margin-left:352px; margin-top:1884px; line-height:12px; white-space:nowrap">\r
377 <A href="vbs_memo_10.html#vbsool">\r
378\90e: vbsool : \83I\83u\83W\83F\83N\83g\8bL\8fq\96@ ]</A></DIV>\r
379 <DIV id="text174_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:2522px; line-height:15px; white-space:nowrap">\r
380 <A href="..\vbslib.files\vbslib_37.html#var">\r
381 \81¨ \83o\81[\83W\83\87\83\93\94»\92è\81A\8aÂ\8b«\95Ï\90\94</A></DIV>\r
382 \r
383 <v:line from="0,1864" to="581,1864"/>\r
384 <v:line from="581,1864" to="581,2566"/>\r
385 <v:line from="581,2566" to="0,2566"/>\r
386 <v:line from="0,2566" to="0,1864"/>\r
387 \r
388 </PAGE>\r
389  \r
390 <!-- page 175 --> \r
391 <PAGE>\r
392 <A id="svgcats_vml_p175" class="to_tree" style="margin-top:2571px;" onClick="selectTreeElem( '175' );">\81©</A>\r
393 <A href="#svgcats_vml_p176" class="to_next_page" style="margin-top:2571px;">\81¥</A>\r
394 <A href="#svgcats_vml_p174" class="to_prev_page" style="margin-top:2571px;">\81£</A>\r
395 <v:rect style="position:absolute; margin-left:0px; margin-top:2582px; width:516px; height:1095px;" fillcolor="white"/>\r
396 <DIV id="text175_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:2599px; line-height:15px; white-space:nowrap">\r
397 <A name="get_ObjectVer">\r
398 \83o\81[\83W\83\87\83\93\82ð\95\\82·\90Ã\93I\83I\83u\83W\83F\83N\83g</A></DIV>\r
399 <DIV id="text175_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:2633px; line-height:15px; white-space:nowrap">\r
400 \83v\83\8d\83O\83\89\83\80\82ª\8eg\97p\82·\82é\8aO\95\94\83v\83\8d\83O\83\89\83\80\82Ì\83o\81[\83W\83\87\83\93\82ª\88Ù\82È\82é\82Æ\81A\8eg\97p\82·\82é<BR/>\r
401 \83f\81[\83^\82ª\94÷\96­\82É\88Ù\82È\82Á\82½\82è\82µ\82Ü\82·\81\82½\82Æ\82¦\82Î\81AVisual Studio \82Ì\83v\83\8d\83W\83F\83N\83g\81E<BR/>\r
402 \83t\83@\83C\83\8b\82ð\8fo\97Í\82·\82é\83v\83\8d\83O\83\89\83\80\82Í\81AVisual Studio \82Ì\83o\81[\83W\83\87\83\93\82É\82æ\82Á\82Ä\81A<BR/>\r
403 \8fo\97Í\82·\82é\83t\83@\83C\83\8b\82Ì\8ag\92£\8eq\82ª\95Ï\82í\82è\82Ü\82·\81B<BR/>\r
404 <BR/>\r
405 \83v\83\8d\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82ð\8fo\97Í\82·\82é\8aÖ\90\94\82ð\83v\83\8d\83O\83\89\83~\83\93\83O\82·\82é\82Æ\82«\82Í\81A<BR/>\r
406 \83o\81[\83W\83\87\83\93\82ð\94»\92è\82µ\82Ä\81A\8fo\97Í\93à\97e\82ð\95Ï\82¦\82é\82Æ\82¢\82¤\82Ì\82ª\88ê\94Ê\93I\82Å\82·\82ª\81A<BR/>\r
407 \8bK\96Í\82ª\91å\82«\82­\82È\82é\82Æ\81A\93¯\82\8fð\8c\8f\95ª\8aò\82Ì\83R\83s\81[\82ª\82½\82­\82³\82ñ\8bL\8fq\82³\82ê\82é\82±\82Æ<BR/>\r
408 \82É\82È\82è\81A\83\81\83\93\83e\83i\83\93\83X\90«\82ª\92á\82­\82È\82è\82Ü\82·\81B<BR/>\r
409 <BR/>\r
410 \82½\82Æ\82¦\82Î\81A\83v\83\8d\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82Ì\8ag\92£\8eq\82ª\95Ï\82í\82é\82Æ\81A\83t\83@\83C\83\8b\82ð\8dì\90¬\82·\82é<BR/>\r
411 \83R\81[\83h\82Æ\81A\8eg\97p\82·\82é\83v\83\8d\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82ð\83\\83\8a\83\85\81[\83V\83\87\83\93\81E\83t\83@\83C\83\8b\93à\82É<BR/>\r
412 \8bL\8fq\82·\82é\83R\81[\83h\82Ì\82Q\89Ó\8f\8a\82É\81A\83o\81[\83W\83\87\83\93\82ð\94»\92è\82·\82é\83R\81[\83h\82ª\8bL\8fq\82³\82ê\82Ü\82·\81B<BR/>\r
413 \82±\82Ì\8fó\91Ô\82Å\81A\8f«\97\88\81A\83o\81[\83W\83\87\83\93\82Æ\8ag\92£\8eq\82Ì\8aÖ\8cW\82ª\95Ï\82í\82Á\82½\82ç\81A\82Q\89Ó\8f\8a\82Ì\8fC\90³\82ª<BR/>\r
414 \95K\97v\82È\82Ì\82É\81A\82P\89Ó\8f\8a\82¾\82¯\8fC\90³\82µ\82Ä\8a®\97¹\82Æ\82µ\82Ä\82µ\82Ü\82¤\83\8a\83X\83N\82ª\82 \82é\82Ì\82Å\82·\81B</DIV>\r
415 <v:rect style="position:absolute; margin-left:54px; margin-top:3200px; width:430px; height:445px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
416 <DIV id="text175_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:62px; margin-top:3206px; line-height:15px; white-space:nowrap">\r
417 Dim&nbsp; o : Set o = new MakeVS<BR/>\r
418 o.SetMakeProjContext&nbsp; MakeProjContext, get_MakeVSProjType( TypeName )<BR/>\r
419 o.MakeProj<BR/>\r
420 <BR/>\r
421 Class\81@MakeVSProjType<BR/>\r
422 \81@Public\81@VSVer\81@\81@\81@\81@\81@\81@ '// as integer<BR/>\r
423 \81@Public\81@TargetPlatform\81@\81@'// as string<BR/>\r
424 \81@Public\81@ProjectExtension\81@'// as string<BR/>\r
425 End Class <BR/>\r
426 <BR/>\r
427 Function\81@get_MakeVSProjType( TypeName )<BR/>\r
428 \81@Dim\81@ret, items<BR/>\r
429 \81@Select Case\81@TypeName\81@\81@\81@\81@\81@\81@\81@\81@'// VSVer, TargetPlatform<BR/>\r
430 \81@\81@Case\81@"VS2010Win32"\81@\81@: items = Array( 2010, "Win32" )<BR/>\r
431 \81@\81@Case\81@"VS2008Win32"\81@\81@: items = Array( 2008, "Win32" )<BR/>\r
432 \81@\81@Case\81@"VS2010Win32Lib" : items = Array( 2010, "Lib" )<BR/>\r
433 \81@\81@Case\81@"VS2008Win32Lib" : items = Array( 2008, "Lib" )<BR/>\r
434 \81@\81@Case Else\81@Error<BR/>\r
435 \81@End Select<BR/>\r
436 <BR/>\r
437 \81@Set ret = new MakeVSProjType<BR/>\r
438 \81@ret.VSVer\81@\81@\81@\81@\81@= items( 0 )<BR/>\r
439 \81@ret.TargetPlatform = items( 1 )<BR/>\r
440 \81@If ret.VSVer = 2010 Then<BR/>\r
441 \81@\81@ret.ProjectExtension = ".vcxproj"<BR/>\r
442 \81@Else<BR/>\r
443 \81@\81@ret.ProjectExtension = ".vcproj"<BR/>\r
444 \81@End If<BR/>\r
445 End Function</DIV>\r
446 <DIV id="text175_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:24px; margin-top:2986px; line-height:15px; white-space:nowrap">\r
447 \82±\82ê\82ð\94ð\82¯\82é\82É\82Í\81A\83v\83\8d\83W\83F\83N\83g\81E\83t\83@\83C\83\8b\82Ì\8ag\92£\8eq\82ð\95Ï\90\94\82É\82·\82é\82±\82Æ\82Å\82·\81B<BR/>\r
448 \82±\82Ì\8fó\91Ô\82Å\81A\83o\81[\83W\83\87\83\93\82Æ\8ag\92£\8eq\82Ì\8aÖ\8cW\82ª\95Ï\82í\82Á\82½\82ç\81A\95Ï\90\94\82Ì\92l\82ð\91ã\93ü\82·\82é<BR/>\r
449 \89Ó\8f\8a\82¾\82¯\82ð\95Ï\82¦\82é\82¾\82¯\82Å\8dÏ\82Ý\82Ü\82·\81B<BR/>\r
450 <BR/>\r
451 \82±\82Ì\82æ\82¤\82È\88á\82¢\82ð\8fW\82ß\82½\83I\83u\83W\83F\83N\83g\82Í\81AVisual Studio \82Ì\83o\81[\83W\83\87\83\93\82É\82æ\82Á\82Ä<BR/>\r
452 \88Ù\82È\82é\82à\82Ì\82Å\82 \82é\82½\82ß\81A\83o\81[\83W\83\87\83\93\82²\82Æ\82É\91\8dÝ\82·\82é\90Ã\93I\83I\83u\83W\83F\83N\83g\81i\83R\83\93\83p<BR/>\r
453 \83C\83\8b\8e\9e\82É\92l\82ª\8c\88\92è\82·\82é static \82È\8d\\91¢\91Ì\81j\82É\82È\82è\82Ü\82·\81B<BR/>\r
454 <BR/>\r
455 \82»\82µ\82Ä\81A\90Ã\93I\83I\83u\83W\83F\83N\83g\82ð\8eæ\93¾\82·\82é\8aÖ\90\94\82ð\92è\8b`\82·\82é\82Æ\82æ\82¢\82Å\82µ\82å\82¤\81\82»\82Ì<BR/>\r
456 \92è\8b`\82Í\81A\89º\8bL\82Ì\82æ\82¤\82É\83e\81[\83u\83\8b\82Å\8bL\8fq\82·\82é\82Æ\82æ\82¢\82Å\82µ\82å\82¤\81\82Ü\82½\81A\91\8a\8aÖ\8aÖ\8cW\82ª<BR/>\r
457 \82 \82é\8fê\8d\87\82Í\81A\89º\8bL\82Ì ProjectExtension \95Ï\90\94\82Ì\82æ\82¤\82É\8fð\8c\8f\95ª\8aò\82ª\8eg\82¦\82Ü\82·\81B<BR/>\r
458 \82±\82Ì\8fð\8c\8f\95ª\8aò\82Í\81A\90Ã\93I\83I\83u\83W\83F\83N\83g\82ð\8eæ\93¾\82·\82é\8aÖ\90\94\82Ì\92\86\82É\82Ü\82Æ\82ß\82ç\82ê\82é\82½\82ß\81A<BR/>\r
459 \83\81\83\93\83e\83i\83\93\83X\90«\82ª\8d\82\82­\82È\82è\82Ü\82·\81B</DIV>\r
460 <v:rect style="position:absolute; margin-left:53px; margin-top:2878px; width:412px; height:40px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
461 <DIV id="text175_5" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:61px; margin-top:2884px; line-height:15px; white-space:nowrap">\r
462 \81@If VSVer &lt;= 2008 Then&nbsp; f.Open ".vcproj"&nbsp; Else&nbsp; f.Open ".vcxproj"<BR/>\r
463 \81@f.Close</DIV>\r
464 <v:rect style="position:absolute; margin-left:53px; margin-top:2927px; width:424px; height:40px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
465 <DIV id="text175_6" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:61px; margin-top:2933px; line-height:15px; white-space:nowrap">\r
466 \81@f.Open&nbsp; ".sln"<BR/>\r
467 \81@If VSVer &lt;= 2008 Then&nbsp; f.Write ".vcproj"&nbsp; Else&nbsp; f.Write ".vcxproj"</DIV>\r
468 \r
469 <v:line from="0,2582" to="516,2582"/>\r
470 <v:line from="516,2582" to="516,3677"/>\r
471 <v:line from="516,3677" to="0,3677"/>\r
472 <v:line from="0,3677" to="0,2582"/>\r
473 \r
474 </PAGE>\r
475  \r
476 <!-- page 176 --> \r
477 <PAGE>\r
478 <A id="svgcats_vml_p176" class="to_tree" style="margin-top:3682px;" onClick="selectTreeElem( '176' );">\81©</A>\r
479 <A href="#svgcats_vml_p177" class="to_next_page" style="margin-top:3682px;">\81¥</A>\r
480 <A href="#svgcats_vml_p175" class="to_prev_page" style="margin-top:3682px;">\81£</A>\r
481 <v:rect style="position:absolute; margin-left:0px; margin-top:3693px; width:544px; height:502px;" fillcolor="white"/>\r
482 <DIV id="text176_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:33px; margin-top:4129px; line-height:15px; white-space:nowrap">\r
483 \8eQ\8dl</DIV>\r
484 <DIV id="text176_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:77px; margin-top:4129px; line-height:15px; white-space:nowrap">\r
485 <A href="http://itpro.nikkeibp.co.jp/article/COLUMN/20051202/225609/" target="_blank">\r
486 \81¨ Factory Method\83p\83^\81[\83\93\81^Abstract Factory\83p\83^\81[\83\93 (Web)</A></DIV>\r
487 <DIV id="text176_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#0000FF; margin-left:308px; margin-top:3713px; line-height:12px; white-space:nowrap">\r
488 <A href="vbs_memo_10.html#vbsool">\r
489\90e: vbsool : \83I\83u\83W\83F\83N\83g\8bL\8fq\96@ ]</A></DIV>\r
490 <DIV id="text176_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:3943px; line-height:15px; white-space:nowrap">\r
491 <A href="#ListOfName">\r
492 \81¨ \96¼\91O\82Ì\88ê\97\97</A></DIV>\r
493 <DIV id="text176_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:3901px; line-height:15px; white-space:nowrap">\r
494 <A href="#name">\r
495 \81¨ \83I\83u\83W\83F\83N\83g\82Ì Name \82Æ TrueName</A></DIV>\r
496 <DIV id="text176_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:3711px; line-height:15px; white-space:nowrap">\r
497 <A name="naming">\r
498 Name \83v\83\8d\83p\83e\83B : \96¼\91O\8eQ\8fÆ (vbsool)</A></DIV>\r
499 <DIV id="text176_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:4043px; line-height:15px; white-space:nowrap">\r
500 \81¨ T_NameDelegator \83t\83H\83\8b\83_</DIV>\r
501 <DIV id="text176_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:29px; margin-top:3994px; line-height:15px; white-space:nowrap">\r
502 \83T\83\93\83v\83\8b\83t\83@\83C\83\8b</DIV>\r
503 <DIV id="text176_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:4062px; line-height:15px; white-space:nowrap">\r
504 \81¨ T_NameList \83t\83H\83\8b\83_</DIV>\r
505 <DIV id="text176_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:3922px; line-height:15px; white-space:nowrap">\r
506 <A href="#NameDelegate">\r
507 \81¨ Name \82Æ TrueName \82ª\91½\91Î\82P\82Ì\8fê\8d\87</A></DIV>\r
508 <DIV id="text176_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:4024px; line-height:15px; white-space:nowrap">\r
509 \81¨ T_Name \83t\83H\83\8b\83_</DIV>\r
510 <DIV id="text176_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:243px; margin-top:4024px; line-height:15px; white-space:nowrap">\r
511 Name \82Æ TrueName \82ª\81A\82P\91Î\91½\82Ì\8fê\8d\87</DIV>\r
512 <DIV id="text176_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:243px; margin-top:4043px; line-height:15px; white-space:nowrap">\r
513 Name \82Æ TrueName \82ª\81A\91½\91Î\82P\82Ì\8fê\8d\87</DIV>\r
514 <DIV id="text176_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:243px; margin-top:4062px; line-height:15px; white-space:nowrap">\r
515 Name \82Æ TrueName \82ª\81A\91½\91Î\82P\82Ì\8fê\8d\87\82Ì\88ê\97\97</DIV>\r
516 <v:rect style="position:absolute; margin-left:29px; margin-top:3742px; width:196px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
517 <DIV id="text176_15" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:3749px; line-height:13px; white-space:nowrap">\r
518 Property Get&nbsp; Name() as string</DIV>\r
519 <DIV id="text176_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:55px; margin-top:4092px; line-height:15px; white-space:nowrap">\r
520 \81¨ vbslib \82ð\8eg\82¤ vbsool \83T\83\93\83v\83\8b</DIV>\r
521 <DIV id="text176_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:3817px; line-height:15px; white-space:nowrap">\r
522 \83C\83\93\83X\83^\83\93\83X\82Ì\96¼\91O\82Å\82·\81\83N\83\89\83X\96¼\82Æ\93¯\82\82É\82È\82é\82±\82Æ\82à\82 \82è\82Ü\82·\81B</DIV>\r
523 <v:rect style="position:absolute; margin-left:29px; margin-top:3776px; width:220px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
524 <DIV id="text176_18" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:3783px; line-height:13px; white-space:nowrap">\r
525 Property Get&nbsp; TrueName() as string</DIV>\r
526 <DIV id="text176_19" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:32px; margin-top:3836px; line-height:15px; white-space:nowrap">\r
527 <A href="vbs_memo_10.html#get_ClassA">\r
528 get_Object</A></DIV>\r
529 <DIV id="text176_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:98px; margin-top:3836px; line-height:15px; white-space:nowrap">\r
530 \8aÖ\90\94\82É\8ew\92è\82·\82é\96¼\91O\82Æ\93¯\82\82Å\82·\81B</DIV>\r
531 <DIV id="text176_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:3873px; line-height:15px; white-space:nowrap">\r
532 \88È\89º\82Í\81A\88ê\94Ê\96¼ (Name) \82Æ\90³\8e®\96¼ (TrueName) \82Ì\88á\82¢\82©\82ç\90\82\82é\96â\91è\82Ì\91Î\8dô\96@\82Å\82·\81B</DIV>\r
533 <DIV id="text176_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:77px; margin-top:4147px; line-height:15px; white-space:nowrap">\r
534 \81¨ Module Mixer 3 \82Ì\8eÀ\91\95</DIV>\r
535 \r
536 <v:line from="0,3693" to="544,3693"/>\r
537 <v:line from="544,3693" to="544,4195"/>\r
538 <v:line from="544,4195" to="0,4195"/>\r
539 <v:line from="0,4195" to="0,3693"/>\r
540 \r
541 </PAGE>\r
542  \r
543 <!-- page 177 --> \r
544 <PAGE>\r
545 <A id="svgcats_vml_p177" class="to_tree" style="margin-top:4200px;" onClick="selectTreeElem( '177' );">\81©</A>\r
546 <A href="#svgcats_vml_p178" class="to_next_page" style="margin-top:4200px;">\81¥</A>\r
547 <A href="#svgcats_vml_p176" class="to_prev_page" style="margin-top:4200px;">\81£</A>\r
548 <v:rect style="position:absolute; margin-left:0px; margin-top:4211px; width:614px; height:1337px;" fillcolor="white"/>\r
549 <DIV id="text177_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:521px; margin-top:4446px; line-height:15px; white-space:nowrap">\r
550 <A href="..\vbslib.files\vbslib_38.html#SetVar">\r
551 SetVar,</A></DIV>\r
552 <DIV id="text177_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:4461px; line-height:15px; white-space:nowrap">\r
553 GetVar \82È\82Ç\81j\82É\90³\8e®\96¼\82ð\8ew\92è\82·\82é\82±\82Æ\82à\82Å\82«\82Ü\82·\81B </DIV>\r
554 <DIV id="text177_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:21px; margin-top:4234px; line-height:15px; white-space:nowrap">\r
555 <A name="name">\r
556 \83I\83u\83W\83F\83N\83g\82Ì Name \82Æ TrueName</A></DIV>\r
557 <DIV id="text177_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:4268px; line-height:15px; white-space:nowrap">\r
558 \83N\83\89\83X\96¼\82â\83C\83\93\83X\83^\83\93\83X\96¼\82Í\81A\88ê\94Ê\96¼\82Æ\90³\8e®\96¼\82ª\82 \82è\81A\91½\82­\82Ì\8fê\8d\87\81A\88ê\94Ê\96¼\82ð\95K\97v\82Æ\82µ\82Ü\82·\81B\82µ\82©\82µ\81A<BR/>\r
559 new \82É\8ew\92è\82·\82é\8c^\82Ì\96¼\91O\82â\81ATypeName \82Å\8eæ\93¾\82Å\82«\82é\8c^\82Ì\96¼\91O\82Í\83N\83\89\83X\82Ì\90³\8e®\96¼\82Å\82 \82é\82±\82Æ\82ª<BR/>\r
560 \91½\82­\81A\88µ\82¢\82É\82­\82¢\82Å\82µ\82å\82¤\81\82»\82±\82Å\81A</DIV>\r
561 <DIV id="text177_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#0000FF; margin-left:280px; margin-top:4236px; line-height:12px; white-space:nowrap">\r
562 <A href="vbs_memo_10.html#vbsool">\r
563\90e: vbsool : \83I\83u\83W\83F\83N\83g\8bL\8fq\96@ ]</A></DIV>\r
564 <DIV id="text177_6" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; font-weight: bold; margin-left:80px; margin-top:4740px; line-height:13px; white-space:nowrap">\r
565 <A href="#ClassN_no">\r
566 Sample_getTrueName</A></DIV>\r
567 <DIV id="text177_7" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:45px; margin-top:4704px; line-height:13px; white-space:nowrap">\r
568 <A href="vbs_memo_10.html#get_ClassA">\r
569 get_Object</A></DIV>\r
570 <DIV id="text177_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:28px; margin-top:4676px; line-height:15px; white-space:nowrap">\r
571 \8f\88\97\9d\83t\83\8d\81[</DIV>\r
572 <DIV id="text177_9" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:101px; margin-top:4776px; line-height:13px; white-space:nowrap">\r
573 <A href="#get_TrueSample">\r
574 get_TrueSample</A></DIV>\r
575 <DIV id="text177_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:4373px; line-height:15px; white-space:nowrap">\r
576 \88ê\94Ê\96¼\82Í\8fê\96Ê\82É\82æ\82Á\82Ä\81i\92\8a\8fÛ\93x\82ª\95Ï\89»\82µ\82Ä\81j\95Ï\82í\82è\82Ü\82·\81\90³\8e®\96¼\82Í\83C\83\93\83X\83^\83\93\83X\82Ì\93à\97e\82â\92è\8b`\82Ì<BR/>\r
577 \92\8a\8fÛ\93x\82É\82æ\82Á\82Ä\95Ï\82í\82è\82Ü\82·\81\88ê\94Ê\96¼\82Æ\90³\8e®\96¼\82ª\81A\93¯\82\82É\82È\82é\82±\82Æ\82à\82 \82è\82Ü\82·\81B<BR/>\r
578 \88ê\94Ê\96¼\82Æ\90³\8e®\96¼\82Í\81A\82P\91Î\91½\82Ì\8aÖ\8cW\82ª\82 \82é\82Ì\82Å\81A\8fê\96Ê\82É\89\9e\82\82Ä\81A\88ê\94Ê\96¼\82©\82ç\90³\8e®\96¼\82ð\91I\91ð\82·\82é\95K\97v<BR/>\r
579 \82ª\82 \82è\82Ü\82·\81B\81i\93¯\8e\9e\82É\91½\91Î\82P\82Ì\8aÖ\8cW\82à\82 \82è\82Ü\82·\82ª\95Ê\82Ì\8fÍ\82ð\8eQ\8fÆ\81j\81B</DIV>\r
580 <DIV id="text177_11" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:111px; margin-top:4704px; line-height:13px; white-space:nowrap">\r
581 ( "Sample" )</DIV>\r
582 <DIV id="text177_12" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:121px; margin-top:4791px; line-height:13px; white-space:nowrap">\r
583 new TrueSample</DIV>\r
584 <DIV id="text177_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:213px; margin-top:4702px; line-height:15px; white-space:nowrap">\r
585 \88ê\94Ê\96¼ "Sample" \82Ì\83I\83u\83W\83F\83N\83g\82ð\8eæ\93¾\82·\82é</DIV>\r
586 <DIV id="text177_14" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:61px; margin-top:4722px; line-height:13px; white-space:nowrap">\r
587 <A href="#ClassN_no">\r
588 get_Sample</A></DIV>\r
589 <v:rect style="position:absolute; margin-left:48px; margin-top:4848px; width:340px; height:265px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
590 <DIV id="text177_15" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:4854px; line-height:15px; white-space:nowrap">\r
591 '// Class&nbsp; Sample&nbsp; has_interface_of ClassI<BR/>\r
592 <BR/>\r
593 Function&nbsp; get_Sample()<BR/>\r
594 &nbsp; Set&nbsp; get_Sample = get_Object( Sample_getTrueName() )<BR/>\r
595 &nbsp; get_Sample.Name = "Sample"<BR/>\r
596 End Function<BR/>\r
597 <BR/>\r
598 Function&nbsp; Sample_getTrueName()<BR/>\r
599 &nbsp; Dim&nbsp; ret : ret = GetVar( "Sample" )<BR/>\r
600 &nbsp; If IsEmpty( ret ) Then<BR/>\r
601 &nbsp; &nbsp; '// default is ClassA fixed<BR/>\r
602 &nbsp; &nbsp; ret = "TrueSample" : SetVar "Sample", ret<BR/>\r
603 &nbsp; End If<BR/>\r
604 &nbsp; Sample_getTrueName = ret<BR/>\r
605 End Function<BR/>\r
606 <BR/>\r
607 '// \8c¾\8cê\8fã\82Ì Class Sample \82Ì\92è\8b`\82Í\95s\97v\82Å\82·\81B</DIV>\r
608 <DIV id="text177_16" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:170px; margin-top:4975px; line-height:13px; white-space:nowrap">\r
609 <A href="..\vbslib.files\vbslib_38.html#GetVar">\r
610 GetVar</A></DIV>\r
611 <DIV id="text177_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:39px; margin-top:4829px; line-height:15px; white-space:nowrap">\r
612 <A name="ClassN_no">\r
613 \88ê\94Ê\96¼(Sample)\82Ì\83N\83\89\83X\92è\8b` (\88ê\94Ê\96¼\82Æ\90³\8e®\96¼\82ª\82P\91Î\91½\82¾\82¯\82Ì\8fê\8d\87\81j</A></DIV>\r
614 <DIV id="text177_18" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:273px; margin-top:4738px; line-height:15px; white-space:nowrap">\r
615 \88ê\94Ê\96¼ "Sample" \82©\82ç\90³\8e®\96¼ "TrueSample" \82ð\91I\91ð</DIV>\r
616 <DIV id="text177_19" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:147px; margin-top:4758px; line-height:13px; white-space:nowrap">\r
617 ( "TrueSample" )</DIV>\r
618 <DIV id="text177_20" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:80px; margin-top:4758px; line-height:13px; white-space:nowrap">\r
619 get_Object</DIV>\r
620 <DIV id="text177_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:66px; margin-top:5118px; line-height:15px; white-space:nowrap">\r
621 \8fã\8bL\82Í ret = "TrueSample" \8cÅ\92è\82Å\82·\82ª\81A\8fê\96Ê\82É\89\9e\82\82Ä TrueSample \88È\8aO\82Ì\90³\8e®\96¼\82ð<BR/>\r
622 \95Ô\82·\82æ\82¤\82É\8e©\93®\94»\92è\82µ\82½\95û\82ª\82æ\82¢\82Å\82·\81B</DIV>\r
623 <DIV id="text177_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:54px; margin-top:4328px; line-height:15px; white-space:nowrap">\r
624 Name \83v\83\8d\83p\83e\83B\82Í\81A\83C\83\93\83X\83^\83\93\83X\82Ì\88ê\94Ê\96¼\82Æ\82µ\82Ü\82·\81B<BR/>\r
625 TrueName \83v\83\8d\83p\83e\83B\82Í\81A\83C\83\93\83X\83^\83\93\83X\82Ì\90³\8e®\96¼\82Æ\82µ\82Ü\82·\81B</DIV>\r
626 <v:rect style="position:absolute; margin-left:48px; margin-top:5251px; width:466px; height:265px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
627 <DIV id="text177_23" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:5257px; line-height:15px; white-space:nowrap">\r
628 '// Class&nbsp; TrueSample&nbsp; has_interface_of ClassI<BR/>\r
629 <BR/>\r
630 Dim&nbsp; g_TrueSample<BR/>\r
631 <BR/>\r
632 Function&nbsp; &nbsp; get_TrueSample()&nbsp; '// has_interface_of ClassI<BR/>\r
633 &nbsp; If IsEmpty( g_TrueSample ) Then _<BR/>\r
634 &nbsp; &nbsp; Set g_TrueSample = new TrueSample<BR/>\r
635 &nbsp; Set get_TrueSample =&nbsp; &nbsp;g_TrueSample<BR/>\r
636 End Function<BR/>\r
637 <BR/>\r
638 Class&nbsp; TrueSample<BR/>\r
639 &nbsp; Public&nbsp; Name<BR/>\r
640 &nbsp; Public&nbsp; Property Get&nbsp; TrueName() : TrueName = TypeName(Me) : End Property<BR/>\r
641 &nbsp; '--- Name is factory pattern.<BR/>\r
642 &nbsp; Private Sub&nbsp; Class_Initialize() : Name = TypeName(Me) : End Sub<BR/>\r
643 &nbsp; &nbsp; :<BR/>\r
644 End Class</DIV>\r
645 <DIV id="text177_24" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:39px; margin-top:5231px; line-height:15px; white-space:nowrap">\r
646 <A name="get_TrueSample">\r
647 \90³\8e®\96¼(TrueSample)\82Ì\83N\83\89\83X\92è\8b` (\88ê\94Ê\96¼\82Æ\90³\8e®\96¼\82ª\82P\91Î\91½\82¾\82¯\82Ì\8fê\8d\87\81j</A></DIV>\r
648 <v:line style="position:absolute;" from="257,4634" to="225,4634" strokecolor="#000000" strokeweight="1pt"/>\r
649 <v:oval style="position:absolute; margin-left:222px; margin-top:4631px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
650 <v:line style="position:absolute;" from="252,4602" to="225,4602" strokecolor="#000000" strokeweight="1pt"/>\r
651 <v:oval style="position:absolute; margin-left:222px; margin-top:4599px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
652 <DIV id="text177_27" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:179px; margin-top:4596px; line-height:13px; white-space:nowrap">\r
653 ClassI</DIV>\r
654 <v:rect style="position:absolute; margin-left:252px; margin-top:4621px; width:54px; height:26px;" fillcolor="#E6E6FF" strokecolor="#000000" strokeweight="1pt"/>\r
655 <DIV id="text177_28" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:260px; margin-top:4627px; line-height:15px; white-space:nowrap">\r
656 ClassB</DIV>\r
657 <DIV id="text177_29" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:179px; margin-top:4630px; line-height:13px; white-space:nowrap">\r
658 ClassI</DIV>\r
659 <v:rect style="position:absolute; margin-left:252px; margin-top:4587px; width:54px; height:26px;" fillcolor="#E6E6FF" strokecolor="#000000" strokeweight="1pt"/>\r
660 <DIV id="text177_30" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:260px; margin-top:4593px; line-height:15px; white-space:nowrap">\r
661 ClassA</DIV>\r
662 <DIV id="text177_31" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:314px; margin-top:4593px; line-height:15px; white-space:nowrap">\r
663 Name = "ClassN", TrueName = "ClassA"</DIV>\r
664 <DIV id="text177_32" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:314px; margin-top:4627px; line-height:15px; white-space:nowrap">\r
665 Name = "ClassN", TrueName = "ClassB"</DIV>\r
666 <DIV id="text177_33" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:28px; margin-top:4572px; line-height:15px; white-space:nowrap">\r
667 \83f\81[\83^\8d\\91¢</DIV>\r
668 <DIV id="text177_34" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:52px; margin-top:4531px; line-height:15px; white-space:nowrap">\r
669 \81¨ T_Name \83t\83H\83\8b\83_</DIV>\r
670 <DIV id="text177_35" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:28px; margin-top:4505px; line-height:15px; white-space:nowrap">\r
671 \83T\83\93\83v\83\8b\83t\83@\83C\83\8b</DIV>\r
672 <v:roundrect style="position:absolute; margin-left:36px; margin-top:4607px; width:95px; height:22px;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>\r
673 <DIV id="text177_36" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:43px; margin-top:4611px; line-height:15px; white-space:nowrap">\r
674 \88ê\94Ê\96¼\82Å\91I\91ð</DIV>\r
675 <v:line style="position:absolute;" from="140,4618" to="165,4601" strokecolor="#000000" strokeweight="1pt">\r
676     <v:stroke dashstyle="dash"/>\r
677 </v:line>\r
678 <v:line style="position:absolute;" from="165,4601" to="154,4603" strokecolor="#000000" strokeweight="1pt"/>\r
679 <v:line style="position:absolute;" from="165,4601" to="158,4610" strokecolor="#000000" strokeweight="1pt"/>\r
680 <v:line style="position:absolute;" from="140,4618" to="165,4635" strokecolor="#000000" strokeweight="1pt">\r
681     <v:stroke dashstyle="dash"/>\r
682 </v:line>\r
683 <v:line style="position:absolute;" from="165,4635" to="158,4626" strokecolor="#000000" strokeweight="1pt"/>\r
684 <v:line style="position:absolute;" from="165,4635" to="154,4633" strokecolor="#000000" strokeweight="1pt"/>\r
685 <DIV id="text177_39" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:387px; margin-top:4328px; line-height:15px; white-space:nowrap">\r
686 \97á\81F Windows<BR/>\r
687 \97á\81F Windows XP, Windows7</DIV>\r
688 <DIV id="text177_40" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:273px; margin-top:4756px; line-height:15px; white-space:nowrap">\r
689 \90³\8e®\96¼ "TrueSample" \82Ì\83I\83u\83W\83F\83N\83g\82ð\8eæ\93¾\82·\82é</DIV>\r
690 <DIV id="text177_41" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF8000; margin-left:215px; margin-top:4740px; line-height:13px; white-space:nowrap">\r
691 [Sample]</DIV>\r
692 <DIV id="text177_42" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF8000; margin-left:135px; margin-top:4722px; line-height:13px; white-space:nowrap">\r
693 [Sample]</DIV>\r
694 <DIV id="text177_43" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0080; margin-left:203px; margin-top:4776px; line-height:13px; white-space:nowrap">\r
695 [TrueSample]</DIV>\r
696 <DIV id="text177_44" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0080; margin-left:224px; margin-top:4791px; line-height:13px; white-space:nowrap">\r
697 [TrueSample]</DIV>\r
698 <DIV id="text177_45" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:192px; margin-top:4531px; line-height:15px; white-space:nowrap">\r
699 \81¨ T_Name_vbslib \83t\83H\83\8b\83_</DIV>\r
700 <DIV id="text177_46" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:367px; margin-top:4531px; line-height:15px; white-space:nowrap">\r
701 \81¨ T_NameAdd_vbslib \83t\83H\83\8b\83_</DIV>\r
702 <DIV id="text177_47" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:4446px; line-height:15px; white-space:nowrap">\r
703 \91½\82­\82Ì\8fê\8d\87\81A\8e©\93®\94»\92è\82ð\8ds\82¢\82Ü\82·\82ª\81A\8aÂ\8b«\95Ï\90\94\81i\83\8c\83W\83X\83g\83\8a\82â\81A\90Ý\92è\83t\83@\83C\83\8b\82â\81Avbslib \82Ì</DIV>\r
704 <DIV id="text177_48" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:66px; margin-top:5162px; line-height:15px; white-space:nowrap">\r
705 \8fã\8bL\82Ì\90³\8e®\96¼\82ð\8c\88\82ß\82é\8f\88\97\9d\82Í\81ASample_getTrueName \8aÖ\90\94\81i\88ê\94Ê\96¼ "Sample" \82Ì<BR/>\r
706 getTrueName \83\81\83\\83b\83h\81j\82Å\82Í\82È\82­\81Aget_Sample \8aÖ\90\94\82É\8f\91\82©\82ê\82Ä\82¢\82é\82±\82Æ\82ª\82 \82è\82Ü\82·\81B</DIV>\r
707 \r
708 <v:line from="0,4211" to="614,4211"/>\r
709 <v:line from="614,4211" to="614,5548"/>\r
710 <v:line from="614,5548" to="0,5548"/>\r
711 <v:line from="0,5548" to="0,4211"/>\r
712 \r
713 </PAGE>\r
714  \r
715 <!-- page 178 --> \r
716 <PAGE>\r
717 <A id="svgcats_vml_p178" class="to_tree" style="margin-top:5553px;" onClick="selectTreeElem( '178' );">\81©</A>\r
718 <A href="#svgcats_vml_p179" class="to_next_page" style="margin-top:5553px;">\81¥</A>\r
719 <A href="#svgcats_vml_p177" class="to_prev_page" style="margin-top:5553px;">\81£</A>\r
720 <v:rect style="position:absolute; margin-left:0px; margin-top:5564px; width:655px; height:2383px;" fillcolor="white"/>\r
721 <v:rect style="position:absolute; margin-left:49px; margin-top:7476px; width:574px; height:385px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
722 <DIV id="text178_1" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:7482px; line-height:15px; white-space:nowrap">\r
723 Dim&nbsp; g_NameDic : Set g_NameDic = CreateObject( "Scripting.Dictionary" )<BR/>\r
724 <BR/>\r
725 Function&nbsp; get_NameDelegator( Name, TrueName, InterfaceName )<BR/>\r
726 &nbsp; If g_NameDic.Exists( Name +"__"+ TrueName ) Then<BR/>\r
727 &nbsp; &nbsp; Set get_NameDelegator = g_NameDic.Item( Name +"__"+ TrueName +"_"+ InterfaceName )<BR/>\r
728 &nbsp; &nbsp; Exit Function<BR/>\r
729 &nbsp; End If<BR/>\r
730 <BR/>\r
731 &nbsp; Set&nbsp; get_NameDelegator = new_X( InterfaceName + "_Delegator" ) : With get_NameDelegator<BR/>\r
732 &nbsp; &nbsp; .Name = Name<BR/>\r
733 &nbsp; &nbsp; .m_Delegate = TrueName&nbsp; '// if validated was need.<BR/>\r
734 &nbsp; &nbsp; If not g_bNeedValidateDelegate Then _<BR/>\r
735 &nbsp; &nbsp; &nbsp; Set .m_Delegate = get_Object( TrueName )&nbsp; '// if validated was not need.<BR/>\r
736 &nbsp; End With<BR/>\r
737 <BR/>\r
738 &nbsp; Set&nbsp; g_NameDic.Item( Name +"__"+ TrueName +"_"+ InterfaceName ) = get_NameDelegator<BR/>\r
739 End Function<BR/>\r
740 <BR/>\r
741 <BR/>\r
742 Class NameDelegator&nbsp; '// defined_as_interface<BR/>\r
743 &nbsp; Public&nbsp; Name<BR/>\r
744 &nbsp; Public Property Get&nbsp; TrueName() : TrueName = NameDelegator_getTrueName( Me ) : End Property<BR/>\r
745 &nbsp; Public&nbsp; m_Delegate ' as ClassA or ClassB or string(before validated)<BR/>\r
746 &nbsp; Public Property Get&nbsp; DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property<BR/>\r
747 End Class</DIV>\r
748 <DIV id="text178_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:38px; margin-top:7456px; line-height:15px; white-space:nowrap">\r
749 <A name="get_NameDelegator">\r
750 NameDelegator \82Ì\83N\83\89\83X\92è\8b`</A></DIV>\r
751 <DIV id="text178_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:5614px; line-height:15px; white-space:nowrap">\r
752 \95¡\90\94\82©\82ç\93¯\82\83C\83\93\83X\83^\83\93\83X\82ð\8eQ\8fÆ\82µ\81A\83I\83u\83W\83F\83N\83g\82©\82ç\88ê\94Ê\96¼\81iName\83v\83\8d\83p\83e\83B\81j\82ð\8eæ\93¾\82·\82é\95K\97v\82ª<BR/>\r
753 \82 \82é\8fê\8d\87\82Í\81A\88ê\94Ê\96¼\82Æ\90³\8e®\96¼\82ª\91½\91Î\82P\82Ì\8aÖ\8cW\82É\82È\82è\81A\8e\9f\82Ì\82æ\82¤\82È\88Ï\8f÷\82ð\82µ\82È\82¢\82Æ\81AName \83v\83\8d\83p\83e\83B<BR/>\r
754 \82ª\82»\82ê\82¼\82ê\82Ì\8fê\96Ê\82É\89\9e\82\82½\88ê\94Ê\96¼\82É\82È\82è\82Ü\82¹\82ñ\81B</DIV>\r
755 <v:rect style="position:absolute; margin-left:49px; margin-top:6580px; width:496px; height:220px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
756 <DIV id="text178_4" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:6586px; line-height:15px; white-space:nowrap">\r
757 '// Class&nbsp; Sample&nbsp; has_interface_of ClassI<BR/>\r
758 <BR/>\r
759 Function&nbsp; &nbsp; get_Sample()<BR/>\r
760 &nbsp; Set get_Sample = get_NameDelegator( "Sample", Sample_getTrueName(), "ClassI" )<BR/>\r
761 End Function<BR/>\r
762 <BR/>\r
763 Function&nbsp; Sample_getTrueName()<BR/>\r
764 &nbsp; Dim&nbsp; ret : ret = GetVar( "Sample" )<BR/>\r
765 &nbsp; If IsEmpty( ret ) Then<BR/>\r
766 &nbsp; &nbsp; '// default is ClassA fixed<BR/>\r
767 &nbsp; &nbsp; ret = "TrueSample" : SetVar "Sample", ret<BR/>\r
768 &nbsp; End If<BR/>\r
769 &nbsp; Sample_getTrueName = ret<BR/>\r
770 End Function</DIV>\r
771 <DIV id="text178_5" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:171px; margin-top:6692px; line-height:13px; white-space:nowrap">\r
772 <A href="..\vbslib.files\vbslib_38.html#GetVar">\r
773 GetVar</A></DIV>\r
774 <v:rect style="position:absolute; margin-left:49px; margin-top:6851px; width:472px; height:295px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
775 <DIV id="text178_6" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:6857px; line-height:15px; white-space:nowrap">\r
776 '// Class&nbsp; ClassA&nbsp; has_interface_of ClassI<BR/>\r
777 <BR/>\r
778 Dim&nbsp; g_TrueSample<BR/>\r
779 <BR/>\r
780 Function&nbsp; &nbsp; get_TrueSample()<BR/>\r
781 &nbsp; If IsEmpty( g_TrueSample ) Then _<BR/>\r
782 &nbsp; &nbsp; Set g_TrueSample = new TrueSample<BR/>\r
783 &nbsp; Set get_TrueSample =&nbsp; &nbsp;g_TrueSample<BR/>\r
784 End Function<BR/>\r
785 <BR/>\r
786 <BR/>\r
787 Class TrueSample<BR/>\r
788 &nbsp; Public&nbsp; Property Get&nbsp; Name()&nbsp; &nbsp; &nbsp;: Name&nbsp; &nbsp; &nbsp;= TypeName(Me) : End Property<BR/>\r
789 &nbsp; Public&nbsp; Property Get&nbsp; TrueName() : TrueName = TypeName(Me) : End Property<BR/>\r
790 &nbsp; '--- Name is factory pattern.<BR/>\r
791 <BR/>\r
792 &nbsp; Public&nbsp; Value<BR/>\r
793 &nbsp; Public Function&nbsp; Method1() : Method1 = "TrueSample.Method1" : End Function<BR/>\r
794 End Class</DIV>\r
795 <DIV id="text178_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:41px; margin-top:6561px; line-height:15px; white-space:nowrap">\r
796 <A name="ClassN">\r
797 \88ê\94Ê\96¼(Sample)\82Ì\83N\83\89\83X\92è\8b` (\88ê\94Ê\96¼\82Æ\90³\8e®\96¼\82ª\91½\91Î\82P\82à\82 \82é\8fê\8d\87\81j</A></DIV>\r
798 <DIV id="text178_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:41px; margin-top:6832px; line-height:15px; white-space:nowrap">\r
799 <A name="NameClassA">\r
800 \90³\8e®\96¼(TrueSample)\82Ì\83N\83\89\83X\92è\8b`</A></DIV>\r
801 <DIV id="text178_9" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:171px; margin-top:6632px; line-height:13px; white-space:nowrap">\r
802 <A href="#get_NameDelegator">\r
803 get_NameDelegator</A></DIV>\r
804 <v:line style="position:absolute;" from="266,5723" to="214,5723" strokecolor="#000000" strokeweight="1pt"/>\r
805 <v:oval style="position:absolute; margin-left:211px; margin-top:5720px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
806 <v:line style="position:absolute;" from="267,5697" to="215,5697" strokecolor="#000000" strokeweight="1pt"/>\r
807 <v:oval style="position:absolute; margin-left:212px; margin-top:5694px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
808 <DIV id="text178_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:5815px; line-height:15px; white-space:nowrap">\r
809 Name \83v\83\8d\83p\83e\83B\82Í\81A\83\86\81[\83U\81[\82ª\8eæ\82è\88µ\82Á\82Ä\82¢\82é\8fê\96Ê\81i\83h\83\81\83C\83\93\81j\82É\82æ\82Á\82Ä\92\8a\8fÛ\93x\82ª\95Ï\89»\82µ\82Ä\81A\93¯\82¶<BR/>\r
810 \83C\83\93\83X\83^\83\93\83X\82É\91Î\82µ\82Ä\95¡\90\94\82Ì\88ê\94Ê\96¼\82ð\8e\9d\82Â\82±\82Æ\82É\82È\82è\82Ü\82·\81\82±\82Ì\83P\81[\83X\82É\91Î\89\9e\82·\82é\8eÀ\91\95\82Í\88Ï\8f÷\82Ì<BR/>\r
811 \8c`\91Ô\82ð\82Æ\82é\82Æ\82æ\82¢\82Å\82µ\82å\82¤\81B<BR/>\r
812 <BR/>\r
813 \91¼\82Ì\83h\83\81\83C\83\93\82Ì\96¼\91O\82ð\8eQ\8fÆ\82·\82é\95K\97v\82Í\81A\82Ù\82Æ\82ñ\82Ç\82 \82è\82Ü\82¹\82ñ\82ª\81A\82à\82µ\8eQ\8fÆ\82·\82é\82Ì\82Å\82 \82ê\82Î\81ANames<BR/>\r
814 \82Æ\82¢\82¤\8fW\8d\87\82Ì\83v\83\8d\83p\83e\83B\82É\82È\82è\82Ü\82·\81B</DIV>\r
815 <v:roundrect style="position:absolute; margin-left:72px; margin-top:5685px; width:91px; height:22px;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>\r
816 <DIV id="text178_13" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:79px; margin-top:5689px; line-height:15px; white-space:nowrap">\r
817 \8fê\96ÊA\82Ì\8aÖ\90\94</DIV>\r
818 <v:line style="position:absolute;" from="163,5697" to="206,5697" strokecolor="#000000" strokeweight="1pt">\r
819     <v:stroke dashstyle="dash"/>\r
820 </v:line>\r
821 <v:line style="position:absolute;" from="206,5697" to="195,5693" strokecolor="#000000" strokeweight="1pt"/>\r
822 <v:line style="position:absolute;" from="206,5697" to="195,5701" strokecolor="#000000" strokeweight="1pt"/>\r
823 <v:line style="position:absolute;" from="163,5722" to="206,5722" strokecolor="#000000" strokeweight="1pt">\r
824     <v:stroke dashstyle="dash"/>\r
825 </v:line>\r
826 <v:line style="position:absolute;" from="206,5722" to="195,5718" strokecolor="#000000" strokeweight="1pt"/>\r
827 <v:line style="position:absolute;" from="206,5722" to="195,5726" strokecolor="#000000" strokeweight="1pt"/>\r
828 <v:line style="position:absolute;" from="377,5697" to="395,5697" strokecolor="#000000" strokeweight="1pt"/>\r
829 <v:line style="position:absolute;" from="395,5697" to="395,5705" strokecolor="#000000" strokeweight="1pt"/>\r
830 <v:line style="position:absolute;" from="395,5722" to="377,5722" strokecolor="#000000" strokeweight="1pt"/>\r
831 <v:line style="position:absolute;" from="395,5705" to="420,5705" strokecolor="#000000" strokeweight="1pt"/>\r
832 <DIV id="text178_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:32px; margin-top:5921px; line-height:15px; white-space:nowrap">\r
833 \83I\83u\83W\83F\83N\83g\82Ì\8dí\8f\9c\82Í\81A\83K\81[\83x\83W\83R\83\8c\83N\83V\83\87\83\93\82É\94C\82¹\82Ä\81AClassI_Delegator \82ª\96³\82­\82È\82é\82Ü\82Å\91\8dÝ\82³\82¹<BR/>\r
834 \82é\82Æ\82æ\82¢\82Å\82µ\82å\82¤\81B<BR/>\r
835 <BR/>\r
836 \8eÀ\91Ì\82Ì\83t\83@\83C\83\8b\82ª\8dí\8f\9c\82³\82ê\82½\83V\83\87\81[\83g\83J\83b\83g\82Ì\82æ\82¤\82É\81AClassI_Delegator \82ª\8eQ\8fÆ\82·\82é\81A\90³\8e®\96¼\82Ì<BR/>\r
837 \83I\83u\83W\83F\83N\83g\82¾\82¯\82ð\96³\82­\82·\82Æ\82«\82Í\81A\88ê\94Ê\96¼\82©\82ç\88Ï\8f÷\90æ\82ð\8eQ\8fÆ\82µ\82Ä\82¢\82é ClassI_Delegator::m_Delegate<BR/>\r
838 \82ð Empty \82É\82µ\82Ä\83K\81[\83x\83W\83R\83\8c\83N\83V\83\87\83\93\82ð\93®\82©\82µ\82Ä\8dí\8f\9c\82µ\82Ü\82·\81\82Ü\82½\81AEmpty \82É\82·\82ê\82Î\81A\8dí\8f\9c\82³\82ê\82½<BR/>\r
839 \83I\83u\83W\83F\83N\83g\82É\83A\83N\83Z\83X\82µ\82æ\82¤\82Æ\82µ\82½\82Æ\82«\82É\81A\82«\82¿\82ñ\82Æ\97á\8aO\82ª\94­\90\82·\82é\82æ\82¤\82É\82È\82è\82Ü\82·\81B</DIV>\r
840 <DIV id="text178_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:351px; margin-top:5668px; line-height:15px; white-space:nowrap">\r
841 Name \88È\8aO\82Í</DIV>\r
842 <DIV id="text178_22" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:172px; margin-top:5673px; line-height:15px; white-space:nowrap">\r
843 \8eQ\8fÆ</DIV>\r
844 <v:rect style="position:absolute; margin-left:265px; margin-top:5686px; width:112px; height:20px;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>\r
845 <DIV id="text178_23" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:273px; margin-top:5689px; line-height:15px; white-space:nowrap">\r
846 \8fê\96ÊA\82Å\82Ì Name</DIV>\r
847 <v:rect style="position:absolute; margin-left:265px; margin-top:5712px; width:112px; height:20px;" fillcolor="#F0F3FF" strokecolor="#000000" strokeweight="1pt"/>\r
848 <DIV id="text178_24" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:273px; margin-top:5715px; line-height:15px; white-space:nowrap">\r
849 \8fê\96ÊB\82Å\82Ì Name</DIV>\r
850 <v:rect style="position:absolute; margin-left:421px; margin-top:5697px; width:142px; height:26px;" fillcolor="#E6E6FF" strokecolor="#000000" strokeweight="1pt"/>\r
851 <DIV id="text178_25" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:429px; margin-top:5703px; line-height:15px; white-space:nowrap">\r
852 \82 \82é\82P\82Â\82Ì\83C\83\93\83X\83^\83\93\83X</DIV>\r
853 <DIV id="text178_26" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:456px; margin-top:5725px; text-align: center; line-height:15px; white-space:nowrap">\r
854 TrueName<BR/>\r
855 \81i\90³\8e®\96¼\81j</DIV>\r
856 <DIV id="text178_27" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:270px; margin-top:5738px; text-align: center; line-height:10px; white-space:nowrap">\r
857 ClassI_Delegator \83N\83\89\83X<BR/>\r
858 \81i\88ê\94Ê\96¼\81j</DIV>\r
859 <DIV id="text178_28" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:19px; margin-top:5584px; line-height:15px; white-space:nowrap">\r
860 <A name="NameDelegate">\r
861 Name \82Æ TrueName \82ª\91½\91Î\82P\82Ì\8fê\8d\87</A></DIV>\r
862 <DIV id="text178_29" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; font-weight: bold; margin-left:77px; margin-top:6331px; line-height:13px; white-space:nowrap">\r
863 <A href="#ClassN">\r
864 Sample_getTrueName</A></DIV>\r
865 <DIV id="text178_30" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:42px; margin-top:6293px; line-height:13px; white-space:nowrap">\r
866 <A href="vbs_memo_10.html#get_ClassA">\r
867 get_Object</A></DIV>\r
868 <DIV id="text178_31" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:25px; margin-top:6265px; line-height:15px; white-space:nowrap">\r
869 \8f\88\97\9d\83t\83\8d\81[</DIV>\r
870 <DIV id="text178_32" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:104px; margin-top:6293px; line-height:13px; white-space:nowrap">\r
871 ( "Sample" )</DIV>\r
872 <DIV id="text178_33" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:248px; margin-top:6291px; line-height:15px; white-space:nowrap">\r
873 \88ê\94Ê\96¼ "Sample" \82Ì\83I\83u\83W\83F\83N\83g\82ð\8eæ\93¾\82·\82é</DIV>\r
874 <DIV id="text178_34" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:276px; margin-top:6329px; line-height:15px; white-space:nowrap">\r
875 \88ê\94Ê\96¼ "Sample" \82©\82ç\81A\90³\8e®\96¼ "TrueSample" \82ð\91I\91ð</DIV>\r
876 <DIV id="text178_35" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:77px; margin-top:6351px; line-height:13px; white-space:nowrap">\r
877 <A href="#get_NameDelegator">\r
878 get_NameDelegator</A></DIV>\r
879 <DIV id="text178_36" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:134px; margin-top:6410px; line-height:13px; white-space:nowrap">\r
880 <A href="#ClassI_Delegator">\r
881 new_ClassI_Delegator</A></DIV>\r
882 <DIV id="text178_37" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:155px; margin-top:6426px; line-height:13px; white-space:nowrap">\r
883 new ClassI_Delegator</DIV>\r
884 <DIV id="text178_38" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:155px; margin-top:6507px; line-height:13px; white-space:nowrap">\r
885 new TrueSample</DIV>\r
886 <DIV id="text178_39" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:94px; margin-top:6374px; line-height:13px; white-space:nowrap">\r
887 If not g_NameDic.Exists( Name +"__"+ TrueName +"_"+ InterfaceName ) Then</DIV>\r
888 <DIV id="text178_40" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:294px; margin-top:6424px; line-height:15px; white-space:nowrap">\r
889 InterfaceName \83C\83\93\83^\81[\83t\83F\83C\83X\82ð\8e\9d\82¿\81A<BR/>\r
890 TrueName \82Ö\88Ï\8f÷\82·\82é\83I\83u\83W\83F\83N\83g\82ð\90\90¬</DIV>\r
891 <DIV id="text178_41" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:263px; margin-top:6505px; line-height:15px; white-space:nowrap">\r
892 \90³\8e®\96¼\82Ì\83I\83u\83W\83F\83N\83g\82ð\90\90¬\82·\82é</DIV>\r
893 <DIV id="text178_42" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:25px; margin-top:6051px; line-height:15px; white-space:nowrap">\r
894 \83T\83\93\83v\83\8b\83t\83@\83C\83\8b</DIV>\r
895 <DIV id="text178_43" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:49px; margin-top:6076px; line-height:15px; white-space:nowrap">\r
896 \81¨ T_NameDelegator \83t\83H\83\8b\83_</DIV>\r
897 <DIV id="text178_44" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF8000; margin-left:152px; margin-top:6311px; line-height:13px; white-space:nowrap">\r
898 [Sample]</DIV>\r
899 <DIV id="text178_45" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF8000; margin-left:216px; margin-top:6331px; line-height:13px; white-space:nowrap">\r
900 [Sample]</DIV>\r
901 <DIV id="text178_46" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0080; margin-left:233px; margin-top:6489px; line-height:13px; white-space:nowrap">\r
902 [TrueSample]</DIV>\r
903 <v:roundrect style="position:absolute; margin-left:72px; margin-top:5711px; width:91px; height:22px;" arcsize="0.454545" fillcolor="#E1EEE8" strokecolor="#000000" strokeweight="1pt"/>\r
904 <DIV id="text178_47" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:79px; margin-top:5715px; line-height:15px; white-space:nowrap">\r
905 \8fê\96ÊB\82Ì\8aÖ\90\94</DIV>\r
906 <DIV id="text178_48" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:426px; margin-top:5668px; line-height:15px; white-space:nowrap">\r
907 <A href="vbs_memo_12.html#m_Delegate">\r
908 \88Ï\8f÷</A></DIV>\r
909 <v:line style="position:absolute;" from="395,5713" to="421,5713" strokecolor="#000000" strokeweight="1pt"/>\r
910 <v:line style="position:absolute;" from="395,5713" to="395,5722" strokecolor="#000000" strokeweight="1pt"/>\r
911 <DIV id="text178_51" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:60px; margin-top:6311px; line-height:13px; white-space:nowrap">\r
912 <A href="#ClassN_no">\r
913 get_Sample</A></DIV>\r
914 <DIV id="text178_52" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:25px; margin-top:6116px; line-height:15px; white-space:nowrap">\r
915 \83f\81[\83^\8d\\91¢</DIV>\r
916 <DIV id="text178_53" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:148px; margin-top:6147px; line-height:13px; white-space:nowrap">\r
917 g_NameDic</DIV>\r
918 <DIV id="text178_54" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:49px; margin-top:6147px; line-height:13px; white-space:nowrap">\r
919 Dictionary</DIV>\r
920 <DIV id="text178_55" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:66px; margin-top:6185px; line-height:13px; white-space:nowrap">\r
921 <A href="#ClassN" style="color:#FF0000">\r
922 ClassI_Delegator</A></DIV>\r
923 <DIV id="text178_56" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:175px; margin-top:6185px; line-height:13px; white-space:nowrap">\r
924 .Item</DIV>\r
925 <DIV id="text178_57" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:175px; margin-top:6166px; line-height:13px; white-space:nowrap">\r
926 .Key</DIV>\r
927 <DIV id="text178_58" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:66px; margin-top:6166px; line-height:13px; white-space:nowrap">\r
928 string</DIV>\r
929 <DIV id="text178_59" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:215px; margin-top:6166px; line-height:13px; white-space:nowrap">\r
930 = Name +"__"+ TrueName +"_"+ InterfaceName</DIV>\r
931 <DIV id="text178_60" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:196px; margin-top:6204px; line-height:13px; white-space:nowrap">\r
932 .Name</DIV>\r
933 <DIV id="text178_61" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:196px; margin-top:6220px; line-height:13px; white-space:nowrap">\r
934 .m_Delegate</DIV>\r
935 <DIV id="text178_62" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:84px; margin-top:6204px; line-height:13px; white-space:nowrap">\r
936 string</DIV>\r
937 <DIV id="text178_63" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:84px; margin-top:6220px; line-height:13px; white-space:nowrap">\r
938 <A href="#NameClassA">\r
939 TrueSample</A></DIV>\r
940 <DIV id="text178_64" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:235px; margin-top:6204px; line-height:13px; white-space:nowrap">\r
941 = "Sample"</DIV>\r
942 <v:line style="position:absolute;" from="218,6190" to="408,6190" strokecolor="#C0C0C0" strokeweight="1pt"/>\r
943 <v:oval style="position:absolute; margin-left:405px; margin-top:6187px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#C0C0C0" strokeweight="1pt"/>\r
944 <DIV id="text178_66" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:330px; margin-top:6199px; line-height:13px; white-space:nowrap">\r
945 ClassI</DIV>\r
946 <DIV id="text178_67" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:88px; margin-top:7896px; line-height:15px; white-space:nowrap">\r
947 <A href="..\vbslib.files\vbslib_13.html#get_NameDelegator">\r
948 \81¨ get_NameDelegator (vbslib)</A></DIV>\r
949 <DIV id="text178_68" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:50px; margin-top:7896px; line-height:15px; white-space:nowrap">\r
950 \8eQ\8dl</DIV>\r
951 <DIV id="text178_69" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:38px; margin-top:7173px; line-height:15px; white-space:nowrap">\r
952 <A name="ClassI_Delegator">\r
953 ClassI_Delegator \83N\83\89\83X\92è\8b`</A></DIV>\r
954 <DIV id="text178_70" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:112px; margin-top:6391px; line-height:13px; white-space:nowrap">\r
955 new_X</DIV>\r
956 <DIV id="text178_71" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:148px; margin-top:6391px; line-height:13px; white-space:nowrap">\r
957 ( InterfaceName + "_Delegator" )</DIV>\r
958 <DIV id="text178_72" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:181px; margin-top:6351px; line-height:13px; white-space:nowrap">\r
959 ( Name, TrueName, InterfaceName )</DIV>\r
960 <DIV id="text178_73" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:8pt; color:#000000; margin-left:201px; margin-top:5737px; line-height:12px; white-space:nowrap">\r
961 ClassI</DIV>\r
962 <DIV id="text178_74" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:112px; margin-top:6452px; line-height:15px; white-space:nowrap">\r
963 .Name = Name<BR/>\r
964 Set&nbsp; .m_Delegate = get_Object( TrueName )</DIV>\r
965 <DIV id="text178_75" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#808080; margin-left:57px; margin-top:7828px; line-height:13px; white-space:nowrap">\r
966 &nbsp; Public Property Get&nbsp; DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property</DIV>\r
967 <DIV id="text178_76" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:50px; margin-top:7869px; line-height:15px; white-space:nowrap">\r
968 DefineInfo \83v\83\8d\83p\83e\83B\82Í\81A\83I\83v\83V\83\87\83\93\82Å\82·\81B</DIV>\r
969 <DIV id="text178_77" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:294px; margin-top:7869px; line-height:15px; white-space:nowrap">\r
970 <A href="vbs_memo_12.html#DefineInfo">\r
971 \81¨ DefineInfo \83v\83\8d\83p\83e\83B</A></DIV>\r
972 <DIV id="text178_78" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:226px; margin-top:6468px; line-height:13px; white-space:nowrap">\r
973 <A href="vbs_memo_10.html#get_ClassA">\r
974 get_Object</A></DIV>\r
975 <DIV id="text178_79" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:134px; margin-top:6489px; line-height:13px; white-space:nowrap">\r
976 <A href="#NameClassA">\r
977 get_TrueSample</A></DIV>\r
978 <v:rect style="position:absolute; margin-left:49px; margin-top:7193px; width:574px; height:235px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
979 <DIV id="text178_80" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:7199px; line-height:15px; white-space:nowrap">\r
980 Class ClassI_Delegator&nbsp; '// has_interface_of NameDelegator and ClassI<BR/>\r
981 &nbsp; Public&nbsp; Name<BR/>\r
982 &nbsp; Public Property Get&nbsp; TrueName() : TrueName = NameDelegator_getTrueName( Me ) : End Property<BR/>\r
983 &nbsp; Public&nbsp; m_Delegate ' as ClassA or ClassB or string(before validated)<BR/>\r
984 &nbsp; '--- Name is factory pattern.<BR/>\r
985 <BR/>\r
986 &nbsp; Public Property Let&nbsp; Value( v ) : m_Delegate.Value = v : End Property<BR/>\r
987 &nbsp; Public Property Get&nbsp; Value( )&nbsp; &nbsp;: Value = m_Delegate.Value : End Property<BR/>\r
988 &nbsp; Public Function&nbsp; Method1() : Method1 = m_Delegate.Method1() : End Function<BR/>\r
989 End Class<BR/>\r
990 <BR/>\r
991 <BR/>\r
992 Function&nbsp; new_ClassI_Delegator()&nbsp; '// has_interface_of NameDelegator and ClassI<BR/>\r
993 &nbsp; Set&nbsp; new_ClassI_Delegator = new ClassI_Delegator<BR/>\r
994 End Function</DIV>\r
995 <DIV id="text178_81" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#008000; margin-left:271px; margin-top:6409px; line-height:13px; white-space:nowrap">\r
996 [ClassI_Delegator]</DIV>\r
997 <v:line style="position:absolute;" from="217,6196" to="352,6196" strokecolor="#C0C0C0" strokeweight="1pt"/>\r
998 <v:oval style="position:absolute; margin-left:349px; margin-top:6193px; width:5px; height:5px;" fillcolor="#FFFFFF" strokecolor="#C0C0C0" strokeweight="1pt"/>\r
999 <DIV id="text178_83" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:388px; margin-top:6195px; line-height:13px; white-space:nowrap">\r
1000 <A href="#get_NameDelegator">\r
1001 NameDelegator</A></DIV>\r
1002 <DIV id="text178_84" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:423px; margin-top:6182px; line-height:15px; white-space:nowrap">\r
1003 \88ê\94Ê\96¼\82ð\8e\9d\82Á\82½\83I\83u\83W\83F\83N\83g</DIV>\r
1004 <DIV id="text178_85" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#800000; margin-left:289px; margin-top:6219px; line-height:15px; white-space:nowrap">\r
1005 \90³\8e®\96¼\82ð\8e\9d\82Á\82½\83I\83u\83W\83F\83N\83g</DIV>\r
1006 <DIV id="text178_86" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:242px; margin-top:6076px; line-height:15px; white-space:nowrap">\r
1007 \81¨ T_NameDelegator_vbslib \83t\83H\83\8b\83_</DIV>\r
1008 <DIV id="text178_87" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:262px; margin-top:5764px; line-height:15px; white-space:nowrap">\r
1009 \97á\81F Windows<BR/>\r
1010 \97á\81F Windows7</DIV>\r
1011 <DIV id="text178_88" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:419px; margin-top:5764px; line-height:15px; white-space:nowrap">\r
1012 \97á\81F Windows7</DIV>\r
1013 \r
1014 <v:line from="0,5564" to="655,5564"/>\r
1015 <v:line from="655,5564" to="655,7947"/>\r
1016 <v:line from="655,7947" to="0,7947"/>\r
1017 <v:line from="0,7947" to="0,5564"/>\r
1018 \r
1019 </PAGE>\r
1020  \r
1021 <!-- page 179 --> \r
1022 <PAGE>\r
1023 <A id="svgcats_vml_p179" class="to_tree" style="margin-top:7952px;" onClick="selectTreeElem( '179' );">\81©</A>\r
1024 <A href="#svgcats_vml_p180" class="to_next_page" style="margin-top:7952px;">\81¥</A>\r
1025 <A href="#svgcats_vml_p178" class="to_prev_page" style="margin-top:7952px;">\81£</A>\r
1026 <v:rect style="position:absolute; margin-left:0px; margin-top:7963px; width:598px; height:385px;" fillcolor="white"/>\r
1027 <DIV id="text179_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:7980px; line-height:15px; white-space:nowrap">\r
1028 <A name="ListOfName">\r
1029 \96¼\91O\82Ì\88ê\97\97</A></DIV>\r
1030 <DIV id="text179_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:8009px; line-height:15px; white-space:nowrap">\r
1031 \83I\83u\83W\83F\83N\83g\82Ì\96¼\91O\82ð\88ê\97\97\82·\82é\82Æ\82«\82Í\81A<BR/>\r
1032 \8eæ\93¾\82µ\82Ä\81AName \83v\83\8d\83p\83e\83B\82ð\95\\8e¦\82µ\82Ü\82·\81B TrueName \82Í\81A\95K\97v\82È\82ç\95â\8f\95\93I\82É\95\\8e¦\82µ\82Ü\82·\81B</DIV>\r
1033 <v:rect style="position:absolute; margin-left:48px; margin-top:8166px; width:256px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1034 <DIV id="text179_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:8173px; line-height:13px; white-space:nowrap">\r
1035 Sub&nbsp; &nbsp;ClassI::Validate( Opt as variant )</DIV>\r
1036 <DIV id="text179_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:8125px; line-height:15px; white-space:nowrap">\r
1037 \82½\82¾\82µ\81A\82·\82×\82Ä\82Ì\83I\83u\83W\83F\83N\83g\82ð\90\90¬\82·\82é\82Æ\8e\9e\8aÔ\82ª\82©\82©\82é\8fê\8d\87\81A\90\90¬\8e\9e\82É\8eÀ\8ds\82·\82é\8f\89\8aú\89»\8f\88\97\9d<BR/>\r
1038 (Class_Initialize) \82ð Validate \83\81\83\\83b\83h\82É\88Ú\82·\82Æ\82æ\82¢\82Å\82µ\82å\82¤\81B</DIV>\r
1039 <DIV id="text179_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:243px; margin-top:8009px; line-height:15px; white-space:nowrap">\r
1040 <A href="vbs_memo_10.html#get_ObjectsFromFile">\r
1041 get_ObjectsFormFile</A></DIV>\r
1042 <DIV id="text179_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:362px; margin-top:8009px; line-height:15px; white-space:nowrap">\r
1043 \82Å\88ê\97\97\82·\82é\82·\82×\82Ä\82Ì\83I\83u\83W\83F\83N\83g\82ð</DIV>\r
1044 <v:rect style="position:absolute; margin-left:48px; margin-top:8051px; width:454px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1045 <DIV id="text179_7" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:8057px; line-height:15px; white-space:nowrap">\r
1046 Dim&nbsp; samples, sample<BR/>\r
1047 get_ObjectsFromFile&nbsp; "Lib\*_obj.vbs", "ClassI", samples '// [out] samples<BR/>\r
1048 For Each sample&nbsp; In samples : echo&nbsp; sample.Name : Next</DIV>\r
1049 <DIV id="text179_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:8215px; line-height:15px; white-space:nowrap">\r
1050 \88ê\97\97\82·\82é\82Æ\82«\82Í\81A\88ê\94Ê\96¼\82ª Name \83v\83\8d\83p\83e\83B\82É\93ü\82Á\82Ä\82¢\82é\83I\83u\83W\83F\83N\83g\82Æ\81A\90³\8e®\96¼\82ª Name<BR/>\r
1051 \83v\83\8d\83p\83e\83B\82É\93ü\82Á\82Ä\82¢\82é\83I\83u\83W\83F\83N\83g\82Ì\97¼\95û\82ð\88ê\97\97\82µ\82Ü\82·\81B</DIV>\r
1052 <DIV id="text179_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:49px; margin-top:8300px; line-height:15px; white-space:nowrap">\r
1053 \81¨ T_NameList \83t\83H\83\8b\83_</DIV>\r
1054 <DIV id="text179_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:214px; margin-top:8300px; line-height:15px; white-space:nowrap">\r
1055 \81¨ T_NameList_vbslib \83t\83H\83\8b\83_</DIV>\r
1056 <DIV id="text179_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:30px; margin-top:8272px; line-height:15px; white-space:nowrap">\r
1057 \83T\83\93\83v\83\8b\83t\83@\83C\83\8b</DIV>\r
1058 \r
1059 <v:line from="0,7963" to="598,7963"/>\r
1060 <v:line from="598,7963" to="598,8348"/>\r
1061 <v:line from="598,8348" to="0,8348"/>\r
1062 <v:line from="0,8348" to="0,7963"/>\r
1063 \r
1064 </PAGE>\r
1065  \r
1066 <!-- page 180 --> \r
1067 <PAGE>\r
1068 <A id="svgcats_vml_p180" class="to_tree" style="margin-top:8353px;" onClick="selectTreeElem( '180' );">\81©</A>\r
1069 <A href="#svgcats_vml_p181" class="to_next_page" style="margin-top:8353px;">\81¥</A>\r
1070 <A href="#svgcats_vml_p179" class="to_prev_page" style="margin-top:8353px;">\81£</A>\r
1071 <v:rect style="position:absolute; margin-left:0px; margin-top:8364px; width:622px; height:883px;" fillcolor="white"/>\r
1072 <DIV id="text180_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:8381px; line-height:15px; white-space:nowrap">\r
1073 <A name="Item">\r
1074 Item \83f\83t\83H\83\8b\83g\81E\83v\83\8d\83p\83e\83B : \93®\93I\92è\8b`\83\81\83\93\83o\81[ (vbsool)</A></DIV>\r
1075 <v:rect style="position:absolute; margin-left:29px; margin-top:8413px; width:322px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1076 <DIV id="text180_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:8420px; line-height:13px; white-space:nowrap">\r
1077 Default Property&nbsp; Item( Name as string ) as variant</DIV>\r
1078 <DIV id="text180_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8449px; line-height:15px; white-space:nowrap">\r
1079 VBScript \82Í\81AECMA Script (JavaScript) \82Ì\82æ\82¤\82É\81A\93®\93I\82É\83\81\83\93\83o\81[\82ð\92è\8b`\82·\82é\82±\82Æ\82Í\82Å\82«\82Ü\82¹\82ñ\82ª\81A<BR/>\r
1080 \83f\83t\83H\83\8b\83g\81E\83v\83\8d\83p\83e\83B\82Æ\81A\8e«\8f\91\81iDictionary \83N\83\89\83X\81j\82ð\8eg\82¤\82±\82Æ\82Å\81A\93¯\97l\82Ì\82±\82Æ\82ª\82Å\82«\82Ü\82·\81B</DIV>\r
1081 <DIV id="text180_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:74px; margin-top:9175px; line-height:15px; white-space:nowrap">\r
1082 \81¨ JavaScript \82Ì\83N\83\89\83X</DIV>\r
1083 <DIV id="text180_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:33px; margin-top:9175px; line-height:15px; white-space:nowrap">\r
1084 \8eQ\8dl</DIV>\r
1085 <DIV id="text180_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:215px; margin-top:9175px; line-height:15px; white-space:nowrap">\r
1086 <A href="vbs_memo_07.html#dic">\r
1087 \81¨ Dictionary \83N\83\89\83X</A></DIV>\r
1088 <DIV id="text180_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:74px; margin-top:9199px; line-height:15px; white-space:nowrap">\r
1089 <A href="#Items">\r
1090 \81¨ Items \83v\83\8d\83p\83e\83B</A></DIV>\r
1091 <DIV id="text180_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8496px; line-height:15px; white-space:nowrap">\r
1092 Item \83v\83\8d\83p\83e\83B\82Í\81ADictionary \82â FolderItem \82È\82Ç\82É\8f\80\8b\92\82µ\82Ä\82¢\82Ü\82·\81B<BR/>\r
1093 ArrayClass(vbslib) \82à\81AItem \83v\83\8d\83p\83e\83B\82ª\8eg\82¦\82Ü\82·\81B</DIV>\r
1094 <DIV id="text180_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:103px; margin-top:8542px; line-height:15px; white-space:nowrap">\r
1095 \81¨ T_Item \83t\83H\83\8b\83_</DIV>\r
1096 <DIV id="text180_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8542px; line-height:15px; white-space:nowrap">\r
1097 \83T\83\93\83v\83\8b\81F</DIV>\r
1098 <v:rect style="position:absolute; margin-left:46px; margin-top:8623px; width:310px; height:145px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1099 <DIV id="text180_11" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:8629px; line-height:15px; white-space:nowrap">\r
1100 &nbsp; Dim obj : Set obj = new ClassA<BR/>\r
1101 &nbsp; obj.PropA&nbsp; &nbsp; = 1&nbsp; &nbsp;'// Static&nbsp; defined property<BR/>\r
1102 &nbsp; obj("PropB") = 12&nbsp; '// Dynamic defined property<BR/>\r
1103 &nbsp; obj("PropC") = "ABC"<BR/>\r
1104 &nbsp; Set obj("PropD") = new ClassA<BR/>\r
1105 <BR/>\r
1106 &nbsp; WScript.Echo&nbsp; "PropA = "&amp; obj.PropA<BR/>\r
1107 &nbsp; WScript.Echo&nbsp; "PropB = "&amp; obj("PropB")<BR/>\r
1108 &nbsp; WScript.Echo&nbsp; "PropC = "&amp; obj("PropC").Value</DIV>\r
1109 <DIV id="text180_12" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8602px; line-height:15px; white-space:nowrap">\r
1110 \8eg\97p\97á\81F</DIV>\r
1111 <v:rect style="position:absolute; margin-left:46px; margin-top:8814px; width:544px; height:340px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1112 <DIV id="text180_13" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:8820px; line-height:15px; white-space:nowrap">\r
1113 Class ClassA<BR/>\r
1114 &nbsp; Public&nbsp; PropA&nbsp; '// Static defined property<BR/>\r
1115 <BR/>\r
1116 &nbsp; '//=== Dynamic defined property : Item, Items, Keys<BR/>\r
1117 &nbsp; Public Default Property Get&nbsp; Item( Name ) : LetSet&nbsp; Item, m_Dic( Name ) : End Property<BR/>\r
1118 &nbsp; Public Property Let&nbsp; Item( Name, Value ) : m_Dic( Name ) = Value : End Property<BR/>\r
1119 &nbsp; Public Property Set&nbsp; Item( Name, Object ) : Set m_Dic( Name ) = Object : End Property<BR/>\r
1120 <BR/>\r
1121 &nbsp; Public Property Get&nbsp; Keys()&nbsp; : Keys&nbsp; = m_Dic.Keys&nbsp; : End Property<BR/>\r
1122 &nbsp; Public Property Get&nbsp; Items() : Items = m_Dic.Items : End Property<BR/>\r
1123 <BR/>\r
1124 &nbsp; Public m_Dic&nbsp; ' as Dictionary<BR/>\r
1125 &nbsp; Private Sub&nbsp; Class_Initialize()<BR/>\r
1126 &nbsp; &nbsp; Set m_Dic = CreateObject( "Scripting.Dictionary" )<BR/>\r
1127 &nbsp; &nbsp; m_Dic.CompareMode = 1&nbsp; '// NotCaseSensitive<BR/>\r
1128 &nbsp; End Sub<BR/>\r
1129 <BR/>\r
1130 End Class<BR/>\r
1131 <BR/>\r
1132 Sub&nbsp; LetSet( Out, In_ )<BR/>\r
1133 &nbsp; If IsObject( In_ ) Then&nbsp; Set Out = In_ Else Out = In_<BR/>\r
1134 End Sub</DIV>\r
1135 <DIV id="text180_14" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:8792px; line-height:15px; white-space:nowrap">\r
1136 <A name="Item_def">\r
1137 \92è\8b`\97á\81F Item, Items, Keys \83v\83\8d\83p\83e\83B\82ª\82 \82é\83N\83\89\83X\82Ì\92è\8b`</A></DIV>\r
1138 <DIV id="text180_15" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:271px; margin-top:8542px; line-height:15px; white-space:nowrap">\r
1139 vbslib \82È\82µ\94Å</DIV>\r
1140 <DIV id="text180_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:33px; margin-top:9199px; line-height:15px; white-space:nowrap">\r
1141 \8aÖ\98A</DIV>\r
1142 <DIV id="text180_17" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:204px; margin-top:9199px; line-height:15px; white-space:nowrap">\r
1143 <A href="#Keys">\r
1144 \81¨ Keys \83v\83\8d\83p\83e\83B</A></DIV>\r
1145 <DIV id="text180_18" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:103px; margin-top:8562px; line-height:15px; white-space:nowrap">\r
1146 \81¨ T_Item_vbslib \83t\83H\83\8b\83_</DIV>\r
1147 <DIV id="text180_19" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:271px; margin-top:8562px; line-height:15px; white-space:nowrap">\r
1148 vbslib \8eg\97p\94Å</DIV>\r
1149 <DIV id="text180_20" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:331px; margin-top:9199px; line-height:15px; white-space:nowrap">\r
1150 \81¨ GetSetting \8aÖ\90\94</DIV>\r
1151 <v:roundrect style="position:absolute; margin-left:359px; margin-top:8376px; width:72px; height:20px;" arcsize="0.500000" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
1152 <DIV id="text180_21" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#FF0000; font-weight: bold; margin-left:367px; margin-top:8379px; line-height:15px; white-space:nowrap">\r
1153 ver2 \8có\95â</DIV>\r
1154 \r
1155 <v:line from="0,8364" to="622,8364"/>\r
1156 <v:line from="622,8364" to="622,9247"/>\r
1157 <v:line from="622,9247" to="0,9247"/>\r
1158 <v:line from="0,9247" to="0,8364"/>\r
1159 \r
1160 </PAGE>\r
1161  \r
1162 <!-- page 181 --> \r
1163 <PAGE>\r
1164 <A id="svgcats_vml_p181" class="to_tree" style="margin-top:9252px;" onClick="selectTreeElem( '181' );">\81©</A>\r
1165 <A href="#svgcats_vml_p182" class="to_next_page" style="margin-top:9252px;">\81¥</A>\r
1166 <A href="#svgcats_vml_p180" class="to_prev_page" style="margin-top:9252px;">\81£</A>\r
1167 <v:rect style="position:absolute; margin-left:0px; margin-top:9263px; width:497px; height:363px;" fillcolor="white"/>\r
1168 <DIV id="text181_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:9280px; line-height:15px; white-space:nowrap">\r
1169 <A name="Items">\r
1170 Items \83v\83\8d\83p\83e\83B : \93®\93I\92è\8b`\83\81\83\93\83o\81[\82Ì\92l\82Ì\8fW\8d\87 (vbsool)</A></DIV>\r
1171 <v:rect style="position:absolute; margin-left:29px; margin-top:9312px; width:262px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1172 <DIV id="text181_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:9319px; line-height:13px; white-space:nowrap">\r
1173 Property Get&nbsp; Items() as array of variant</DIV>\r
1174 <v:rect style="position:absolute; margin-left:46px; margin-top:9413px; width:196px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1175 <DIV id="text181_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9419px; line-height:15px; white-space:nowrap">\r
1176 &nbsp; For Each item&nbsp; In obj.Items<BR/>\r
1177 &nbsp; &nbsp; If IsObject( item ) Then<BR/>\r
1178 &nbsp; &nbsp; &nbsp; WScript.Echo&nbsp; item.Value<BR/>\r
1179 &nbsp; &nbsp; Else<BR/>\r
1180 &nbsp; &nbsp; &nbsp; WScript.Echo&nbsp; item<BR/>\r
1181 &nbsp; &nbsp; End If<BR/>\r
1182 &nbsp; Next</DIV>\r
1183 <DIV id="text181_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9392px; line-height:15px; white-space:nowrap">\r
1184 \8eg\97p\97á\81F</DIV>\r
1185 <DIV id="text181_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:97px; margin-top:9358px; line-height:15px; white-space:nowrap">\r
1186 <A href="#Item">\r
1187 \81¨ Item \83v\83\8d\83p\83e\83B</A></DIV>\r
1188 <DIV id="text181_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:9358px; line-height:15px; white-space:nowrap">\r
1189 \83T\83\93\83v\83\8b</DIV>\r
1190 <DIV id="text181_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9547px; line-height:15px; white-space:nowrap">\r
1191 \8fã\8bL\82Í\95W\8f\80\8c`\82Å\82·\82ª\81A\8f\88\97\9d\91¬\93x\82ª\97v\8b\81\82³\82ê\82é\82Æ\82«\82Í\8e\9f\82Ì\82æ\82¤\82É\82µ\82Ä\82­\82¾\82³\82¢\81B</DIV>\r
1192 <v:rect style="position:absolute; margin-left:46px; margin-top:9569px; width:226px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1193 <DIV id="text181_8" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9576px; line-height:13px; white-space:nowrap">\r
1194 &nbsp; For Each item&nbsp; In obj.m_Dic.Items</DIV>\r
1195 \r
1196 <v:line from="0,9263" to="497,9263"/>\r
1197 <v:line from="497,9263" to="497,9626"/>\r
1198 <v:line from="497,9626" to="0,9626"/>\r
1199 <v:line from="0,9626" to="0,9263"/>\r
1200 \r
1201 </PAGE>\r
1202  \r
1203 <!-- page 182 --> \r
1204 <PAGE>\r
1205 <A id="svgcats_vml_p182" class="to_tree" style="margin-top:9631px;" onClick="selectTreeElem( '182' );">\81©</A>\r
1206 <A href="#svgcats_vml_p183" class="to_next_page" style="margin-top:9631px;">\81¥</A>\r
1207 <A href="#svgcats_vml_p181" class="to_prev_page" style="margin-top:9631px;">\81£</A>\r
1208 <v:rect style="position:absolute; margin-left:0px; margin-top:9642px; width:497px; height:310px;" fillcolor="white"/>\r
1209 <DIV id="text182_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:9659px; line-height:15px; white-space:nowrap">\r
1210 <A name="Keys">\r
1211 Keys \83v\83\8d\83p\83e\83B : \93®\93I\92è\8b`\83\81\83\93\83o\81[\82Ì\83\81\83\93\83o\81[\96¼\82Ì\8fW\8d\87 (vbsool)</A></DIV>\r
1212 <v:rect style="position:absolute; margin-left:29px; margin-top:9691px; width:250px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1213 <DIV id="text182_2" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:9698px; line-height:13px; white-space:nowrap">\r
1214 Property Get&nbsp; Keys() as array of string</DIV>\r
1215 <v:rect style="position:absolute; margin-left:46px; margin-top:9792px; width:184px; height:55px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1216 <DIV id="text182_3" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9798px; line-height:15px; white-space:nowrap">\r
1217 &nbsp; For Each name&nbsp; In obj.Keys<BR/>\r
1218 &nbsp; &nbsp; WScript.Echo&nbsp; name<BR/>\r
1219 &nbsp; Next</DIV>\r
1220 <DIV id="text182_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9771px; line-height:15px; white-space:nowrap">\r
1221 \8eg\97p\97á\81F</DIV>\r
1222 <DIV id="text182_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:97px; margin-top:9737px; line-height:15px; white-space:nowrap">\r
1223 <A href="#Item">\r
1224 \81¨ Item \83v\83\8d\83p\83e\83B</A></DIV>\r
1225 <DIV id="text182_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:34px; margin-top:9737px; line-height:15px; white-space:nowrap">\r
1226 \83T\83\93\83v\83\8b</DIV>\r
1227 <DIV id="text182_7" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:33px; margin-top:9873px; line-height:15px; white-space:nowrap">\r
1228 \8fã\8bL\82Í\95W\8f\80\8c`\82Å\82·\82ª\81A\8f\88\97\9d\91¬\93x\82ª\97v\8b\81\82³\82ê\82é\82Æ\82«\82Í\8e\9f\82Ì\82æ\82¤\82É\82µ\82Ä\82­\82¾\82³\82¢\81B</DIV>\r
1229 <v:rect style="position:absolute; margin-left:46px; margin-top:9895px; width:220px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1230 <DIV id="text182_8" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9902px; line-height:13px; white-space:nowrap">\r
1231 &nbsp; For Each item&nbsp; In obj.m_Dic.Keys</DIV>\r
1232 \r
1233 <v:line from="0,9642" to="497,9642"/>\r
1234 <v:line from="497,9642" to="497,9952"/>\r
1235 <v:line from="497,9952" to="0,9952"/>\r
1236 <v:line from="0,9952" to="0,9642"/>\r
1237 \r
1238 </PAGE>\r
1239  \r
1240 <!-- page 183 --> \r
1241 <PAGE>\r
1242 <A id="svgcats_vml_p183" class="to_tree" style="margin-top:9957px;" onClick="selectTreeElem( '183' );">\81©</A>\r
1243 <A href="vbs_memo_12.html#svgcats_vml_p184" class="to_next_page" style="margin-top:9957px;">\81¥</A>\r
1244 <A href="#svgcats_vml_p182" class="to_prev_page" style="margin-top:9957px;">\81£</A>\r
1245 <v:rect style="position:absolute; margin-left:0px; margin-top:9968px; width:585px; height:1823px;" fillcolor="white"/>\r
1246 <DIV id="text183_1" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:9985px; line-height:15px; white-space:nowrap">\r
1247 <A name="vbsool_event">\r
1248 EventResponders : \83C\83x\83\93\83g\89\9e\93\9a (vbsool)</A></DIV>\r
1249 <DIV id="text183_2" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11677px; line-height:15px; white-space:nowrap">\r
1250 <A href="..\vbslib.files\vbslib_28.html#FuncRedir_add">\r
1251 \81¨ FuncRedir_add (vbslib)</A></DIV>\r
1252 <DIV id="text183_3" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:11677px; line-height:15px; white-space:nowrap">\r
1253 \8aÖ\98A</DIV>\r
1254 <DIV id="text183_4" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11719px; line-height:15px; white-space:nowrap">\r
1255 <A href="vbs_memo_12.html#delegate1">\r
1256 \81¨ \82P\82Â\82Ì\93o\98^\82³\82ê\82½\8aÖ\90\94\82ð\8cÄ\82Ñ\8fo\82·\95Ï\90\94\81A\83f\83\8a\83Q\81[\83g</A></DIV>\r
1257 <DIV id="text183_5" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:219px; margin-top:11677px; line-height:15px; white-space:nowrap">\r
1258 \8aÖ\90\94\92è\8b`\82Ì\83I\81[\83o\81[\83\89\83C\83h</DIV>\r
1259 <v:roundrect style="position:absolute; margin-left:329px; margin-top:9976px; width:67px; height:20px;" arcsize="0.500000" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
1260 <DIV id="text183_6" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#FF0000; font-weight: bold; margin-left:337px; margin-top:9979px; line-height:15px; white-space:nowrap">\r
1261 \8f\91\82«\82©\82¯</DIV>\r
1262 <v:rect style="position:absolute; margin-left:42px; margin-top:10165px; width:256px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1263 <DIV id="text183_7" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10172px; line-height:13px; white-space:nowrap">\r
1264 Dim&nbsp; ClassE::OnEventX as EventResponders</DIV>\r
1265 <DIV id="text183_8" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:10021px; line-height:15px; white-space:nowrap">\r
1266 \83C\83x\83\93\83g\82Æ\82Í\81A\82 \82é\83I\83u\83W\83F\83N\83g\82Ì\8fó\91Ô\95Ï\89»\82Ì\82±\82Æ\82Å\82·\81B<BR/>\r
1267 \83C\83x\83\93\83g\82ª\94­\90\82µ\82½\82Æ\82«\82É\8ds\82¤\8f\88\97\9d\82Í\81A\83A\83v\83\8a\83P\81[\83V\83\87\83\93\82É\82æ\82Á\82Ä\88Ù\82È\82è\82Ü\82·\81B<BR/>\r
1268 \82»\82±\82Å\81A\82 \82é\83C\83x\83\93\83g\82ª\94­\90\82µ\82½\82Æ\82«\82É\8ds\82¤\8f\88\97\9d\82ð\8aÖ\90\94\82É\8bL\8fq\82µ\82Ä\81A\82»\82Ì\8aÖ\90\94\82ð\83I\83u\83W\83F\83N\83g\82É<BR/>\r
1269 \93o\98^\82µ\82Ä\82¨\82­\82±\82Æ\82Å\81A\95K\97v\82È\82Æ\82«\82É\95K\97v\82È\8f\88\97\9d\82ª\82Å\82«\82é\82æ\82¤\82É\82È\82è\82Ü\82·\81B<BR/>\r
1270 \91¼\82Ì\8c¾\8cê\82Å\82Í\81A\8aÖ\90\94\83|\83C\83\93\83^\81A\83R\81[\83\8b\83o\83b\83N\8aÖ\90\94\81A\83\81\83\\83b\83h\83|\83C\83\93\83^\82È\82Ç\82Æ\8cÄ\82Î\82ê\82Ä\82¢\82Ü\82·\81B</DIV>\r
1271 <DIV id="text183_9" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:10440px; line-height:15px; white-space:nowrap">\r
1272 <A name="vbsool_event_declare">\r
1273 \92è\8b`\81\83C\83x\83\93\83g\82²\82Æ\82É\81A\83\81\83\\83b\83h\82ð\93o\98^\82Å\82«\82é\83\81\83\93\83o\81[\95Ï\90\94\82ð\90é\8c¾\82·\82é</A></DIV>\r
1274 <v:roundrect style="position:absolute; margin-left:421px; margin-top:9976px; width:72px; height:20px;" arcsize="0.500000" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
1275 <DIV id="text183_10" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#FF0000; font-weight: bold; margin-left:429px; margin-top:9979px; line-height:15px; white-space:nowrap">\r
1276 ver2 \8có\95â</DIV>\r
1277 <DIV id="text183_11" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10258px; line-height:15px; white-space:nowrap">\r
1278 <A href="#vbsool_event_declare">\r
1279 \81¨ \92è\8b`\81\83C\83x\83\93\83g\82²\82Æ\82É\81A\83\81\83\\83b\83h\82ð\93o\98^\82Å\82«\82é\83\81\83\93\83o\81[\95Ï\90\94\82ð\90é\8c¾\82·\82é</A></DIV>\r
1280 <v:rect style="position:absolute; margin-left:42px; margin-top:10501px; width:262px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1281 <DIV id="text183_12" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10507px; line-height:15px; white-space:nowrap">\r
1282 Class&nbsp; ClassE<BR/>\r
1283 &nbsp; Public&nbsp; OnEventX&nbsp; ' as EventResponders<BR/>\r
1284 <BR/>\r
1285 &nbsp; Private Sub&nbsp; Class_Initialize()<BR/>\r
1286 &nbsp; &nbsp; Set Me.OnEventX = new EventResponders<BR/>\r
1287 &nbsp; End Sub<BR/>\r
1288 End Class</DIV>\r
1289 <v:rect style="position:absolute; margin-left:133px; margin-top:10202px; width:364px; height:25px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1290 <DIV id="text183_13" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:141px; margin-top:10209px; line-height:13px; white-space:nowrap">\r
1291 Sub&nbsp; ClassA::OnEventX( Caller as ClassE, Args as variant )</DIV>\r
1292 <v:line style="position:absolute;" from="78,10214" to="126,10214" strokecolor="#000000" strokeweight="1pt"/>\r
1293 <v:shape style="position:absolute; margin-left:116px; margin-top:10209px; width:10px; height:10px"\r
1294  fillcolor="#000000" strokecolor="#000000" strokeweight="1pt"\r
1295  path="m 1000,500 l 0,0, 0,1000 x e"/>\r
1296 <v:line style="position:absolute;" from="78,10214" to="78,10197" strokecolor="#000000" strokeweight="1pt"/>\r
1297 <DIV id="text183_16" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:10655px; line-height:15px; white-space:nowrap">\r
1298 <A name="vbsool_event_add">\r
1299 \93o\98^\81\83R\81[\83\8b\83o\83b\83N\82³\82ê\82é\83\81\83\\83b\83h\82ð\81A\83\81\83\93\83o\81[\95Ï\90\94\82É\93o\98^\82·\82é</A></DIV>\r
1300 <v:rect style="position:absolute; margin-left:42px; margin-top:10964px; width:508px; height:295px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1301 <DIV id="text183_17" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10970px; line-height:15px; white-space:nowrap">\r
1302 Sub&nbsp; main()<BR/>\r
1303 &nbsp; Dim&nbsp; obj : Set obj = new ClassE&nbsp; '// defined by Library<BR/>\r
1304 &nbsp; Dim&nbsp; app : Set app = new ClassA&nbsp; '// defined by Application<BR/>\r
1305 <BR/>\r
1306 &nbsp; app.RespondFromClassE&nbsp; obj<BR/>\r
1307 &nbsp; obj.Run&nbsp; '// call ClassA::OnEventX<BR/>\r
1308 End Sub<BR/>\r
1309 <BR/>\r
1310 Class&nbsp; ClassA<BR/>\r
1311 &nbsp; Public Sub&nbsp; RespondFromClassE( Caller )<BR/>\r
1312 &nbsp; &nbsp; Caller.OnEventX.Add&nbsp; GetRef( "ClassA_onEventX" ), Me<BR/>\r
1313 &nbsp; End Sub<BR/>\r
1314 <BR/>\r
1315 &nbsp; Public Sub&nbsp; OnEventX( Caller, Args )<BR/>\r
1316 &nbsp; &nbsp; WScipt.Echo&nbsp; "Responded"<BR/>\r
1317 &nbsp; End Sub<BR/>\r
1318 End Class<BR/>\r
1319 <BR/>\r
1320 Sub&nbsp; ClassA_onEventX( Me_, Caller, Args ) : Me_.OnEventX( Caller, Args ) : End Sub</DIV>\r
1321 <DIV id="text183_18" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:11306px; line-height:15px; white-space:nowrap">\r
1322 <A name="vbsool_event_call">\r
1323 \8cÄ\82Ñ\8fo\82µ\81\83C\83x\83\93\83g\82ª\94­\90\82µ\82½\82ç\81A\93o\98^\82³\82ê\82Ä\82¢\82é\83\81\83\\83b\83h\82ð\8cÄ\82Ñ\8fo\82·</A></DIV>\r
1324 <v:rect style="position:absolute; margin-left:42px; margin-top:11380px; width:256px; height:115px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1325 <DIV id="text183_19" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:11386px; line-height:15px; white-space:nowrap">\r
1326 Class ClassE<BR/>\r
1327 &nbsp; Public&nbsp; OnEventX&nbsp; ' as EventResponders<BR/>\r
1328 <BR/>\r
1329 &nbsp; Public Sub&nbsp; Run()<BR/>\r
1330 &nbsp; &nbsp; Me.OnEventX.Calls&nbsp; Me, Empty<BR/>\r
1331 &nbsp; End Sub<BR/>\r
1332 End Class</DIV>\r
1333 <DIV id="text183_20" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:110px; margin-top:10523px; line-height:13px; white-space:nowrap">\r
1334 OnEventX</DIV>\r
1335 <DIV id="text183_21" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:62px; margin-top:11031px; line-height:13px; white-space:nowrap">\r
1336 app</DIV>\r
1337 <DIV id="text183_22" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:254px; margin-top:11121px; line-height:13px; white-space:nowrap">\r
1338 ClassA_onEventX</DIV>\r
1339 <DIV id="text183_23" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10279px; line-height:15px; white-space:nowrap">\r
1340 <A href="#vbsool_event_add">\r
1341 \81¨ \93o\98^\81\83R\81[\83\8b\83o\83b\83N\82³\82ê\82é\83\81\83\\83b\83h\82ð\81A\83\81\83\93\83o\81[\95Ï\90\94\82É\93o\98^\82·\82é</A></DIV>\r
1342 <DIV id="text183_24" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:200px; margin-top:11031px; line-height:13px; white-space:nowrap">\r
1343 obj</DIV>\r
1344 <DIV id="text183_25" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:158px; margin-top:11181px; line-height:13px; white-space:nowrap">\r
1345 Responded</DIV>\r
1346 <DIV id="text183_26" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:92px; margin-top:11447px; line-height:13px; white-space:nowrap">\r
1347 OnEventX</DIV>\r
1348 <DIV id="text183_27" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:116px; margin-top:10568px; line-height:13px; white-space:nowrap">\r
1349 OnEventX</DIV>\r
1350 <DIV id="text183_28" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10300px; line-height:15px; white-space:nowrap">\r
1351 <A href="#vbsool_event_call">\r
1352 \81¨ \8cÄ\82Ñ\8fo\82µ\81\83C\83x\83\93\83g\82ª\94­\90\82µ\82½\82ç\81A\93o\98^\82³\82ê\82Ä\82¢\82é\83\81\83\\83b\83h\82ð\8cÄ\82Ñ\8fo\82·</A></DIV>\r
1353 <DIV id="text183_29" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:50px; margin-top:11505px; line-height:15px; white-space:nowrap">\r
1354 \95¡\90\94\82Ì\83\81\83\\83b\83h\82ª\93o\98^\82³\82ê\82Ä\82¢\82é\82Æ\82«\82Í\81ACalls \83\81\83\\83b\83h\82ð\82P\93x\8cÄ\82Ñ\8fo\82·\82¾\82¯\82Å\81A\95¡\90\94\82Ì<BR/>\r
1355 \83\81\83\\83b\83h\82ª\8cÄ\82Ñ\8fo\82³\82ê\82Ü\82·\81B</DIV>\r
1356 <DIV id="text183_30" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11573px; line-height:15px; white-space:nowrap">\r
1357 <A href="vbs_memo_12.html#vbsool_event_consider">\r
1358 \81¨ \83C\83x\83\93\83g\89\9e\93\9a\82Ì\8eÀ\91\95\95û\96@\82Ì\8dl\8e@</A></DIV>\r
1359 <DIV id="text183_31" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:50px; margin-top:10321px; line-height:15px; white-space:nowrap">\r
1360 <A href="vbs_memo_12.html#EventResponders_ex">\r
1361 \81¨ EventResponders \82Ì\8eÀ\91\95\97á (vbslib \82È\82µ\94Å\81j</A></DIV>\r
1362 <DIV id="text183_32" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:61px; margin-top:11740px; line-height:15px; white-space:nowrap">\r
1363 \81¨ \83C\83x\83\93\83g\8aÖ\90\94\82Æ\83p\83\89\83\81\81[\83^\8eæ\93¾\8aÖ\90\94 \81iC\8c¾\8cê\81j</DIV>\r
1364 <DIV id="text183_33" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:134px; margin-top:11166px; line-height:13px; white-space:nowrap">\r
1365 OnEventX</DIV>\r
1366 <DIV id="text183_34" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11594px; line-height:15px; white-space:nowrap">\r
1367 <A href="http://www.atmarkit.co.jp/fdotnet/vb6tonet/vb6tonet25/vb6tonet25_02.html" target="_blank">\r
1368 \81¨ \81\97IT\81FVB.NET\83v\83\8d\83O\83\89\83~\83\93\83O\81@\91æ25\89ñ \83C\83x\83\93\83g\82Æ\83C\83x\83\93\83g\81E\83n\83\93\83h\83\89 (Web)</A></DIV>\r
1369 <DIV id="text183_35" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:11573px; line-height:15px; white-space:nowrap">\r
1370 \8eQ\8dl</DIV>\r
1371 <DIV id="text183_36" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11698px; line-height:15px; white-space:nowrap">\r
1372 <A href="..\vbslib.files\vbslib_28.html#CallForEach">\r
1373 \81¨ CallForEach (vbslib)</A></DIV>\r
1374 <DIV id="text183_37" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:219px; margin-top:11698px; line-height:15px; white-space:nowrap">\r
1375 \8aÖ\90\94\82ð\95¡\90\94\89ñ\8cÄ\82Ñ\8fo\82·</DIV>\r
1376 <DIV id="text183_38" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:61px; margin-top:11615px; line-height:15px; white-space:nowrap">\r
1377 \81¨ \83C\83x\83\93\83g(C#)</DIV>\r
1378 <DIV id="text183_39" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:11337px; line-height:15px; white-space:nowrap">\r
1379 \83C\83x\83\93\83g\82ª\94­\90\82µ\82½\83I\83u\83W\83F\83N\83g\82Ì\83\81\83\\83b\83h\82©\82ç\81A\83C\83x\83\93\83g\82É\89\9e\93\9a\82·\82é\83I\83u\83W\83F\83N\83g\82Ì\83\81\83\\83b\83h\82ð<BR/>\r
1380 \8cÄ\82Ñ\8fo\82·\83R\81[\83h\82ð\81A\92Ê\8fí\81A\83\89\83C\83u\83\89\83\8a\82ª\8f\91\82«\82Ü\82·\81B</DIV>\r
1381 <DIV id="text183_40" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10687px; line-height:15px; white-space:nowrap">\r
1382 \83C\83x\83\93\83g\82ª\94­\90\82µ\82½\82ç\83R\81[\83\8b\83o\83b\83N\82³\82ê\82é\83\81\83\\83b\83h\82ð\81A\83C\83x\83\93\83g\82ª\94­\90\82·\82é\83I\83u\83W\83F\83N\83g\82É\93o\98^<BR/>\r
1383 \82·\82é\83R\81[\83h\82ð\81A\92Ê\8fí\81A\83A\83v\83\8a\83P\81[\83V\83\87\83\93\82ª\8f\91\82«\82Ü\82·\81B</DIV>\r
1384 <DIV id="text183_41" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:30px; margin-top:10115px; line-height:15px; white-space:nowrap">\r
1385 \92Ê\8fí\81A\83\89\83C\83u\83\89\83\8a\82É\82 \82é\83N\83\89\83X\82ª\81A\83C\83x\83\93\83g\82Ì\92è\8b`\82Æ\83\81\83\\83b\83h\82Ì\8cÄ\82Ñ\8fo\82µ\82ð\8ds\82¢\81A\83A\83v\83\8a\83P\81[\83V\83\87\83\93<BR/>\r
1386 \82ª\81A\83C\83x\83\93\83g\82É\89\9e\93\9a\82·\82é\83\81\83\\83b\83h\82Ì\92è\8b`\82Æ\81A\82»\82Ì\83\81\83\\83b\83h\82Ì\93o\98^\82ð\8ds\82¢\82Ü\82·\81B</DIV>\r
1387 <DIV id="text183_42" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10474px; line-height:15px; white-space:nowrap">\r
1388 \92Ê\8fí\81A\83\89\83C\83u\83\89\83\8a\82É\82 \82é\83N\83\89\83X\82ª\81A\83C\83x\83\93\83g\82ð\92è\8b`\82µ\82Ü\82·\81B</DIV>\r
1389 <DIV id="text183_43" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:317px; margin-top:10170px; line-height:15px; white-space:nowrap">\r
1390 \83\89\83C\83u\83\89\83\8a\82Ì\92\86 \81i\83C\83x\83\93\83g\94­\90\8c³\81j</DIV>\r
1391 <DIV id="text183_44" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:425px; margin-top:10230px; line-height:15px; white-space:nowrap">\r
1392 \83A\83v\83\8a\83P\81[\83V\83\87\83\93</DIV>\r
1393 <DIV id="text183_45" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:59px; margin-top:10217px; line-height:15px; white-space:nowrap">\r
1394 \8cÄ\82Ñ\8fo\82µ</DIV>\r
1395 <DIV id="text183_46" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10944px; line-height:15px; white-space:nowrap">\r
1396 \83A\83v\83\8a\83P\81[\83V\83\87\83\93\82ª\92è\8b`\82·\82é ClassA \83N\83\89\83X\82ª\89\9e\93\9a\82·\82é\8fê\8d\87\81F</DIV>\r
1397 <DIV id="text183_47" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:42px; margin-top:10737px; line-height:15px; white-space:nowrap">\r
1398 \83A\83v\83\8a\83P\81[\83V\83\87\83\93\82ª\92è\8b`\82·\82é OnEventX \8aÖ\90\94\82ª\89\9e\93\9a\82·\82é\8fê\8d\87\81F</DIV>\r
1399 <v:rect style="position:absolute; margin-left:41px; margin-top:10757px; width:298px; height:160px;" fillcolor="#E7E7E7" strokecolor="#000000" strokeweight="1pt"/>\r
1400 <DIV id="text183_48" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#000000; margin-left:49px; margin-top:10763px; line-height:15px; white-space:nowrap">\r
1401 Sub&nbsp; main()<BR/>\r
1402 &nbsp; Dim&nbsp; obj : Set obj = new ClassE<BR/>\r
1403 <BR/>\r
1404 &nbsp; obj.OnEventX.Add&nbsp; GetRef( "OnEventX" ), Empty<BR/>\r
1405 &nbsp; obj.Run&nbsp; '// call OnEventX<BR/>\r
1406 End Sub<BR/>\r
1407 <BR/>\r
1408 Sub&nbsp; OnEventX( Dummy, Caller, Args )<BR/>\r
1409 &nbsp; WScipt.Echo&nbsp; "Responded"<BR/>\r
1410 End Sub</DIV>\r
1411 <DIV id="text183_49" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:145px; margin-top:10884px; line-height:13px; white-space:nowrap">\r
1412 Responded</DIV>\r
1413 <DIV id="text183_50" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:223px; margin-top:10809px; line-height:13px; white-space:nowrap">\r
1414 OnEventX</DIV>\r
1415 <DIV id="text183_51" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:79px; margin-top:10869px; line-height:13px; white-space:nowrap">\r
1416 OnEventX</DIV>\r
1417 <DIV id="text183_52" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:116px; margin-top:11121px; line-height:13px; white-space:nowrap">\r
1418 OnEventX</DIV>\r
1419 <DIV id="text183_53" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#FF0000; margin-left:85px; margin-top:10809px; line-height:13px; white-space:nowrap">\r
1420 OnEventX</DIV>\r
1421 <DIV id="text183_54" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:139px; margin-top:10809px; line-height:13px; white-space:nowrap">\r
1422 <A href="vbs_memo_12.html#EventResponders_Add">\r
1423 Add</A></DIV>\r
1424 <DIV id="text183_55" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:200px; margin-top:10523px; line-height:13px; white-space:nowrap">\r
1425 <A href="vbs_memo_12.html#EventResponders_ex">\r
1426 EventResponders</A></DIV>\r
1427 <DIV id="text183_56" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:170px; margin-top:11121px; line-height:13px; white-space:nowrap">\r
1428 <A href="vbs_memo_12.html#EventResponders_Add">\r
1429 Add</A></DIV>\r
1430 <DIV id="text183_57" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:146px; margin-top:11447px; line-height:13px; white-space:nowrap">\r
1431 <A href="vbs_memo_12.html#EventResponders_Calls">\r
1432 Calls</A></DIV>\r
1433 <DIV id="text183_58" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:101px; margin-top:10356px; line-height:15px; white-space:nowrap">\r
1434 \81¨ T_Item \83t\83H\83\8b\83_</DIV>\r
1435 <DIV id="text183_59" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:31px; margin-top:10356px; line-height:15px; white-space:nowrap">\r
1436 \83T\83\93\83v\83\8b\81F</DIV>\r
1437 <DIV id="text183_60" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:269px; margin-top:10356px; line-height:15px; white-space:nowrap">\r
1438 vbslib \82È\82µ\94Å</DIV>\r
1439 <DIV id="text183_61" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:101px; margin-top:10376px; line-height:15px; white-space:nowrap">\r
1440 \81¨ T_Item_vbslib \83t\83H\83\8b\83_</DIV>\r
1441 <DIV id="text183_62" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#000000; margin-left:269px; margin-top:10376px; line-height:15px; white-space:nowrap">\r
1442 vbslib \8eg\97p\94Å</DIV>\r
1443 <v:roundrect style="position:absolute; margin-left:376px; margin-top:10368px; width:67px; height:20px;" arcsize="0.500000" fillcolor="#FFFFFF" strokecolor="#000000" strokeweight="1pt"/>\r
1444 <DIV id="text183_63" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#FF0000; font-weight: bold; margin-left:384px; margin-top:10371px; line-height:15px; white-space:nowrap">\r
1445 \8f\91\82«\82©\82¯</DIV>\r
1446 <DIV id="text183_64" style="position:absolute; font-family: '\82l\82\83S\83V\83b\83N'; font-size:9pt; color:#0000FF; margin-left:110px; margin-top:11402px; line-height:13px; white-space:nowrap">\r
1447 <A href="#vbsool_event_declare">\r
1448 OnEventX</A></DIV>\r
1449 <DIV id="text183_65" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:326px; margin-top:10321px; line-height:15px; white-space:nowrap">\r
1450 <A href="..\vbslib.files\vbslib_13.html#EventResponders">\r
1451 \81¨ \81ivbslib \8eg\97p\94Å\81j</A></DIV>\r
1452 <DIV id="text183_66" style="position:absolute; font-family: '\82l\82\82o\83S\83V\83b\83N'; font-size:10pt; color:#0000FF; margin-left:61px; margin-top:11636px; line-height:15px; white-space:nowrap">\r
1453 <A href="http://d.hatena.ne.jp/m-hiyama/20071205/1196838087" target="_blank">\r
1454 \81¨ \83C\83x\83\93\83g\83\82\83f\83\8b\82Ì\8aT\94O\82Æ\97p\8cê\96@\82ª\8d¬\97\90\82µ\82Ä\82¢\82é\82Ì\82Å\81A\83C\83\89\83C\83\89\83C\82·\82é\82ñ\82Å\82·\82ª (Web)</A></DIV>\r
1455 \r
1456 <v:line from="0,9968" to="585,9968"/>\r
1457 <v:line from="585,9968" to="585,11791"/>\r
1458 <v:line from="585,11791" to="0,11791"/>\r
1459 <v:line from="0,11791" to="0,9968"/>\r
1460 \r
1461 <DIV style="position:absolute; margin-left:0px; margin-top:11791px;">\r
1462 <A id="svgcats_vml_p183" class="to_tree" onClick="selectTreeElem( '183' );">\81©</A></DIV>\r
1463 <DIV style="position:absolute; margin-left:20px; margin-top:11791px;">\r
1464 <A id="page_group_bottom" href="vbs_memo_12.html#page_group_top" style="text-decoration:none;">\81«</A></DIV>\r
1465 </PAGE>\r
1466  \r
1467 </PAGESET>\r
1468 \r
1469 <TABLE height="100%" style="position:absolute; margin-top:-9999px"><TR><TD></TD></TR></TABLE>\r
1470 \r
1471 </BODY>\r
1472 </HTML> \r
1473  \r