1 <?xml version="1.0" encoding="Shift_JIS"?>
\r
2 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
\r
3 "http://www.w3.org/TR/html4/strict.dtd">
\r
4 <!-- saved from url=(0014)about:internet --> <!-- for too much local security warning -->
\r
5 <HTML lang="ja" xmlns:v="urn:schemas-microsoft-com:vml">
\r
8 <META http-equiv="Content-Type" content="text/html; charset=shift_jis"/>
\r
9 <TITLE>VBS
\83\81\83\82</TITLE>
\r
11 <STYLE type="text/css">
\r
12 v\:line, v\:rect, v\:fill, v\:image, v\:stroke, v\:roundrect, v\:oval, v\:shape, v\:path, v\:textpath
\r
13 { behavior: url(#default#VML); }
\r
14 A { text-decoration:none; }
\r
15 A.to_tree { color:#CCDDCC; position:absolute; margin-left:0px; font-size:8pt; }
\r
16 A.to_next_page { position:absolute; margin-left:40px; font-size:8pt; }
\r
17 A.to_prev_page { position:absolute; margin-left:58px; font-size:8pt; }
\r
18 A:visited { color:blue }
\r
19 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->
\r
20 DIV.tooltip { color:blue; }
\r
21 DIV.tooltip textarea { display:none; margin-top:-5px; overflow:hidden; }
\r
22 <!-- end of [PATCH_OF:urlrep_tooltip] -->
\r
25 <SCRIPT type="text/javascript">
\r
32 if ( !document.getElementsByTagName ) return;
\r
34 divs = document.getElementsByTagName( "A" );
\r
35 for ( i = 0; i < divs.length; i++ ) {
\r
36 if ( divs[i].className == "to_tree" ) {
\r
37 divs[i].style.color = "blue";
\r
38 divs[i].style.cursor = "hand";
\r
43 function selectTreeElem( num )
\r
45 var tree_url, i1, i2, fname, fname2
\r
47 if ( parent.frames.length == 0 ) {
\r
48 location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +
\r
49 "&f2=vbs_memo.files/vbs_memo_11.html&sub2=svgcats_vml_p" + num;
\r
52 tree_url = parent.tree.location.href;
\r
53 i1 = tree_url.lastIndexOf( "/" );
\r
54 i2 = tree_url.lastIndexOf( "\\" );
\r
55 if ( i2 > i1 ) i1 = i2;
\r
56 fname = tree_url.substring( i1 + 1 );
\r
57 i1 = fname.lastIndexOf( "#" );
\r
58 if ( i1 >= 0 ) fname = fname.substring( 0, i1 );
\r
59 fname2 = "vbs_memo.files/vbs_memo_tree.html";
\r
60 i1 = fname2.lastIndexOf( "/" );
\r
61 i2 = fname2.lastIndexOf( "\\" );
\r
62 if ( i2 > i1 ) i1 = i2;
\r
63 fname2 = fname2.substring( i1 + 1 );
\r
64 if ( fname == fname2 )
\r
65 parent.tree.selectTreeElem( "svgcats_index_p" + num );
\r
67 location.href = "../vbs_memo.html?f1=vbs_memo.files/vbs_memo_tree.html&sub1=svgcats_index_p" + num +
\r
68 "&f2=vbs_memo.files/vbs_memo_11.html&sub2=svgcats_vml_p" + num;
\r
72 <!-- start of insert [PATCH_OF:urlrep_tooltip] -->
\r
73 function over( text, value, cols ){ text.style.display = "inline";
\r
74 text.cols=cols; text.rows=1; text.value=value; text.focus(); text.select(); }
\r
75 function out( text ){ text.style.display = "none"; }
\r
76 <!-- end of [PATCH_OF:urlrep_tooltip] -->
\r
82 <BODY bgcolor="#CCDDCC" onLoad="onLoad();">
\r
84 <DIV style="position:absolute; margin-left:0px; margin-top:8px; color:red; font-size:8pt;">
\r
85 (for Internet Explorer)</DIV>
\r
86 <v:rect style="position:absolute; margin-left:0px; margin-top:8px; width:130px; height:16px;" fillcolor="white" strokecolor="white"/>
\r
92 <A id="svgcats_vml_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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#008000; font-weight: bold; margin-left:24px; margin-top:17px; line-height:15px; white-space:nowrap">
\r
99 <A name="get_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
\82r
\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\81j
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:37px; margin-top:56px; line-height:13px; white-space:nowrap">
\r
114 Sub get_StaticObjects( InterfaceName as string, out_Objs as variant )</DIV>
\r
115 <DIV id="text172_5" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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\81j
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:97px; margin-top:132px; line-height:15px; white-space:nowrap">
\r
125 <DIV id="text172_10" style="position:absolute; font-family: '
\82l
\82r
\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Í
\81j
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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·
\81B
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:77px; margin-top:314px; line-height:15px; white-space:nowrap">
\r
161 Sub get_StaticObjects( InterfaceName, out_Obj )<BR/>
\r
162 If IsEmpty( InterfaceName ) or InterfaceName = "ClassI" Then<BR/>
\r
163 Set out_Obj = get_ClassA()<BR/>
\r
164 ElseIf InterfaceName = "ClassI2" Then<BR/>
\r
165 out_Obj = Array( get_ClassA(), get_ClassB() )<BR/>
\r
168 <DIV id="text172_25" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:127px; margin-top:552px; line-height:13px; white-space:nowrap">
\r
172 <DIV id="text172_27" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
177 <DIV id="text172_29" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:1287px; line-height:15px; white-space:nowrap">
\r
209 Class ClassA<BR/>
\r
210 Public c<BR/>
\r
211 Private Sub Class_Initialize()<BR/>
\r
212 Set Me.c = get_ClassAConsts()<BR/>
\r
213 End Sub<BR/>
\r
217 '*************************************************************************<BR/>
\r
218 ' <<< [get_ClassAConsts] >>><BR/>
\r
219 '*************************************************************************<BR/>
\r
220 Dim g_ClassAConsts<BR/>
\r
222 Function get_ClassAConsts()<BR/>
\r
223 If IsEmpty( g_ClassAConsts ) Then _<BR/>
\r
224 Set g_ClassAConsts = new ClassAConsts<BR/>
\r
225 Set get_ClassAConsts = g_ClassAConsts<BR/>
\r
229 Class ClassAConsts<BR/>
\r
230 Public CutTag, ExistOnly<BR/>
\r
232 Private Sub Class_Initialize()<BR/>
\r
233 CutTag = 1<BR/>
\r
234 ExistOnly = 2<BR/>
\r
235 End Sub<BR/>
\r
237 Public Function ToStr( Number )<BR/>
\r
238 Select Case Number<BR/>
\r
239 Case CutTag : ToStr = "CutTag"<BR/>
\r
240 Case ExistOnly : ToStr = "ExistOnly"<BR/>
\r
241 End Select<BR/>
\r
242 End Function<BR/>
\r
244 <DIV id="text173_4" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:1059px; line-height:15px; white-space:nowrap">
\r
250 Dim c : Set c = get_ClassAConsts()<BR/>
\r
252 copy_ex src, dst, c.CutTag</DIV>
\r
253 <DIV id="text173_7" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:179px; margin-top:1090px; line-height:13px; white-space:nowrap">
\r
255 <DIV id="text173_8" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:125px; margin-top:1603px; line-height:13px; white-space:nowrap">
\r
259 <DIV id="text173_10" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:101px; margin-top:1648px; line-height:13px; white-space:nowrap">
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:53px; margin-top:1165px; line-height:15px; white-space:nowrap">
\r
268 Sub main()<BR/>
\r
269 Dim obj : Set obj = new ClassA<BR/>
\r
270 copy_ex src, dst, obj.c.CutTag<BR/>
\r
272 <DIV id="text173_14" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:179px; margin-top:1196px; line-height:13px; white-space:nowrap">
\r
274 <DIV id="text173_15" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
282 <DIV id="text173_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:26px; margin-top:992px; line-height:15px; white-space:nowrap">
\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
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
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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:64px; margin-top:2276px; line-height:15px; white-space:nowrap">
\r
308 Sub FuncA()<BR/>
\r
309 Dim m : Set m = get_ClassA() : m.Validate Empty <BR/>
\r
310 m.MethodA<BR/>
\r
312 <DIV id="text174_4" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:64px; margin-top:2154px; line-height:13px; white-space:nowrap">
\r
323 Dim g_obj as ClassI</DIV>
\r
324 <DIV id="text174_7" style="position:absolute; font-family: '
\82l
\82r
\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
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
338 <DIV id="text174_9" style="position:absolute; font-family: '
\82l
\82r
\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
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
\82r
\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
\82r
\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
351 <DIV id="text174_13" style="position:absolute; font-family: '
\82l
\82r
\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
354 <DIV id="text174_14" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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·
\81B
\82³
\82ç
\82É ClassV
\82Í
\81A
\83C
\83\93\83X
\83^
\83\93\83X
\82Ì
\83N
\83\89\83X(ClassA)
\82Æ
\88Ù
\82È
\82é
\82±
\82Æ
\82à
\82 \82è
\82Ü
\82·
\81B<BR/>
\r
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
\82r
\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·
\81B
\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
\82r
\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
\82r
\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
\82r
\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
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
\82r
\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
376 <DIV id="text174_21" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
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
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
\82r
\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
\82r
\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·
\81B
\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
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
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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:62px; margin-top:3206px; line-height:15px; white-space:nowrap">
\r
417 Dim o : Set o = new MakeVS<BR/>
\r
418 o.SetMakeProjContext MakeProjContext, get_MakeVSProjType( TypeName )<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
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
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
443 \81@
\81@ret.ProjectExtension = ".vcproj"<BR/>
\r
446 <DIV id="text175_4" style="position:absolute; font-family: '
\82l
\82r
\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
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
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¤
\81B
\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¤
\81B
\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
\82r
\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 <= 2008 Then f.Open ".vcproj" Else f.Open ".vcxproj"<BR/>
\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
\82r
\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 ".sln"<BR/>
\r
467 \81@If VSVer <= 2008 Then f.Write ".vcproj" Else f.Write ".vcxproj"</DIV>
\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
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
\82r
\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
484 <DIV id="text176_2" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:55px; margin-top:3901px; line-height:15px; white-space:nowrap">
\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
\82r
\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
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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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 Name() as string</DIV>
\r
519 <DIV id="text176_16" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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·
\81B
\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
\82r
\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 TrueName() as string</DIV>
\r
526 <DIV id="text176_19" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
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
\82r
\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
552 <DIV id="text177_2" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
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
\82r
\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¤
\81B
\82»
\82±
\82Å
\81A</DIV>
\r
561 <DIV id="text177_5" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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·
\81B
\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·
\81B
\88ê
\94Ê
\96¼
\82Æ
\90³
\8e®
\96¼
\82ª
\81A
\93¯
\82¶
\82É
\82È
\82é
\82±
\82Æ
\82à
\82 \82è
\82Ü
\82·
\81B<BR/>
\r
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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:111px; margin-top:4704px; line-height:13px; white-space:nowrap">
\r
582 <DIV id="text177_12" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:4854px; line-height:15px; white-space:nowrap">
\r
591 '// Class Sample has_interface_of ClassI<BR/>
\r
593 Function get_Sample()<BR/>
\r
594 Set get_Sample = get_Object( Sample_getTrueName() )<BR/>
\r
595 get_Sample.Name = "Sample"<BR/>
\r
598 Function Sample_getTrueName()<BR/>
\r
599 Dim ret : ret = GetVar( "Sample" )<BR/>
\r
600 If IsEmpty( ret ) Then<BR/>
\r
601 '// default is ClassA fixed<BR/>
\r
602 ret = "TrueSample" : SetVar "Sample", ret<BR/>
\r
604 Sample_getTrueName = ret<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
\82r
\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
611 <DIV id="text177_17" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:80px; margin-top:4758px; line-height:13px; white-space:nowrap">
\r
620 <DIV id="text177_21" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:5257px; line-height:15px; white-space:nowrap">
\r
628 '// Class TrueSample has_interface_of ClassI<BR/>
\r
630 Dim g_TrueSample<BR/>
\r
632 Function get_TrueSample() '// has_interface_of ClassI<BR/>
\r
633 If IsEmpty( g_TrueSample ) Then _<BR/>
\r
634 Set g_TrueSample = new TrueSample<BR/>
\r
635 Set get_TrueSample = g_TrueSample<BR/>
\r
638 Class TrueSample<BR/>
\r
639 Public Name<BR/>
\r
640 Public Property Get TrueName() : TrueName = TypeName(Me) : End Property<BR/>
\r
641 '--- Name is factory pattern.<BR/>
\r
642 Private Sub Class_Initialize() : Name = TypeName(Me) : End Sub<BR/>
\r
643 :<BR/>
\r
645 <DIV id="text177_24" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:179px; margin-top:4596px; line-height:13px; white-space:nowrap">
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:260px; margin-top:4627px; line-height:15px; white-space:nowrap">
\r
657 <DIV id="text177_29" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:179px; margin-top:4630px; line-height:13px; white-space:nowrap">
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:260px; margin-top:4593px; line-height:15px; white-space:nowrap">
\r
662 <DIV id="text177_31" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:215px; margin-top:4740px; line-height:13px; white-space:nowrap">
\r
692 <DIV id="text177_42" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:135px; margin-top:4722px; line-height:13px; white-space:nowrap">
\r
694 <DIV id="text177_43" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0080; margin-left:203px; margin-top:4776px; line-height:13px; white-space:nowrap">
\r
696 <DIV id="text177_44" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0080; margin-left:224px; margin-top:4791px; line-height:13px; white-space:nowrap">
\r
698 <DIV id="text177_45" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:7482px; line-height:15px; white-space:nowrap">
\r
723 Dim g_NameDic : Set g_NameDic = CreateObject( "Scripting.Dictionary" )<BR/>
\r
725 Function get_NameDelegator( Name, TrueName, InterfaceName )<BR/>
\r
726 If g_NameDic.Exists( Name +"__"+ TrueName ) Then<BR/>
\r
727 Set get_NameDelegator = g_NameDic.Item( Name +"__"+ TrueName +"_"+ InterfaceName )<BR/>
\r
728 Exit Function<BR/>
\r
731 Set get_NameDelegator = new_X( InterfaceName + "_Delegator" ) : With get_NameDelegator<BR/>
\r
732 .Name = Name<BR/>
\r
733 .m_Delegate = TrueName '// if validated was need.<BR/>
\r
734 If not g_bNeedValidateDelegate Then _<BR/>
\r
735 Set .m_Delegate = get_Object( TrueName ) '// if validated was not need.<BR/>
\r
736 End With<BR/>
\r
738 Set g_NameDic.Item( Name +"__"+ TrueName +"_"+ InterfaceName ) = get_NameDelegator<BR/>
\r
742 Class NameDelegator '// defined_as_interface<BR/>
\r
743 Public Name<BR/>
\r
744 Public Property Get TrueName() : TrueName = NameDelegator_getTrueName( Me ) : End Property<BR/>
\r
745 Public m_Delegate ' as ClassA or ClassB or string(before validated)<BR/>
\r
746 Public Property Get DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property<BR/>
\r
748 <DIV id="text178_2" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:6586px; line-height:15px; white-space:nowrap">
\r
757 '// Class Sample has_interface_of ClassI<BR/>
\r
759 Function get_Sample()<BR/>
\r
760 Set get_Sample = get_NameDelegator( "Sample", Sample_getTrueName(), "ClassI" )<BR/>
\r
763 Function Sample_getTrueName()<BR/>
\r
764 Dim ret : ret = GetVar( "Sample" )<BR/>
\r
765 If IsEmpty( ret ) Then<BR/>
\r
766 '// default is ClassA fixed<BR/>
\r
767 ret = "TrueSample" : SetVar "Sample", ret<BR/>
\r
769 Sample_getTrueName = ret<BR/>
\r
771 <DIV id="text178_5" style="position:absolute; font-family: '
\82l
\82r
\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
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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:57px; margin-top:6857px; line-height:15px; white-space:nowrap">
\r
776 '// Class ClassA has_interface_of ClassI<BR/>
\r
778 Dim g_TrueSample<BR/>
\r
780 Function get_TrueSample()<BR/>
\r
781 If IsEmpty( g_TrueSample ) Then _<BR/>
\r
782 Set g_TrueSample = new TrueSample<BR/>
\r
783 Set get_TrueSample = g_TrueSample<BR/>
\r
787 Class TrueSample<BR/>
\r
788 Public Property Get Name() : Name = TypeName(Me) : End Property<BR/>
\r
789 Public Property Get TrueName() : TrueName = TypeName(Me) : End Property<BR/>
\r
790 '--- Name is factory pattern.<BR/>
\r
792 Public Value<BR/>
\r
793 Public Function Method1() : Method1 = "TrueSample.Method1" : End Function<BR/>
\r
795 <DIV id="text178_7" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:41px; margin-top:6561px; line-height:15px; white-space:nowrap">
\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
\82r
\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
\82r
\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
\82r
\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·
\81B
\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
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
\82r
\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
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
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
\82r
\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
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·
\81B
\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
\82r
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#000000; margin-left:172px; margin-top:5673px; line-height:15px; white-space:nowrap">
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
855 \81i
\90³
\8e®
\96¼
\81j</DIV>
\r
856 <DIV id="text178_27" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
864 Sample_getTrueName</A></DIV>
\r
865 <DIV id="text178_30" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:104px; margin-top:6293px; line-height:13px; white-space:nowrap">
\r
872 <DIV id="text178_33" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:152px; margin-top:6311px; line-height:13px; white-space:nowrap">
\r
899 <DIV id="text178_45" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF8000; margin-left:216px; margin-top:6331px; line-height:13px; white-space:nowrap">
\r
901 <DIV id="text178_46" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0080; margin-left:233px; margin-top:6489px; line-height:13px; white-space:nowrap">
\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
\82r
\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
\82r
\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
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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:148px; margin-top:6147px; line-height:13px; white-space:nowrap">
\r
918 <DIV id="text178_54" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:49px; margin-top:6147px; line-height:13px; white-space:nowrap">
\r
920 <DIV id="text178_55" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:175px; margin-top:6185px; line-height:13px; white-space:nowrap">
\r
925 <DIV id="text178_57" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:175px; margin-top:6166px; line-height:13px; white-space:nowrap">
\r
927 <DIV id="text178_58" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:66px; margin-top:6166px; line-height:13px; white-space:nowrap">
\r
929 <DIV id="text178_59" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:196px; margin-top:6204px; line-height:13px; white-space:nowrap">
\r
933 <DIV id="text178_61" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:196px; margin-top:6220px; line-height:13px; white-space:nowrap">
\r
935 <DIV id="text178_62" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:84px; margin-top:6204px; line-height:13px; white-space:nowrap">
\r
937 <DIV id="text178_63" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:235px; margin-top:6204px; line-height:13px; white-space:nowrap">
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:330px; margin-top:6199px; line-height:13px; white-space:nowrap">
\r
946 <DIV id="text178_67" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
951 <DIV id="text178_69" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:112px; margin-top:6391px; line-height:13px; white-space:nowrap">
\r
956 <DIV id="text178_71" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:8pt; color:#000000; margin-left:201px; margin-top:5737px; line-height:12px; white-space:nowrap">
\r
962 <DIV id="text178_74" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:112px; margin-top:6452px; line-height:15px; white-space:nowrap">
\r
964 Set .m_Delegate = get_Object( TrueName )</DIV>
\r
965 <DIV id="text178_75" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#808080; margin-left:57px; margin-top:7828px; line-height:13px; white-space:nowrap">
\r
966 Public Property Get DefineInfo() : Set DefineInfo = m_Delegate.DefineInfo : End Property</DIV>
\r
967 <DIV id="text178_76" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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 '// has_interface_of NameDelegator and ClassI<BR/>
\r
981 Public Name<BR/>
\r
982 Public Property Get TrueName() : TrueName = NameDelegator_getTrueName( Me ) : End Property<BR/>
\r
983 Public m_Delegate ' as ClassA or ClassB or string(before validated)<BR/>
\r
984 '--- Name is factory pattern.<BR/>
\r
986 Public Property Let Value( v ) : m_Delegate.Value = v : End Property<BR/>
\r
987 Public Property Get Value( ) : Value = m_Delegate.Value : End Property<BR/>
\r
988 Public Function Method1() : Method1 = m_Delegate.Method1() : End Function<BR/>
\r
992 Function new_ClassI_Delegator() '// has_interface_of NameDelegator and ClassI<BR/>
\r
993 Set new_ClassI_Delegator = new ClassI_Delegator<BR/>
\r
995 <DIV id="text178_81" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
1021 <!-- page 179 -->
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:8173px; line-height:13px; white-space:nowrap">
\r
1035 Sub ClassI::Validate( Opt as variant )</DIV>
\r
1036 <DIV id="text179_4" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:56px; margin-top:8057px; line-height:15px; white-space:nowrap">
\r
1046 Dim samples, sample<BR/>
\r
1047 get_ObjectsFromFile "Lib\*_obj.vbs", "ClassI", samples '// [out] samples<BR/>
\r
1048 For Each sample In samples : echo sample.Name : Next</DIV>
\r
1049 <DIV id="text179_8" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
1066 <!-- page 180 -->
\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
\82r
\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
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
\82r
\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 Item( Name as string ) as variant</DIV>
\r
1078 <DIV id="text180_3" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
1085 <DIV id="text180_6" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:74px; margin-top:9199px; line-height:15px; white-space:nowrap">
\r
1090 \81¨ Items
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1091 <DIV id="text180_8" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:8629px; line-height:15px; white-space:nowrap">
\r
1100 Dim obj : Set obj = new ClassA<BR/>
\r
1101 obj.PropA = 1 '// Static defined property<BR/>
\r
1102 obj("PropB") = 12 '// Dynamic defined property<BR/>
\r
1103 obj("PropC") = "ABC"<BR/>
\r
1104 Set obj("PropD") = new ClassA<BR/>
\r
1106 WScript.Echo "PropA = "& obj.PropA<BR/>
\r
1107 WScript.Echo "PropB = "& obj("PropB")<BR/>
\r
1108 WScript.Echo "PropC = "& obj("PropC").Value</DIV>
\r
1109 <DIV id="text180_12" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:8820px; line-height:15px; white-space:nowrap">
\r
1114 Public PropA '// Static defined property<BR/>
\r
1116 '//=== Dynamic defined property : Item, Items, Keys<BR/>
\r
1117 Public Default Property Get Item( Name ) : LetSet Item, m_Dic( Name ) : End Property<BR/>
\r
1118 Public Property Let Item( Name, Value ) : m_Dic( Name ) = Value : End Property<BR/>
\r
1119 Public Property Set Item( Name, Object ) : Set m_Dic( Name ) = Object : End Property<BR/>
\r
1121 Public Property Get Keys() : Keys = m_Dic.Keys : End Property<BR/>
\r
1122 Public Property Get Items() : Items = m_Dic.Items : End Property<BR/>
\r
1124 Public m_Dic ' as Dictionary<BR/>
\r
1125 Private Sub Class_Initialize()<BR/>
\r
1126 Set m_Dic = CreateObject( "Scripting.Dictionary" )<BR/>
\r
1127 m_Dic.CompareMode = 1 '// NotCaseSensitive<BR/>
\r
1128 End Sub<BR/>
\r
1132 Sub LetSet( Out, In_ )<BR/>
\r
1133 If IsObject( In_ ) Then Set Out = In_ Else Out = In_<BR/>
\r
1135 <DIV id="text180_14" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
1142 <DIV id="text180_17" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:204px; margin-top:9199px; line-height:15px; white-space:nowrap">
\r
1144 \81¨ Keys
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1145 <DIV id="text180_18" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
1162 <!-- page 181 -->
\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
\82r
\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
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
\82r
\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 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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9419px; line-height:15px; white-space:nowrap">
\r
1176 For Each item In obj.Items<BR/>
\r
1177 If IsObject( item ) Then<BR/>
\r
1178 WScript.Echo item.Value<BR/>
\r
1179 Else<BR/>
\r
1180 WScript.Echo item<BR/>
\r
1181 End If<BR/>
\r
1183 <DIV id="text181_4" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:97px; margin-top:9358px; line-height:15px; white-space:nowrap">
\r
1187 \81¨ Item
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1188 <DIV id="text181_6" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9576px; line-height:13px; white-space:nowrap">
\r
1194 For Each item In obj.m_Dic.Items</DIV>
\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
1203 <!-- page 182 -->
\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
\82r
\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
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
\82r
\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 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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9798px; line-height:15px; white-space:nowrap">
\r
1217 For Each name In obj.Keys<BR/>
\r
1218 WScript.Echo name<BR/>
\r
1220 <DIV id="text182_4" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#0000FF; margin-left:97px; margin-top:9737px; line-height:15px; white-space:nowrap">
\r
1224 \81¨ Item
\83v
\83\8d\83p
\83e
\83B</A></DIV>
\r
1225 <DIV id="text182_6" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:54px; margin-top:9902px; line-height:13px; white-space:nowrap">
\r
1231 For Each item In obj.m_Dic.Keys</DIV>
\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
1240 <!-- page 183 -->
\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
\82r
\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
\82r
\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
\82r
\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
1254 <DIV id="text183_4" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10172px; line-height:13px; white-space:nowrap">
\r
1264 Dim ClassE::OnEventX as EventResponders</DIV>
\r
1265 <DIV id="text183_8" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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`
\81F
\83C
\83x
\83\93\83g
\82²
\82Æ
\82É
\81A
\83\81\83\
\83b
\83h
\82ð
\93o
\98^
\82Å
\82«
\82é
\83\81\83\93\83o
\81[
\95Ï
\90\94\82ð
\90é
\8c¾
\82·
\82é</A></DIV>
\r
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
\82r
\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
\82r
\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`
\81F
\83C
\83x
\83\93\83g
\82²
\82Æ
\82É
\81A
\83\81\83\
\83b
\83h
\82ð
\93o
\98^
\82Å
\82«
\82é
\83\81\83\93\83o
\81[
\95Ï
\90\94\82ð
\90é
\8c¾
\82·
\82é</A></DIV>
\r
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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10507px; line-height:15px; white-space:nowrap">
\r
1282 Class ClassE<BR/>
\r
1283 Public OnEventX ' as EventResponders<BR/>
\r
1285 Private Sub Class_Initialize()<BR/>
\r
1286 Set Me.OnEventX = new EventResponders<BR/>
\r
1287 End Sub<BR/>
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:141px; margin-top:10209px; line-height:13px; white-space:nowrap">
\r
1291 Sub 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
\82r
\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^
\81F
\83R
\81[
\83\8b\83o
\83b
\83N
\82³
\82ê
\82é
\83\81\83\
\83b
\83h
\82ð
\81A
\83\81\83\93\83o
\81[
\95Ï
\90\94\82É
\93o
\98^
\82·
\82é</A></DIV>
\r
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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:10970px; line-height:15px; white-space:nowrap">
\r
1302 Sub main()<BR/>
\r
1303 Dim obj : Set obj = new ClassE '// defined by Library<BR/>
\r
1304 Dim app : Set app = new ClassA '// defined by Application<BR/>
\r
1306 app.RespondFromClassE obj<BR/>
\r
1307 obj.Run '// call ClassA::OnEventX<BR/>
\r
1310 Class ClassA<BR/>
\r
1311 Public Sub RespondFromClassE( Caller )<BR/>
\r
1312 Caller.OnEventX.Add GetRef( "ClassA_onEventX" ), Me<BR/>
\r
1313 End Sub<BR/>
\r
1315 Public Sub OnEventX( Caller, Args )<BR/>
\r
1316 WScipt.Echo "Responded"<BR/>
\r
1317 End Sub<BR/>
\r
1320 Sub ClassA_onEventX( Me_, Caller, Args ) : Me_.OnEventX( Caller, Args ) : End Sub</DIV>
\r
1321 <DIV id="text183_18" style="position:absolute; font-family: '
\82l
\82r
\82o
\83S
\83V
\83b
\83N'; font-size:10pt; color:#408080; font-weight: bold; margin-left:24px; margin-top:11306px; line-height:15px; white-space:nowrap">
\r
1322 <A name="vbsool_event_call">
\r
1323 \8cÄ
\82Ñ
\8fo
\82µ
\81F
\83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\82ç
\81A
\93o
\98^
\82³
\82ê
\82Ä
\82¢
\82é
\83\81\83\
\83b
\83h
\82ð
\8cÄ
\82Ñ
\8fo
\82·</A></DIV>
\r
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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:50px; margin-top:11386px; line-height:15px; white-space:nowrap">
\r
1327 Public OnEventX ' as EventResponders<BR/>
\r
1329 Public Sub Run()<BR/>
\r
1330 Me.OnEventX.Calls Me, Empty<BR/>
\r
1331 End Sub<BR/>
\r
1333 <DIV id="text183_20" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:110px; margin-top:10523px; line-height:13px; white-space:nowrap">
\r
1335 <DIV id="text183_21" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:62px; margin-top:11031px; line-height:13px; white-space:nowrap">
\r
1337 <DIV id="text183_22" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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^
\81F
\83R
\81[
\83\8b\83o
\83b
\83N
\82³
\82ê
\82é
\83\81\83\
\83b
\83h
\82ð
\81A
\83\81\83\93\83o
\81[
\95Ï
\90\94\82É
\93o
\98^
\82·
\82é</A></DIV>
\r
1342 <DIV id="text183_24" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:200px; margin-top:11031px; line-height:13px; white-space:nowrap">
\r
1344 <DIV id="text183_25" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:158px; margin-top:11181px; line-height:13px; white-space:nowrap">
\r
1346 <DIV id="text183_26" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:92px; margin-top:11447px; line-height:13px; white-space:nowrap">
\r
1348 <DIV id="text183_27" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:116px; margin-top:10568px; line-height:13px; white-space:nowrap">
\r
1350 <DIV id="text183_28" style="position:absolute; font-family: '
\82l
\82r
\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µ
\81F
\83C
\83x
\83\93\83g
\82ª
\94
\90¶
\82µ
\82½
\82ç
\81A
\93o
\98^
\82³
\82ê
\82Ä
\82¢
\82é
\83\81\83\
\83b
\83h
\82ð
\8cÄ
\82Ñ
\8fo
\82·</A></DIV>
\r
1353 <DIV id="text183_29" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:134px; margin-top:11166px; line-height:13px; white-space:nowrap">
\r
1366 <DIV id="text183_34" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
1371 <DIV id="text183_36" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#000000; margin-left:49px; margin-top:10763px; line-height:15px; white-space:nowrap">
\r
1401 Sub main()<BR/>
\r
1402 Dim obj : Set obj = new ClassE<BR/>
\r
1404 obj.OnEventX.Add GetRef( "OnEventX" ), Empty<BR/>
\r
1405 obj.Run '// call OnEventX<BR/>
\r
1408 Sub OnEventX( Dummy, Caller, Args )<BR/>
\r
1409 WScipt.Echo "Responded"<BR/>
\r
1411 <DIV id="text183_49" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:145px; margin-top:10884px; line-height:13px; white-space:nowrap">
\r
1413 <DIV id="text183_50" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:223px; margin-top:10809px; line-height:13px; white-space:nowrap">
\r
1415 <DIV id="text183_51" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:79px; margin-top:10869px; line-height:13px; white-space:nowrap">
\r
1417 <DIV id="text183_52" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:116px; margin-top:11121px; line-height:13px; white-space:nowrap">
\r
1419 <DIV id="text183_53" style="position:absolute; font-family: '
\82l
\82r
\83S
\83V
\83b
\83N'; font-size:9pt; color:#FF0000; margin-left:85px; margin-top:10809px; line-height:13px; white-space:nowrap">
\r
1421 <DIV id="text183_54" style="position:absolute; font-family: '
\82l
\82r
\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
1424 <DIV id="text183_55" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
1430 <DIV id="text183_57" style="position:absolute; font-family: '
\82l
\82r
\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
1433 <DIV id="text183_58" style="position:absolute; font-family: '
\82l
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
\82r
\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
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
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
1469 <TABLE height="100%" style="position:absolute; margin-top:-9999px"><TR><TD></TD></TR></TABLE>
\r