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

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û±ä£¬Ö»ÊÇËüÔÚ²»Í£Ë¢Ð¡£

Ö»»­ÒªÏÔʾµÄ²¿·Ö£¬²»»­²»ÏÔʾµÄ²¿·Ö¡£
¡¶¼ÆËã»úͼÐÎѧ¡·´°¿Ú¡¢²Ã¼ô


ÒýÓÃ
Ö»»­ÒªÏÔʾµÄ²¿·Ö£¬²»»­²»ÏÔʾµÄ²¿


Ïà¹ØÎÊ´ð£º

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

ÇóÖú£ºC´úÂë¸Äд³ÉVB´úÂë - VB / »ù´¡Àà

Ë­ÄÜ°ïÎÒ°ÑÏÂÃæÕâЩ´úÂë¸Ä³ÉVBÐÎʽµÄ£¬¶àлÁË£¬¼±ÓÃ~~
#include "stdlib.h"
#include "math.h"
#include "stdio.h"
float objfx(float x[]);
void constraint(float x[],float g ......

VBµ÷ÓÃEXCEL»æͼ£¬ÈçºÎÐÞ¸ÄXÖá×ø±ê - VB / »ù´¡Àà

СµÜÓÃVBµ÷EXCEL×÷ͼ
objExlApp.Workbooks.Add
  objExlApp.Charts.Add
  objExlApp.ActiveChart.ChartType = xlLine
  objExlApp.ActiveChart.HasLegend = True
  objExlApp. ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ