vb±ê×¼£¨Æß£©£ºÄ£¿éºÍ¹ý³Ì
·´´½¨¾ßÓкÜÇ¿ÄÚ¾ÛÁ¦µÄÄ£¿é
·´´½¨¸ü¼ÓÈÝÒ×µ÷ÊÔºÍά»¤µÄ¹ý³Ì
·´´½¨¸ß¶ÈרÓõĹý³Ì
·´´½¨ËÉÉ¢Á¬½ÓµÄ¹ý³Ì
·¾¡Á¿Ê¹¹ý³Ì¾ßÓжÀÁ¢ÐÔ
·Ìá¸ß¹ý³ÌµÄÉÈÈëÐÔ
·½µµÍ¹ý³ÌµÄÉȳöÐÔ
·±à³ÌÔÔò
·Îª¹ý³ÌºÍÄ£¿é¸³Óè±íÒåÐÔÇ¿µÄÃû×Ö
·Îª¸÷¸ö¹ý³Ì¸³Óèµ¥¸öÍ˳öµã
·ÎªÃ¿¸ö¹ý³Ì¸³ÓèÃ÷È·¶¨ÒåµÄ×÷ÓÃÓò
·Îª²ÎÊýÔÚ¹ý³ÌÖ®¼ä´«µÝÊý¾Ý
·Ê¹ÓÃͳһºÍÖ±¹ÛÃ÷Á˵ķ½Ê½À´µ÷Óùý³Ì
Ïà¹ØÎĵµ£º
VB ×Ö½ÚÊý×éºÍ×Ö·û´®µÄת»»ÎÊÌâ (String<>Byte)
Posted by JiaJia 16 March,2009 (2)Comment
Ò»¡¢ ǰÑÔ
¡¡¡¡ Êý¾ÝÀàÐÍת»»ÔÚ±à³ÌÖо³£Óõ½£¬VB6ÌṩÁËÒ»ÕûÌ×ÀàÐÍת»»µÄº¯Êý¡£µ«ÊÇ£¬ÔÚ½øÐÐÀàÐÍת»»Ê±£¬ÓÐʱºò½ö½öÒÀ¿¿VBÌṩµÄº¯ÊýÊDz»ÄÜ´ïµ½×Ô¼ºµÄÄ¿µÄµÄ¡£Òò´Ë£¬ÐèÒª¿¼ÂÇÓÃÆäËûµÄ·½·¨À´Íê³ÉÊý¾ÝÀàÐÍת»»¡£±¾ÎĽ ......
Option Explicit
'==================================================
' º¯Êý: ReturnSM
'
' ¹¦ÄÜ: ·µ»Ø×Ö·û´®ÖÐû¸ö×Ö·ûµÄÆ´ÒôÉùĸµÚÒ»¸ö×Öĸ
'
' ×¢Òâ: ¸Ãº¯ÊýÖ»ÄÜ´¦Àí3755¸ö³£Óúº×Ö(B0 - D7)
' Èô³¬³öº¯ÊýµÄ·¶Î§½«·µ»Ø³£Êý ERR_RESULT$
'
' Èë¿Ú: Str ´ý´¦ÀíµÄ×Ö·û´®
'
Public Function ReturnSM$(ByVal S ......
Asc º¯Êý
·µ»ØÒ»¸ö Integer£¬´ú±í×Ö·û´®ÖÐÊ××ÖĸµÄ×Ö·û´úÂë¡£
Óï·¨:
Asc(string)
±ØÒªµÄ string ²ÎÊý¿ÉÒÔÊÇÈκÎÓÐЧµÄ×Ö·û´®±í´ïʽ¡£Èç¹û string ÖÐûÓаüº¬ÈκÎ×Ö·û£¬Ôò»á²úÉúÔËÐÐʱ´íÎó¡£
˵Ã÷:ÔÚ·Ç DBCS ϵͳÏ£¬·µ»ØÖµ·¶Î§Îª 0 – 255 ¡£ÔÚ DBCS ϵͳÏ£¬ÔòΪ -32768 &ndas ......
È«Ãæ¿ØÖÆ Excel
Ê×ÏÈ´´½¨ Excel ¶ÔÏó£¬Ê¹ÓÃComObj:
Dim ExcelID as Excel.Application
Set ExcelID as new Excel.Application
1) ÏÔʾµ±Ç°´°¿Ú£º
ExcelID.Visible := True;
2) ¸ü¸Ä Excel ±êÌâÀ¸£º
ExcelID.Caption := 'Ó¦ÓóÌÐòµ÷Óà Microsoft Excel';
3) Ìí¼Óй¤×÷²¾£º
ExcelID.WorkBooks.Add;
4) ´ò¿ªÒÑ´æÔÚµ ......
×ö±ÏÒµÂÛÎĵÄʱºòÓöµ½µÄÒ»¸öÎÊÌ⣬Çë½Ì¶¹°êÉϵÄÍøÓѲÅÓÐÁ˴𰸡£Ð»Ð»Õâλ½Ð“Òì²Ê”µÄÅóÓÑ¡£ÄóöÀ´Óë´ó¼Ò·ÖÏí¡£
¡¡¡¡ÓÃVB×öͼÏñ´¦ÀíÈí¼þµÄ±ÏÒµÂÛÎÄ£¬Óöµ½Ò»¸öÎÊÌâ¡£¼ÓÔØÒ»·ùͼƬ£¬Óöà¸öÂ˾µ·Ö±ð´¦Àí£¬ÏëÒ»²½Ò»²½UNDOµ½×îÔʼµÄͼÏñ£¬¶à´ÎUNDOÔõôʵÏÖ?
²Î¿¼·½°¸£º
Èç¹ûÏë×öµ½¶à´ÎUND ......