vbÖÐÓÃpicture×öÇúÏßÅöµ½µÄÎÊÌ⣿ - VB / »ù´¡Àà
ÎÒÏë×öµÄ³ÌÐòÊÇÕâÑùµÄ£ºÎÒ½«½ÓÊÕµÄÊý¾Ý´æÔÚÎı¾ÀȻºóÏë¹Û²ìÇúÏßµÄʱºò£¬´ÓÎı¾Àï¶Á³öÀ´£¬È»ºó»æÖƳÉÇúÏߣ»ÎÒÓõÄÊÇpicture¿Ø¼þ£¬ÒòΪÊý¾Ý±È½Ï¶à£¨3Íò¶àÌõ£¬ÉõÖÁ¸ü¶à£©£¬ÏÖÔÚÅöµ½µÄÎÊÌâÊÇ£º
1¡¢»ÏßʱÁ½¸öµãÖ®¼äµÄºá×ø±ê¼ä¸ôÊÇ20£¨ÔÙСµÄ»°ÇúÏ߾ͼ·ÔÚÒ»Æð£©£¬ÎÒµÄÊý¾ÝÓÐ3Íò¶à£¬¼ÆËã³öÀ´µÄÐèÒªµÄºá×ø±êÊÇ£º733640£¨Ï൱´ó£¬µ«ÓпÉÄܱÈÕ⻹Ҫ´ó£©£¬µ«ÎÒ·¢ÏÖpictureµÄ×î´ó¿í¶ÈÖ»Äܵ½£º245745£¬ËùÒÔºóÃæµÄÇúÏßÏÔʾµÄ·Ç³£Óµ¼·£¬ÒÑ¿´²»³öЧ¹û¡£
2¡¢ÎÒÓõÄÊÇÁ½¸öpicture¿Ø¼þ£¬ÔÒòÊÇΪÁ˼Ӹö¹ö¶¯Ìõ£¬µ«ÊÇHScroll¿Ø¼þµÄmax×î´óÖ»ÄÜÉèµ½32767£¬µ«ÎÒ»³öͼºó£¬picture2µÄ¿í¶ÈÓÐ733640£¬ÓÃHScroll¿Ø¼þÍв»µ½×îÓұߡ£
Íû¸÷λ´óÏÀÖ¸½Ì£¬¿´Ôõô½â¾ö£¬»òÕßÓÐʲôÆäËû˼·¡£ÎÒÒª¿´ÇúÏßµÄÁ¬ÐøÐÔ£¬ËùÒÔ×îºÃÊÇÔÚÒ»¸ö½çÃæ£¬Óùöµ½ÌõÍж¯
2.¿ÉÒÔÓÃÒ»¸ö±ÈÀýÖµcint(733640/32767£©,ÿÍ϶¯scrollµÄʱºò£¬Æä¶¼ÔÚÆävalueÉÏ*Õâ¸ö±ÈÀý
»Ø¸´ÎÊ2:
VB code:
Private Sub Form_Load()
Picture2.Width = 245745
HScroll1.SmallChange = 100
End Sub
Private Sub HScroll1_Change()
Picture2.Left = -10# * HScroll1
End Sub
лл¥ÉÏÁ½Î»µÄ»Ø´ð£¬ÎÊÌâ2Òѽâ¾ö£¬ÏÖÔÚÎÊÌâ1»¹ÊÇûÓÐÍ·Ð÷£¬Ï£Íû´ó¼ÒÄܸøÖ§¸öÕУ¬½â¾öºó¾Í¸ø·Ö£¬ÍûÂ¥ÉϵÄÁ½Î»ÄÍÐĵȴý
°´¶ÎÏÔʾ£¬Í϶¯scroll£¬±ÈÈçֵΪ0-10ʱÏÔʾ²¿·Ö£¬ÖµÎª11-20ÏÔʾµÚ¶þ²¿·Ö¡¡,×¢Ò⣺Pictureû±ä£¬Ö»ÊÇËüÔÚ²»Í£Ë¢Ð¡£
Ö»»ÒªÏÔʾµÄ²¿·Ö£¬²»»²»ÏÔʾµÄ²¿·Ö¡£
¡¶¼ÆËã»úͼÐÎѧ¡·´°¿Ú¡¢²Ã¼ô
Ïà¹ØÎÊ´ð£º
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
A 3
A 4
B 6
... ......
ÎÒµÄÒªÇóÊÇ£ºÍ¨¹ýץȡ±ðµÄ³ÌÐòÉϵıí¸ñµÄ¾ä±ú£¬È»ºó¶ÁÈ¡Õâ¸ö±í¸ñµÄÄÚÈÝ¡£
±í¸ñ¾ä±ú£¨ÀàÃû£ºMSFlexGridWndClass£©ÎÒÒÑ×¥µ½£¬½ÓÏÂÀ´ÈçºÎ¶ÁÈ¡±í¸ñµÄÄÚÈݾͲ»»áÁË£¿ÇóÖú¡£
ÄܰѴúÂë·¢À´Ñ§Ï°Ï²»£¿
244326867@qq.com ......
ÓÃVB±à³Ì¶ÁÈ¡¶ÌÐÅ,µÃµ½Ò»´ó¶Ñunicode±àÂë,Çë½ÌÈçºÎת»»³ÉÎı¾
ÀýÈç:¶ÁÈ¡¶ÌÐźó(»ªÎª900C»òTC35i),´®¿ÚµÃµ½ÈçÏÂÊý¾Ý:
+CMGL: 17,"REC UNREAD","8615007557713",,"10/03/30,09:37:15+32&qu ......
ÏÖÔÚСµÜÔÚÓÃvb6.0±àд³ÌÐò£¬Óöµ½Òì²½µÄÎÊÌ⣬¾ßÌåÈçÏ£º
µã»÷°´Å¥Aʱ£¬µ÷ÓÃÍⲿµÄdll(C++)£¬´ËdllÊÇͬ²½·µ»ØÊý¾Ý¡£´ËʱÈç¹ûÔ¶³ÌδÏìÓ¦£¬ÎҵijÌÐò½çÃæ¾Í»á¿¨ËÀ¡£Òò´ËÎÒÏëµ½ÓÃtimerÀ´ÊµÏÖÒì²½ £¬µ«ÊDz»Çå³þ¾ßÌåµÄÊµÏ ......