VBÌîÐ´ÍøÒ³Îı¾Çø - VB / »ù´¡Àà
ÓÐÁ½¸öÎÊÌâ
µÚÒ»¸öÎÊÌ⣺
ÍøÒ³Ô´Âë
<td><select name="question" onchange="showcustomquest(this.value)" tabindex="4"><option value="0">ÎÞ°²È«ÎÊÌâ</option>
<option value="1">ÎÒ°Ö°ÖµÄÃû×ÖÊÇ</option>
<option value="2">ÎÒÂèÂèµÄÃû×ÖÊÇ</option>
<option value="3">ÎÒµÄСѧУÃû</option>
<option value="4">ÎÒµÄÖÐѧУÃû</option>
<option value="5">ÎÒ×îϲ»¶µÄÊé</option>
<option value="6">ÎÒ×îϲ»¶µÄ¸èÇú</option>
<option value="7">ÎÒ×îϲ»¶µÄµçÓ°</option>
<option value="8">ÎÒ×îϲ»¶µÄÑÕÉ«</option>
<option value="-1">×Ô¶¨ÒåÎÊÌâ</option></select>
<input id="customquest" style="display:none" name="customquest" class="input" size="17" tabindex="5" />
</td>
Õâ¸öÊÇÑéÖ¤µÄÏÂÀ²Ëµ¥£¬µ«ÊÇËüÐèÒªµã»÷²ÅÄܽøÐÐÑ¡Ôñ¡£
µÚ¶þ¸öÎÊÌâ£ºÍøÒ³Ô´´úÂ룺
<INPUT type=hidden value=1 name=atc_autourl></DIV><TEXTAREA onkeydown=quickpost(event) style="WIDTH: 96%"name=atc_content rows=8></TEXTAREA>
ËüµÄֵΪatc_content£¬ÕâÎı¾ÇøÒ²Òªµã»÷»÷»î²ÅÄÜдÈë¡£
µÚÒ»¸öÎÊÌâÎÒÏëÔÚComboÖÐʵÏÖÑ¡Ôñ£¬µÚ¶þ¸öÎÒÏëÔÚtextÎı¾¿òÖÐʵÏÖ×Ô¶¯Ìîд¡£¾ßÌå´úÂëÔõôд£¿±¾È˸ÕѧVB²»¾Ã£¬´
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......
ÎÒÏë°ÑwordÁí´æÎªxmlÖ®ºó£¬ÓÃvb¶ÁÈ¡Õâ¸öxmlµÄÄÚÈÝ£¬ÇëÎÊÈçºÎʵÏÖ£¿
dim f as integer
dim b() as byte
dim s as string
dim L as long
f=freefile()
open "abc.xml" for binary access read as #f
......
Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ
ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
A 3
A 4
B 6
... ......