ÈçºÎ¸øVBµÄform¼Ó¹ö¶¯Ìõ
VBµÄformÓиö±³¾°Í¼Æ¬ÊôÐÔ£¬ÎÒÒªÔڻͼµÄ¹ý³ÌÖÐ ¸øVBµÄform±³¾°¹ØÁªÒ»¸ö±³¾°Í¼Æ¬ ÓеÄʱºò±³¾°Í¼Æ¬ºÜ´ó£¬³¬¹ýÁËformµÄ×î´ó³Ì¶È ÎÒÏëÎÊÏ£¬Ôõô¸øformÌí¼Ó¹ö¶¯Ìõ£¬ÔÚÍ϶¯µÄʱºò¿ÉÒÔ¿´µ½Õû·ùµÄͼƬ ͼƬµÄ´óС²»ÖªµÀ Õâ²»ÊÇVB.NET£¬Ã»ÓÐautoscrollÊôÐÔ¡£ Ï£Íû¸÷λ´óÏÀ°ï°ï棬×îºÃÄÜÌù³ö´úÂë ·Ç³£¸Ðл£¬ÔÚÏߵȴý
ÒªÖªµÀͼƬ´óС£¬È»ºóÉèÖùö¶¯ÌõMAXVALUE£¬ÔÚʼþÀïÒÆ¶¯£¬Ã»×Ô¶¯µÄ¡£ÒýÓà Ҫ֪µÀͼƬ´óС£¬È»ºóÉèÖùö¶¯ÌõMAXVALUE£¬ÔÚʼþÀïÒÆ¶¯£¬Ã»×Ô¶¯µÄ¡£ ͼƬµÄ´óСÊÇËæ»úµÄ ÎÒÒ²²»ÖªµÀ¿Í»§Òª×¼±¸¶à´óµÄͼƬ ÒòΪÿ¸öµçÄÔ·Ö±æÂʲ»Ò»Ñù ±ðÓà form Á˰É.... ÒýÓà ±ðÓà form Á˰É.... ²»ÓÃformÄÇÓÃʲô£¿ Äܸø¸öÈç¹û½â¾öµÄÀý×Óô£¿ ͨ¹ýÊôÐÔÉèÖõı³¾°Í¼Æ¬²»Äܹö¶¯£¬½¨Òé×Ô¼ºÓà PaintPicture ½øÐÐÏÔʾ¡£ ÓÃPictureBox Õâ¸öÀý×ÓÓùö¶¯ÌõÒÆ¶¯ PictureBox ¿Ø¼þ´©¹ý´°Ìå¡£ÒªÊÔÓôËÀý£¬ÏȰѴúÂëÕ³Ìùµ½°üº¬Ò»Ð¡µÄ PictureBox ¿Ø¼þºÍ HScrollBar ¿Ø¼þµÄ´°ÌåµÄÉùÃ÷²¿·Ö£¬È»ºó°´ F5 ¼ü£¬²¢µ¥»÷¹ö¶¯Ìõ¡£ Private Sub Form_Load () HScroll1.Max = 100 ' ÉèÖÃ×î´óÖµ. HScroll1.LargeChange = 20 ' Çû÷ 5 ´Îºó´©¹ý. HScroll1.SmallChange = 5 ' Çû÷ 20 ´Îºó´©¹ý. Picture1.Left = 0 ' ͼÐδÓ×ó±ß¿ªÊ¼. Picture1.BackColor = QBColor(3) ' ÉèÖÃͼÐοòµÄÑÕÉ«. End Sub Private Sub HScroll1_Change () ' °´ÕÕ¹ö¶¯ÌõÒÆ¶¯Í¼ÐÎ. Picture1.Left = (HScroll
Ïà¹ØÎÊ´ð£º
¿ÉÒÔÂð ºÃÆæ¹ÖµÄÌâÄ¿¶î£¡£¡ ¿ÉÒÔ¸æËßÎÒÃÇÄãµ½µ×ÏëÎÊʲô £¿ 2·Ö¸øÎҵϰ¾Í¿ÉÒÔ¡£ ........................¿ÉÒÔÂð ¿ÉÒÔ! ¾À½á£¬ 29. vb¿ÉÒÔÕâÑù×ö²»£¿ ( H )¡Ì A. ......
ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......
ÔÚvbÖÐÈçºÎ¶ÁÈ¡WordÄÚÈÝ(°üº¬±í¸ñ£¬Í¼Æ¬£¬µÈ£© ¾¹È»²»ÊÇzero¡£ ²»ÖªµÀÔõôʵÏֵIJ»ÒªËµ»° Õâ¸öÖ»ÄܶÁÎı¾, VB code: Private Sub Command1_Click() Dim WordApp As Object Set WordApp = CreateObject(& ......
Private Sub btnPrint_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnPrint.Click MouseWait() Dim ClearTempTabelSQL As String 'If Not ......
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£ Õâ¸ö£¿¡£¡£¡£ Ã²ËÆÃ»·¨¡£ ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£ Ï´εã»÷µÄÈç¹ ......