VBÖлص÷º¯ÊýµÄÒ»¸öÎÊÌâ
֮ǰÅöµ½Ò»¸öÎÊÌ⣬VBÖÐÏòÒ»¸öC++дµÄDLLÖÐ×¢²áÒ»¸öCallback£¬C++ÔÚµ÷ÓÃÕâ¸öCallbackʱÓÐЩÎÊÌ⣬¾ßÌåÎÊÌâÃèÊöºÍÏÂÃæÕâ¸öÌû×ÓÖеÄÇé¿öÊÇÒ»ÑùµÄ: http://topic.csdn.net/t/20051104/09/4370840.html
¾¹ý³¢ÊÔÒÔºó·¢ÏÖ£¬ÔÚVBÖÐдµÄ»Øµ÷º¯Êý±ØÐëÊÇÓÃFunction¹Ø¼ü×Ö£¬²¢ÇÒ£¬±ØÐëÒªÉèÖ÷µ»ØÖµ£¬ÈçÏ£º
Public Function Callback () As Long
’TODO: Here
Callback = 0
End Function
Èç¹ûÕâ¸ö»Øµ÷ÖÐûÓÐÉùÃ÷·µ»ØÖµ£¬²¢ÇÒûÓÐCallback = 0Õâ¸öÇé¿ö£¬¾Í»á³öÏÖÉÏÊöÌû×ÓÖеÄÎÊÌâ.
Ïà¹ØÎĵµ£º
Ò»¡¢¸ÅÊö
´®¿ÚͨѶ×÷ΪһÖÖ¹ÅÀ϶øÓÖÁé»îµÄͨѶ·½Ê½£¬±»¹ã·ºµØÓ¦ÓÃÓÚPC¼äµÄͨѶÒÔ¼°PCºÍµ¥Æ¬»úÖ®¼äµÄͨѶ֮ÖС£ Ìáµ½´®¿ÚͨѶµÄ±à³Ì£¬ÈËÃÇÍùÍùÁ¢¿ÌÏëµ½C¡¢»ã±àµÈ¶Ôϵͳµ×²ã²Ù×÷Ö§³Ö½ÏºÃµÄ±à³ÌÓïÑÔÒÔ¼°´ó´®·±ËöµÄ´úÂë¡£
ʵ¼ÊÉÏ£¬Ö»ÒªÎÒÃǽèÖúÏà¹ØActiveX¿Ø¼þµÄ°ïÖú£¬¼´Ê¹ÊÇÔڵײ ......
±¾ÎÄÀ´×Ôqingye2008Ëù·¢µÄ´ËÌûµÄÌÖÂÛ£¬¸Ðл³Â»Ô¡¢ÂíÔÆ½£¡¢qingyeµÄÄÍÐÄÖ¸µãºÍ·ÖÏí¡£
1¡¢ÒýÑÔ
»°ËµqingyeͬѧµÃµ½ÁËÒ»¸öÓÃÓÚ¼Ó½âÃܵÄDll£¨¸Ã¶¯Ì¬¿âÔÚÕâÀïÏÂÔØ£©£¬Í¨¹ýDll Export Viewer¿´µ½dllÓÐ2¸öµ¼³öº¯Êý·Ö±ðÊÇDll_EncInºÍDll_EncOut£¬qingyeͬѧÏëÔÚVBÖÐʹÓÃÕâÁ½¸öº¯Êý¡£ÒòΪ¸ã²»µ½½Ó¿Ú˵Ã÷£¬Ö»ºÃͨ¹ý²é¿´»ã±à´úÂëÀ´²Â ......
ÉùÃ÷¹Ì¶¨´óСµÄÊý×é
ÓÐÈýÖÖ·½·¨ÉùÃ÷¹Ì¶¨´óСµÄÊý×飬ÓÃÄÄÒ»ÖÖ·½·¨È¡¾öÓÚÊý×éÓ¦ÓеÄÓÐЧ·¶Î§£º
½¨Á¢¹«ÓÃÊý×飬ÔÚÄ£¿éµÄÉùÃ÷¶ÎÓà Public Óï¾äÉùÃ÷Êý×é¡£
½¨Á¢Ä£¿é¼¶Êý×飬ÔÚÄ£¿éµÄÉùÃ÷¶ÎÓà Private Óï¾äÉùÃ÷Êý×é¡£
½¨ ......
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 ......