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

VB»Øµ÷º¯Êý³ö´í£¬ÄÚ´æ²»ÄÜΪд

ÔÚVCÖлص÷º¯ÊýΪ£º
C/C++ code:
typedef VOID (__stdcall *DL_AUTOCALLBACK )( DWORD dw1, DWORD dw2, LPVOID lpContext );

int Set( IN HANDLE hCamera, IN BOOL bAE,
IN BYTE btTarget, IN DL_AUTOCALLBACK pfCallback, IN LPVOID lpContext );


VbÖÐÎÒÉùÃ÷Ϊ£º
VB code:

Public Declare Function Set _'ÉùÃ÷
Lib "XX.dll" (ByVal hCamera As Long, ByVal bAE As Boolean, ByVal btTarget As Byte, _
ByVal pfCallback As Long, ByVal lpContext As Long) As Integer
Public Function AECallback(ByVal dw1 As Long,ByVal dw2 As Long, ByRef lpContext As Long)'Ò»µ½Õâ¾Í»á³ö´í
Dim val As Integer
¡­¡­¡­¡­
AECallback = 0
End Function
Set m_hDevice, True, 180, AddressOf XX.AECallback, MainForm.hWnd'ÕâÊÇÎҵĵ÷ÓÃ

ÏÔʾÄÚ´æ²»ÄÜΪ¶Á£¡
²»ÖªµÀÕâÊǸöʲôÎÊÌ⣬ÊDzÎÊý¶ÔÓ¦µÄÎÊÌâÂð£¿
DWORD Ϊunsigned longÀàÐÍ
LPVOID Ϊvoid*
Ôõô»ØÊÂÄØ£¿ÓÐË­¸ø¸ö´ð°¸£¡
×îºóÒ»¾ä¸ÄΪ£ºSet m_hDevice, True, 180, byval AddressOf XX.AECallback, MainForm.hWnd
ÊÔÒ»ÊÔ

ÄãÒª¸ø³öC++µÄÔ­ÐÍ¡£
»¹ÓУ¬±ØÐëÔÚ±ê׼ģ¿éÀïÃæÐ´»Øµ÷µÄ´úÂë¡£

set Êǹؼü×Ö£¬»»Ò»¸öÃû×Ö¡£Ê¹Óà alieas ¹Ø¼ü×Ö¡£

Public Function AECallback(ByVal dw1 As Long,ByVal dw2 As Long, ByRef lpContext As Long) <


Ïà¹ØÎÊ´ð£º

vb´òÓ¡ÎÊÌâ

´ó¼ÒºÃ£¬Îʸövb´òÓ¡ÎÊÌâ


printer.print "dsff"
.....
....


Printer.EndDoc


´òÓ¡³É¹¦ºóÎÒ½«Ö´ÐÐ

sqlstr = "update vc_yh set pr=' ÒÑ´òÓ¡ ', ......

VB ×Ö·ûÎÊÌâ

  TF1.text = " <_2_ZCHGZBH> " & MSFlexGrid1.TextMatrix(k, 1) & " </_2_ZCHGZBH> "
   

´ó¼ÒºÃ£¬ÎÒÓÃÉÏÃæÒ»¸ö¶«Î÷¸³Öµ  TF1.text = & ......

´ÓVBתÐÐVB.NET~~~¿ªÊ¼µÄʱºòÈçºÎѧ»ù´¡ÈëÃŰ¡~

VBżѧµÃ²»´í£¬ÏÖÔÚ´óÒ»£¬¸ßÈýµÄʱºò¾ÍѧVBÁË£¬ÏÖÔÚѧУÀï¶¼ÊÇѧC#ºÍVB.NETµÄÐֵܶࡣ¡£¡£
żҪתÐÐVB.NETÁË~µ±ÄêѧVBѧÁË2Ä꣬¶ÔVBÀïÃæµÄ³£Óú¯Êý¶¼Ê®·ÖÁ˽⡣
Select¡¢If½á¹¹¡¢For NextÑ­»·¡¢µÈ¶¼Á˽⡣¡£¡£ ......

vbÓëxmlÎÊÌâ

vbÖÐÔõôͨ¹ýxmlÀ´½âÎöÊý¾Ý¿âÖеÄ×Ö¶ÎÖµ¡£
û°ì·¨ÓÃXML½âÎöÊý¾Ý¿âµÄ×Ö¶ÎÖµ£¬³ý·ÇÊý¾Ý¿âÖб£´æµÄÊÇXML¸ñʽµÄ×Ö·û´®Îĵµ¡£

XMLÓÃÀ´Õ¹Ê¾²ã´ÎµÄÊý¾Ý¡£
Êý¾Ý¿âÒ»°ãÊǶþάÊý¾Ý¡£

Êý¾Ý¿âÖб£´æµÄÊÇXML×Ö·û´®¸ñʽ£ ......

vb²éѯÊý¾Ý¿âÎÊÌâ

ÔõôÓÅ»¯²éѯµÄЧÂÊ£¬±ÈÈçÎÒÏë´Ó100ÍòÌõ¼Ç¼ÖÐÿ´ÎÖ»²éѯ100Ìõ¼Ç¼µÄ»°£¬ÄÇôÕâÌõsqlÓï¾ä¸ÃÔõôʵÏÖ£¬×¢Ò⣺ÓïÑÔÊÇVBScriptµÄ£¬
http://www.cnblogs.com/anjou/archive/2007/10/17/926944.html

Éæ¼°µ½Ëã·¨£¬goog ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ