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û±ä£¬Ö»ÊÇËüÔÚ²»Í£Ë¢Ð¡£
Ö»»ÒªÏÔʾµÄ²¿·Ö£¬²»»²»ÏÔʾµÄ²¿·Ö¡£
¡¶¼ÆËã»úͼÐÎѧ¡·´°¿Ú¡¢²Ã¼ô
Ïà¹ØÎÊ´ð£º
DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.
datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......
xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£
hÊÇxml¸ñʽµÄ×Ö·û´®
ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿
ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......
ÎÊÌ⣺
ÏÖÔÚAccessÊý¾Ý¿âÖÐÓÐÁ½ÕűíTableAºÍTableB
TableAÖÐÓмǼÈçÏÂ:
×Ö¶Î1(Name) ×Ö¶Î2(Num)
A 3
A 4
B 6
... ......
ÏÖÔÚСµÜÔÚÓÃvb6.0±àд³ÌÐò£¬Óöµ½Òì²½µÄÎÊÌ⣬¾ßÌåÈçÏ£º
µã»÷°´Å¥Aʱ£¬µ÷ÓÃÍⲿµÄdll(C++)£¬´ËdllÊÇͬ²½·µ»ØÊý¾Ý¡£´ËʱÈç¹ûÔ¶³ÌδÏìÓ¦£¬ÎҵijÌÐò½çÃæ¾Í»á¿¨ËÀ¡£Òò´ËÎÒÏëµ½ÓÃtimerÀ´ÊµÏÖÒì²½ £¬µ«ÊDz»Çå³þ¾ßÌåµÄÊµÏ ......
ÓÐÁ½¸öÎÊÌâ
µÚÒ»¸öÎÊÌ⣺
ÍøÒ³Ô´Âë
<td><select name="question" onchange="showcustomquest(this.value)" tabindex="4"><option value="0">ÎÞ°²È«ÎÊ ......