¿ÉÄÜÎÒ±í´ï²»ÊǺÜÇå³þ,¾ßÌåµÄ˵,ÎÒµÄÒªÇóÊÇ:
ÎÒÏÖÔÚÓиöչʾϵͳ,Ëüÿ·ÖÖÓ»áÖ´ÐÐÒ»´Î³ÌÐò,È»ºó°Ñ½á¹ûÏÔʾÔÚÒ»ÕÅͼƬÉÏ
µ«ÊÇÏÖÔÚÎÒÒª°ÉÕâ¸öϵͳÄóöÈ¥ÑÝʾ,ÔÚÑÝʾµÄʱºòÏ£Íû10ÃëÖ´ÐÐÒ»´Î
Ò²¾ÍÊÇ˵
ÒÔǰһ·ÖÖÓ²ÅÖ´ÐеijÌÐòÏÖÔÚÒª10ÃëÖ´ÐÐÒ»´Î,ÎÒ²»Òª¸ÄtimerµÄʱ¼ä,¶øÊÇÏ£Íû¼Ó¿ì³ÌÐòµÄÖ´ÐÐʱ¼äÀ´ÊµÏÖ
ÒòΪ³ÌÐò± ......
Ê×Ïȸø×Ô¼ºÒ»¸ö¶ú¹â£¡
ÔÚ¿´¿´Õâ¸ö£º
http://topic.csdn.net/u/20090614/10/a9023e07-32c8-459f-93a2-fe6be03c5eae.html?81968
×Ðϸ¿´¿´Ò²Ã»É¶¿ÉÒÔÉËÐĵİ¡..
ÕâÑù°¡¡£¡£¡£
Â¥Ö÷£¬Õâ¸ö¸úÓïÑÔÎ޹ذɣ¿
ÄãÓ¦¸Ã˵£º¡°¾ö¶¨ÔÙÒ²²»ÔÚVB£¨»ò±ðµÄ¼ÆËã»úÓïÑÔ£©ÖÐʹÓø¡µãÊýÁË£¡¡±
Â¥ÉÏÕý½â£¬³öÏÖÁ´½ÓÀ ......
VB2005
ÎÒдµÄ´úÂ룺
Private Sub ɾ³ýÓû§ÐÅÏ¢_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim conn As SqlConnection = New SqlConnection(strconn)
conn.Open()
Dim strSQL As String = "Select * from WUser"
......
ʹÓÃvc6±àд¹©vbʹÓõÄdll£¬ÐèÒªÄÄЩ²½Ö裿
Ó¦¸Ã×¢ÒâÄÄЩÊÂÏ
ºÃÏñÊÇºÍÆÕͨµÄÒ»Ñù°É£¿
д³ÉWin32µÄDLL¾ÍÐÐÁ˰É
DLL±àÒëºÃÒԺ󣬾ÍÊÇ2½øÖÆ´úÂëÁË£¬ºÍÄã²ÉÓÃÄÄÖÖÓïÑÔÎ޹صġ£
ΨһÐèҪעÒâµÄÊÇÄãÐèÒªÔÚÄÄÖÖÓïÑÔÖÐʹÓÃÕâ¸öDLL,ÄÇôÄã¶Ôº¯ÊýµÄÉùÃ÷¶¼Òª·ûºÏÕâ¸öÓïÑԵĹæÔò
ÎÒÔÚvb6Öе÷ÓÃ
ÒýÓÃ
DLL±àÒëºÃ ......
ÎÒÓÐÒ»¸öpicturebox ,Àï±ßÎÒ»ÁËͼÐΣ¬»¹Óпؼþ£¬»¹ÓÐÎÄ×Ö£¬²¢ÇÒpicture±ÈÆÁÄ»´ó£¬´ø¹ö¶¯ÌõµÄ¡£ÇëÎÊÎÒÔõô²ÅÄܹ»°ÑÕâ¸öpictureÉϵÄËùÓж«Î÷±£´æ»òÕß´òÓ¡³öÀ´£¿£¿£¿
ÊÔÒ»ÊÔ:
ME.PrintForm
ÓÃPrintForm£¬±»ÕڸǵIJ¿·Ö¿Ï¶¨´òÓ¡²»³ö£¬ÎÒÏ뻹ÐèÒªÍ϶¯»¬¿é£¬´úÂë½ØÆÁ£¬ÔÙ´òÓ¡½ØÆÁͼÏñ
ÓÃBitbltÓ¦¸Ã¿ÉÒÔ.
¸´ÖÆ£ºBitBlt£ ......
³õѧVB£¬×î½üÔÚÄÃVB+ACCESSдһ¸ö¼òÒ׵ĸöÈËÐÅÏ¢¹ÜÀíϵͳ
ÇëÎÊÈçºÎÈÃʹÓÃÕß¿ÉÒÔ×ÔÐмÓÔØÕÕÆ¬¡£
È»ºóÕâ¸öͼƬ´æÈëACCESSÖÐ
ÇëÎÊÐèҪʲô¿Ø¼þÀ´Íê³ÉÕâ¸ö¹¦ÄÜ£¬»¹ÓÐÍê³ÉÕâ¸ö¹¦ÄܵĴóÌå˼·£¿
ºÃÏñ½çÃæÉÏûÓÐÕâÑùµÄ¿Ø¼þ£¬ÊDz»ÊÇÒªÔÚ²¿¼þÖÐѡijѡÏîÀ´¼ÓÔØ¿Ø¼þ£¿
лл¸÷λÁË~
ÒýÓÃ
Sub s_ReadFile()
......