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

һЩVBÏà¹ØµÄ¶«Î÷~~


Õä¹óvbº¯ÊýÁбí
Variant ±äÁ¿µÄÄÚ²¿±íʾ:
_______________________________________________________________
·ûºÅ³£Á¿ Öµ ÄÚ²¿±íʾ ×Ö½ÚÊý
V_EMPTY 0 Empty
V_NULL 1 Null
V_INTEGER 2 Interger 2
V_LONG 3 Long 4
V_SINGLE 4 Single 4
V_DOUBLE 5 Double 8
V_CURRENCY 6 Currency 8
V_DATE 7 Date 8
V_STRING 8 String
V_OLE 9 OLE Automation Object
V_ERROR 10 Error
V_BOOLEAN 11 Boolean 2
V_VARIANT 12 Variant(½öÓÃÓÚ±äÌåÊý×é) 16(22) 
V_OBJECT 13 Object(·ÇOLE×Ô¶¯»¯¶ÔÏó) 4
V_BYTE 17 Byte 1
V_ARRAY 8192 Array
________________________________________________________________
__vbaVarMove ;±äÌå±äÁ¿¸³Öµ(Ò»°ãÓÃÓÚÊýÖµ±äÁ¿)
lea edx,var1 ;±äÁ¿1µÄµØÖ··Åµ½edx
lea ecx,var2 ;±äÁ¿2µÄµØÖ··Åµ½ecx
call __vbaVarMove ;°Ñ±äÁ¿1¸³Öµ¸ø±äÁ¿2
;-------------------------------------------------
__vbaVarCopy ;±äÌå±äÁ¿¸³Öµ(Ò»°ãÓÃÓÚ×Ö·û´®±äÁ¿)
lea edx,var1 ;±äÁ¿1µÄµØÖ··Åµ½edx
lea ecx,var2 ;±äÁ¿2µÄµØÖ··Åµ½ecx
call __vbaVarMove ;°Ñ±äÁ¿1¸³Öµ¸ø±äÁ¿2
;-------------------------------------------------
__vbaVarAdd ;±äÌå±äÁ¿Ïà¼Ó +
lea eax,var1
push eax ;¼ÓÊý1
lea ecx,var2
push ecx ;¼ÓÊý2
lea edx,var3
push edx ;½á¹û
call __vbaVarAdd ;±äÁ¿Ïà¼Ó£¬ÔÚeaxÖзµ»Ø
;-------------------------------------------------
__vbaVarSub ;±äÌå±äÁ¿Ïà¼õ -
lea eax,var1
push eax ;±»¼õÊý
lea ecx,var2
push ecx ;¼õÊý
lea edx,var3
push edx ;½á¹û
call __vbaVarSub ;±äÁ¿Ïà¼õ£¬ÔÚeaxÖзµ»Ø
;-------------------------------------------------
__vbaVarMul ;±äÌå±äÁ¿Ïà³Ë *
lea eax,var1
push eax ;±»³ËÊý
lea ecx,var2
push ecx ;³ËÊý
lea edx,var3
push edx ;½á¹û
call __vbaVarMul ;±äÁ¿Ïà³Ë£¬ÔÚeaxÖзµ»Ø
;-------------------------------------------------
__vbaVarDiv ;±äÌå±äÁ¿Ïà³ý£¨¸¡µã³ý·¨£©/
lea eax,var1
push eax ;±»³ýÊý
lea ecx,var2
push ecx ;³ýÊý
lea edx,var3
push edx ;½á¹û
call __vbaVarDiv ;±äÁ¿Ïà³ý£¬ÔÚeaxÖзµ»Ø
;------------------------------------------------
__vbaVarIdiv ;±äÌå±äÁ¿Ïà³ý£¨ÕûÊý³ý·¨£©\
lea eax,var1
push eax ;±»³ýÊý
lea ecx,var2
push ecx ;³ýÊý
lea edx,var3
push edx ;½á¹û
call __vb


Ïà¹ØÎĵµ£º

vb²Ù×÷sqlÊý¾Ý¿âµÄµäÐÍÀý×Ó

±¾³ÌÐòÓÐÒ»²Ëµ¥¿ªÊ¼£¬ÀïÃæÓвéѯ£¬É¾³ý£¬Ð޸ģ¬Ìí¼Ó£¬³ÌÐò²»Ò»Ò»Áгö£¬Ö»Ð´³ö»ù±¾µÄ¹ý³Ì£¬Á¬½ÓÊý¾Ý¿â²ÉÓñê׼ģ¿é£º
'Public publicstr As String
Public conn As ADODB.Connection
Public rs As ADODB.Recordset
Public Sub main()     'Êý¾Ý¿âÁ¬½Ó¹²Ïíº¯Êý
  Set conn = New ADODB.Connect ......

[VB]VBÖе÷ÓÃMSN 6.2 APIº¯Êý

VBÖе÷ÓÃMSN 6.2 APIº¯Êý
¡¡¡¡Á˽âÕâ·½ÃæÄÚÈÝµÄÆðÒòÊÇÔçÉÏÓÐλÅóÓÑÈÃÎÒ¿´Ò»¶Î¹ØÓÚMSN¿ª·¢³ÌÐò£¬ÏÖÔÚÎÞ·¨ÔËÐУ¬ÎÒ´ò¿ª¹¤³Ì·¢ÏÖÊÇÕë¶Ô4.7±àдµÄ£¬¶øËûµÄ¼ÆËã»ú°²×°µÄ6,2£¬ÒòΪÎÒÒ²ÓÃ6.2ËùÒÔÎÒÔÚVBÖв鿴ÁËһϣ¬·¢ÏÖÊÇȱÉÙMessenger Type Library¡£µ«ÊǶàÁËMessenger API Type Library£¬¿ÉÄÜÊÇ×öΪMessenger Type LibraryµÄÌ ......

vb¼Ç¼¼¯Êý¾Ýµ¼Èëµ½excel

 Public Sub DGToExcel(DataGrid1 As DataGrid, Optional ProgressBar1 As ProgressBar, Optional ByVal intFirst As Integer, Optional ByVal intLast As Integer, Optional strTitle As String)
'--½«DataGridµ¼³öÖÁExcel,ProgressBar1Ϊ½ø¶ÈÌõ,intFirstΪ´ÓÄÄÒ»ÁпªÊ¼´òÓ¡,intLastΪ´òÓ¡µ½ÄÄÒ»ÁÐ
On Error Resume ......

VBÖлص÷º¯ÊýµÄÒ»¸öÎÊÌâ

֮ǰÅöµ½Ò»¸öÎÊÌ⣬VBÖÐÏòÒ»¸öC++дµÄDLLÖÐ×¢²áÒ»¸öCallback£¬C++ÔÚµ÷ÓÃÕâ¸öCallbackʱÓÐЩÎÊÌ⣬¾ßÌåÎÊÌâÃèÊöºÍÏÂÃæÕâ¸öÌû×ÓÖеÄÇé¿öÊÇÒ»ÑùµÄ: http://topic.csdn.net/t/20051104/09/4370840.html
¾­¹ý³¢ÊÔÒÔºó·¢ÏÖ£¬ÔÚVBÖÐдµÄ»Øµ÷º¯Êý±ØÐëÊÇÓÃFunction¹Ø¼ü×Ö£¬²¢ÇÒ£¬±ØÐëÒªÉèÖ÷µ»ØÖµ£¬ÈçÏ£º
Public Function Callbac ......

VB³ÌÐòÆÆ½â

VB³ÌÐòÆÆ½â
VB ³ÌÐò¼ò½é
¡¡¡¡ÏÖÔÚ²»ÉÙ³ÌÐòÊÇÓà VB дµÄ£¬Äãͨ¹ý·´»ã±à»ò¸ú×Ùµ÷ÊÔʱºÜÈÝÒ×¼ø±ðij¸ö³ÌÐòÊÇ·ñΪ VB ³ÌÐò£¬VB µÄ EXE Îļþ²¢²»ÊÇÕæÕýµÄ±àÒë¿ÉÖ´ÐÐÎļþ£¬ËüÃÇÐèÆä¶¯Ì¬Á´½Ó¿â²ÅÄÜÕý³£ÔËÐУ¬¸÷°æ±¾µÄÁ´½Ó¿âÈçÏ£º
VB3 Á´½Ó¿âΪ vbrun300.dll £»
VB4 Á´½Ó¿âΪ  vb40016.dll £» - 16 룬½ÏÉÙ¼û£»
VB4 ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ