£¨×ª£©VBÇ¿ÖÆÀàÐÍת»»º¯Êý
ת×Ô£ºhttp://tieba.baidu.com/f?kz=139765011
ÿ¸öº¯Êý¶¼¿ÉÒÔÇ¿Öƽ«Ò»¸ö±í´ïʽת»»³ÉijÖÖÌض¨Êý¾ÝÀàÐÍ¡£
Óï·¨
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression)
CVar(expression)
CStr(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 Decimal Áã±ä±ÈÊýÖµ£¬¼´ÎÞСÊýλÊýÖµ£¬Îª
+/-79,228,162,514,264,337,593,543,950,335¡£¶ÔÓÚ 28 λСÊýµÄÊýÖµ£¬·¶Î§ÔòΪ
+/-7.9228162514264337593543950335£»×îСµÄ¿ÉÄÜ·ÇÁãÖµÊÇ 0.0000000000000000000000000001¡£
CInt Integer -32,768 ÖÁ 32,767£¬Ð¡Êý²¿·ÖËÄÉáÎåÈë¡£
CLng Long -2,147,483,648 ÖÁ 2,147,483,647£¬Ð¡Êý²¿·ÖËÄÉáÎåÈë¡£
CSng Single ¸ºÊýΪ -3.402823E38 ÖÁ -1.401298E-45£»ÕýÊýΪ 1.401298E-45 ÖÁ 3.402823E38¡£
CStr String ÒÀ¾Ý expression ²ÎÊý·µ»Ø Cstr¡£
CVar Variant ÈôΪÊýÖµ£¬Ôò·¶Î§Óë Double Ïàͬ£»Èô²»ÎªÊýÖµ£¬Ôò·¶Î§Óë String Ïàͬ¡£
˵Ã÷
Èç¹û´«µÝ¸øº¯ÊýµÄ expression ³¬¹ýת»»Ä¿±êÊý¾ÝÀàÐ͵ķ¶Î§£¬½«·¢Éú´íÎó¡£
ͨ³££¬ÔÚ±àÂëʱ¿ÉÒÔʹÓÃÊý¾ÝÀàÐÍת»»º¯Êý£¬À´ÌåÏÖijЩ²Ù×÷µÄ½á¹ûÓ¦¸Ã±íʾΪÌض¨µÄÊý¾ÝÀàÐÍ£¬¶ø²»ÊÇȱʡµÄÊý¾ÝÀàÐÍ¡£ÀýÈ磬µ±µ¥¾«¶È¡¢Ë«¾«¶È»òÕûÊýÔËËã·¢ÉúµÄÇé¿öÏ£¬Ê¹Óà CCur À´Ç¿ÖÆÖ´Ðлõ±ÒÔËËã¡£
Ó¦
Ïà¹ØÎĵµ£º
Ò»°ã»áʹÓÃWINDOW APIµÄÇé¿ö£¬ÊµÔÚÊÇÒòΪVB±¾Éí²»ÌṩijЩ¹¦ÄÜ£¬µ«ÊÇ£¬³ÌʽËù
ÐèÓÖ²»µÃ²»È»£¬ÀýÈ磺¶ÁÈ¡RegistryÄÚµÄ×Ê
ÁÏ£¬VBÖ»ÌṩSaveSetting¡¢Getsetting µÈ
ϵÁеÄÖ¸Áµ«ÊÇËüÖ»ÄܶÁÈ¡Ìض¨µØÇøµÄÖµ£¬Òª¶Á¡¢É¾¡¢¸ü¶¯ÆäËûÇøÓòµÄֵʱ£¬¾ÍÎÞ
·¨
ʹÓá£ÔÙÈ磺×Ðϸ¿´Ò»¿´Combo BoxµÄEvents£¬ÆäÖÐ ......
YXOnlineÒѾ½Ó½üβÉù,ΪÁË´¦ÀíһЩ½çÃæµÄÎÊÌâ,²âÊÔÒ»¸öC++µÄDLL
Ò»¸öº¯Êý,ÓÃdeasambling¿´C++µÄ´úÂëÊÇûÓдíÎóµÄ,µ«Êǵ½ÁËVB,Çë¿´
bµÄ·µ»ØÖµÊÇTrue ²»¹ÜC++ºÍVBÏ໥¼üÔ¼¶¨TrueºÍFalse¸÷¶ÔӦΪʲôÊýÖµ
ÕâÀïÒѾÊÇTrueÁË
µ«ÄÇʱÏÔʾTrue = True ÈԾɲ»Ö´ÐеÚÒ»¸öMsgbox
Ö±½ÓÌøµ½Else
¶øÈç¹ûÊ¡ÂÔb = True Ϊ If b Then ......
¡¡¡¡ÐÅÏ¢¼à¿ØÓëÒþ˽±£»¤ÓÀÔ¶ÊÇÒ»¶Ôì¶Ü¡£
ÔÚ¶Ô¸¶¸÷ÖÖÐÅÏ¢ÇÔÈ¡Èí¼þÉÏ¡£
м¼Êõ×ÜÊDzã³ö²»Çî¡£±¾ÎĽéÉÜÒ»ÖÖ¹ÅÀϵļüÅ̼ǼÆ÷¼¼Êõ£¬È·ÊµºÜ¹ÅÀÏ¡£
DOSʱ´úÈËÃǾÍÔÚÓÃÁË¡£
µ«ÊÇÏÖÔÚËüÈÔÈ»ºÜÓÐЧ£¬ÔÚ¼üÅ̹ýÂËÇ ......
Try
Dim Path As String = Server.MapPath("~/Download/") 'Îļþ·¾¶
Path = Path & "file.txt" 'ÎļþµÄÃû³Æ
......
1¡¢´óµÀÖÁ¼ò
Ã×ÀÏʦÏȳÊÏÖÁËÒ»¸öº¯ÊýµÄͼÏñ£¬È»ºóÎÊÎÊ´ó¼ÒÏëµ½ÁËʲô¡£
¿´µ½ÕâÕÅͼ£¬ÎÒÏÈ·¢ÏÖÕâÊÇÒ»¸öÖÜÆÚº¯Êý£¬ÔÙÍùÉîÁ˾͸оõ×Ô¼ºÓ¦¸Ã²»»áÁË£¬¼ÄÏ£ÍûÓÚÊéÐŵļ¸¸öͬѧ£¬¸Ð¾õÓ¦¸ÃÊǸßÊýÀïµÄ¶«Î÷¡£µ«ÊÂʵ֤Ã÷ÊdzõÖеÄ֪ʶ£º
ËûÊÇÒÔÏÂÈý¸öº¯ÊýµÄ¸´ºÏº¯Êý£º
y=sin(x)+sin(2x)+sin(3x)
& ......