VBÖи÷ÖÖÊý¾ÝÀàÐÍת»»º¯Êý
1. ¸÷ÖÖ½øÖÆ×ª»»º¯Êý Ò»°ãµÄÊý¾Ý½øÖưüÀ¨Ê®½øÖÆ,¶þ½øÖÆ,Ê®Áù½øÖÆ.Ê®½øÖƾÍÊÇÎÒÃÇÈÕ³£Éú»îÓõ½µÄÊý¾Ý½øÖÆ,Òò´ËÒ²ÊÇÎÒÃÇ×îÊìϤºÍÇå³þµÄ;¶þ½øÖÆÊǼÆËã»úµÄ»ù´¡½øÖÆ,Ö÷ÒªÊÇÒòΪ±ãÓÚÓÃÎïÀíÆ÷¼þʵÏÖ¶þ½øÖÆ;°Ë½øÖƺÍÊ®Áù½øÖÆÒòΪºÍ¶þ½øÖƵÄÌìÈ»µÄÇ×ÃܹØÏµ,²¢ÇÒ±íʾ±È¶þ½øÖƸü·½±ã,
¡¡¡¡1.
¸÷ÖÖ½øÖÆ×ª»»º¯Êý
¡¡¡¡Ò»°ãµÄÊý¾Ý½øÖưüÀ¨Ê®½øÖÆ,¶þ½øÖÆ,Ê®Áù½øÖÆ.Ê®½øÖƾÍÊÇÎÒÃÇÈÕ³£Éú»îÓõ½µÄÊý¾Ý½øÖÆ,Òò´ËÒ²ÊÇÎÒÃÇ×îÊìϤºÍÇå³þµÄ;¶þ½øÖÆÊǼÆËã»úµÄ»ù´¡½øÖÆ,Ö÷ÒªÊÇÒòΪ±ãÓÚÓÃÎïÀíÆ÷¼þʵÏÖ¶þ½øÖÆ;°Ë½øÖƺÍÊ®Áù½øÖÆÒòΪºÍ¶þ½øÖƵÄÌìÈ»µÄÇ×ÃܹØÏµ,²¢ÇÒ±íʾ±È¶þ½øÖƸü·½±ã,Òò¶øÒ²³ÉΪ¼ÆËã»úµÄ³£Óñíʾ·½·¨.
¡¡¡¡VBÖÐÉæ¼°µ½µÄÊý¾Ý½øÖÆÖ®¼äµÄת»»º¯ÊýÖ÷ÒªÓÐÈçϼ¸¸ö:
¡¡¡¡Hex º¯Êý: ·µ»Ø´ú±íÊ®Áù½øÖÆÊýÖµµÄ String;
¡¡¡¡Oct º¯Êý: ·µ»Ø´ú±íÒ»ÊýÖµµÄ°Ë½øÖÆÖµµÄVariant (String);
¡¡¡¡Cintº¯Êý: Ç¿ÖÆ½«Ò»¸ö±í´ïʽת»»³É-32,768 ÖÁ 32,767µÄÕûÐÍ;
¡¡¡¡CLngº¯Êý: Ç¿ÖÆ½«Ò»¸ö±í´ïʽת»»³É-2,147,483,648 ÖÁ 2,147,483,647µÄ³¤ÕûÐÍ;
¡¡¡¡Cdecº¯Êý: Ç¿ÖÆ½«Ò»¸ö±í´ïʽת»»³ÉDecimal Êý¾ÝÀàÐÍ;
¡¡¡¡CDblº¯Êý: Ç¿ÖÆ½«Ò»¸ö±í´ïʽת»»³ÉDouble Êý¾ÝÀàÐÍ;
¡¡¡¡ ÒÔÉÏÕâЩº¯ÊýÊÇ×î»ù±¾µÄ¼¸¸öÊý¾Ý½øÖÆÖ®¼äµÄת»»º¯Êý,ÆäÖÐÒÔǰÈý¸öº¯Êý×î³£ÓÃ,Ò²×îÓÐÓÃ.´ÓÉÏÃæ¼¸¸öº¯ÊýÎÒÃÇ¿ÉÒÔ¿´µ½,VBÖÐûÓÐΪÎÒÃÇÌṩרÃŵĺ¯Êý¹©ÎÒÃǽ«±í´ïʽ»òÊÇÊý¾Ýת»»³ÉÊ®½øÖƺͶþ½øÖÆ,²»¹ýÊ®½øÖƵÄת»»ÎÒÃÇ¿ÉÒÔͨ¹ýCintº¯ÊýÇáËÉÍê³É,¶ø¶þ½øÖƵÄʵÏÖÎÒÃÇ¿ÉÒÔͨ¹ý¶þ½øÖƺͰ˽øÖÆ,Ê®Áù½øÖƵĹØÏµÇáËÉת»».
¡¡¡¡ ÏÂÃæ¼¸¸öÀý×ÓΪHexº¯ÊýºÍOctº¯ÊýÒÔ¼°Cintº¯ÊýµÄʵÀý:
(1).¡¡ A= hex(5)¡¡·µ»Ø5;(2).¡¡ B=hex(10)¡¡·µ»ØA(3).¡¡ C=hex(23)¡¡·µ»Ø17(4).¡¡ D=oct(5)¡¡¡¡·µ»Ø5(5).¡¡ E=oct(10)¡¡·µ»Ø12(6).¡¡ F=oct(23)¡¡ ·µ»Ø27(7).¡¡ G=Cint(&H17)¡¡·µ»Ø23(8) .¡¡ H=Cint(&O12)¡¡·µ»Ø10
¡¡¡¡ ÒÔÉÏÕâЩº¯ÊýµÄÓ¦ÓñȽϼòµ¥,¾Í²»¶à˵ÁË,ÖµµÃÒ»ÌáµÄÊÇHexº¯ÊýºÍOctº¯Êý·µ»ØµÄ¶¼ÊÇ×Ö·û´®,Èç¹ûÊÇÏ뽫ʮÁù½øÖÆ»òÊǰ˽øÖƵÄ×Ö·û´®±äÁ¿×ª»»³ÉÊ®½øÖÆ,¿ÉÒÔ°´ÈçÏ·½·¨½øÐÐ:
¡¡¡¡C=”17”¡¡¡¡¡¡17ΪʮÁù½øÖÆÊýÖµµÄString
¡¡¡¡C=”&H” & C
¡¡¡¡Ic=Cint(C)¡¡¡¡·µ»Ø23
¡¡¡¡2. ×Ö·û´®ºÍÊý×Öת
Ïà¹ØÎĵµ£º
'ÔÚÒýÓÃÀïÌí¼ÓADODB
Public vscn As ADODB.Connection
Public SQLString As String
SQLString = "Provider=SQLOLEDB.1;Password=ÃÜÂë;Persist Security Info=True;User ID=ÓÃ" & _
"»§;Initial Catalog=Êý¾Ý¿âÃû;Data Source=·þÎñÆ÷Ãû"
  ......
ÔÆÔÂVB´úÂë¸ñʽ»¯²å¼þ 1.0
CloudMoonFormatCode.dll ÊÇÒ»¸öVB6.0µÄ²å¼þ£¬ÓÃÓÚVB¿ª·¢ÈËÔ±¸ñʽ»¯´úÂë¡£´Ë²å¼þÍêÈ«Ãâ·Ñ¡£
Ö÷Òª¹¦ÄÜ£º
ÔÚ VB6 IDE Öиñʽ»¯µ±Ç°´ò¿ª´°¿ÚµÄ´úÂ룬ʹÄãµÄ´úÂë¸ü¼ÓÕû½à¡¢ÃÀ¹Û¡£
Ìṩ¹Ø±ÕËùÓÐÉè¼Æ´°¿ÚµÄ¹¦ÄÜ
Ìṩ¹Ø±ÕËùÓдúÂë´°¿ÚµÄ¹¦ÄÜ
......
×Ô¶¨ÒåÊý¾Ý¿âÁ´½ÓÀà(Access)ÊÇÁ´½ÓAccessÊý¾Ý¿âʱʹÓõÄÀà¡£
²¹×㣺Application.StartupPath.ToStringÊÇÖ¸¶¨Éú³É.EXEÎļþµÄ·¾¶£¬°ÑÊý¾Ý¿âºÍÖ´ÐÐÎļþ´æ·Åµ½Ò»Æðʱ£¬²»¹Ü°²×°ºóÔÚʲô·¾¶¶¼ÎÞÐèÌØ¶¨Ö¸¶¨¡£
Imports System.Data.OleDb
#Region "È«¾Ö±äÁ¿"
Private mTimeo ......
'*************************************************************************
'**Ä£ ¿é Ãû£ºfBackupDatabase_a
'**Ãè Êö£º±¸·ÝÊý¾Ý¿â,·µ»Ø³ö´íÐÅÏ¢,Õý³£»Ö¸´,·µ»Ø""
'**µ÷ ÓãºfBackupDatabase_a "±¸·ÝÎļþÃû","Êý¾Ý¿ ......
Õ⼸ÌìÒ»Ö±ÔÚ×öÒ»¸öСµÄ¹¤³Ì,×öÒ»¸öÎı¾ÔĶÁÆ÷,ÏÖÔÚ×öµÄÒѾÓÐÈý·ÖÖ®¶þÁË,´ÓÖÐѧϰµ½Á˺ܶà,¶ÔÎÒÃÇÒÔǰѧϰµÄ³É¹ûÓÐÁ˸üÉî¿ÌµÄÀí½â.
VBÊÇÒ»ÃÅÃæÏò¶ÔÏóµÄ³ÌÐòÉè¼Æ,ÎҾʹÓÃæÐÔ¶ÔÏóµÄ½Ç¶È¶ÔËû×öÒ»´Î×ܽá
°ÑVBÖÐËùÓеÄÊý¾Ý,±äÁ¿,¿Ø¼þ¶¼¿´×öÒ»¸ö¶ÔÏó
ÎÒÃÇËùÓеIJÙ×÷¶¼ÊǶԶÔÏóµÄ²Ù×÷,ÈöÔÏóÈ¥Ö´ÐÐijһ¸ö¹¦ÄÜ
´ó¼ÒÏÈ¿´Ò»¸öÀý× ......