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û±ä£¬Ö»ÊÇËüÔÚ²»Í£Ë¢Ð¡£ Ö»»ÒªÏÔʾµÄ²¿·Ö£¬²»»²»ÏÔʾµÄ²¿·Ö¡£ ¡¶¼ÆËã»úͼÐÎѧ¡·´°¿Ú¡¢²Ã¼ôÒýÓà ֻ»ÒªÏÔʾµÄ²¿·Ö£¬²»»²»ÏÔʾµÄ²¿
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
ËÄÜ°ïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~ #include "stdlib.h" #include "math.h" #include "stdio.h" float objfx(float x[]); void constraint(float x[],float g ......
СµÜÓÃVBµ÷EXCEL×÷ͼ objExlApp.Workbooks.Add objExlApp.Charts.Add objExlApp.ActiveChart.ChartType = xlLine objExlApp.ActiveChart.HasLegend = True objExlApp. ......