VBÔõôÖÆ×÷½ø¶ÈÌõ£¿ - VB / ¿Ø¼þ
µã»÷°´Å¥ºóµ¯³ö½ø¶ÈÌõ´°¿Ú£¬ÒªÔÚ30%µÄʱºòÍ£¶Ù1Ãë 40%Í£¶Ù2Ã룬Ȼºó×ßÍê½ø¶ÈÌõºóÌáʾ±£´æ³É¹¦£¡ ÇëÎÊÈçºÎд£¿
½ø¶ÈÌõÓÃÄǸöVB6×Ô´øµÄprogressbar¿Ø¼þ,¶¨Ê±ÓÃtimer ÎÒÔÚ±¾Õ¾ÕÒÁËÕ⼸¸öÌû,¹À¼Æ¹»ÄãÓà http://topic.csdn.net/t/20050106/17/3704712.html ÐÂÊÖÌáÎÊ£ºÔõôûÓп´µ½ProgressBar¿Ø¼þ°¡ http://topic.csdn.net/t/20040417/08/2975881.html ÈçºÎÁé»î¿ØÖÆProgressBar¿Ø¼þvalueÖµµÄ´óС£¿ http://topic.csdn.net/t/20040409/04/2943316.html ÔõÑù»ñµÃ³ÌÐòÖ´ÐеÄʱ¼ä,²¢ÓÃProgressBar±íÏÖ³öÀ´ VB6×Ô´øµÄprogressbar¿Ø¼þµÄValueÊôÐÔÖµµÈÓÚ30%£¬ÉèÖÃÑÓ³Ù1sÖ´ÐÐ(¼´¿ÕÑ»·) ×Ô¼ºÐ´½ø¶ÈÌõµÄ»°ÓÃProgressBar¿Ø¼þ¿ÉÒÔ£¬ÉèÖÃMax£½100¡¢Min£½0£¬ÄÇôÐÞ¸ÄValueÊôÐÔ¼´¿É£¬Â¥Ö÷Ö»ÐèÒª°´ÕÕ×Ô¼ºµÄÒªÇ󣬵±Value£½30ºÍ40ʱ£¬µÈ´ý2Ãë¼´¿É¡£ Æäʵ»¹ÓÐÒ»¸ö·½·¨£¬¾ÍÊÇÓÃGIF½ø¶ÈÌõ£¬ºÜÐÎÏóºÜ·½±ã¡£ ÓÃPictureBoxÄ£ÄâÒ»¸ö½ø¶ÈÌõ¡£ ¾ßÌå×ö·¨ÊÇ£ºÓÃPictureBoxµÄLine·½·¨»³¤·½ÐΣ¬²¢Ìî³äÒ»¶¨µÄÑÕÉ«¡£ Õâ¸ö±ÈÓÿؼþºÃ£¬´úÂëÉٵÿÉÁ¯! 4Â¥µÄÐÖµÜÄܸø¸öÀàËƵĴúÂëÀý×ÓÂð£¬ÏëѧϰÏÂÄãµÄ·½·¨¡£ ÕâÊÇÎÒÒÔǰдµÄÒ»¸övb½ø¶ÈÌõ¿Ø¼þ£¬º¬Ô´Â룺 http://blog.csdn.net/sysdzw/archive/2009/10/09/4646211.aspx ѧϰÖÐ ÓûÏߵķ½·¨ºÃÏñ¸üºÃÒýÓà 4Â¥µÄÐÖµÜÄܸø¸öÀàËƵĴúÂëÀý×ÓÂð£¬ÏëѧϰÏÂÄãµÄ·½·¨¡£ ÕâÀïÓÐÎÒдµÄÓÃPictureBox×÷µÄÒ»¸ö½ø¶ÈÌõ£º http://blog.csdn.net/chenjl1031/archive/2007/12/24/1964909.aspx
Ïà¹ØÎÊ´ð£º
³õѧ£¬´óµ¨ÌáÎÊ£¬Çë¸ßÊÖ²»Áß´Í½Ì 1¡¢¹ö¶¯Ìõµã»÷Óë»æͼ°å£¨ÆÁÄ»,Piceure1£©µÄÒƶ¯ÎÊÌâÒѾ½â¾ö¡£ Picture1.Top = -VScroll1.Value + bcW '´¹Ö±Òƶ¯ Picture1.Left = -HScroll1.Value + bcW ' ......
°ÑÒÑÓÐÊý¾Ý£¨Êý¾Ý´óÓÚ20ÐУ©µÄRS(recordset)µÄµÚ10ÐÐÊý¾ÝÓëµÚ11ÐÐÊý¾Ý×ö¼Ó·¨ºó£¬É¾³ýµÚ11ÐеÄÊý¾Ý£¬È»ºó°ÑºóÃæµÄÊý¾ÝÏòÇ°ÒÆ¡£ RSµÄ»°ÐÞ¸ÄÊý¾ÝÊÇ»á¸üÐÂÊý¾Ý¿â£¬ÏÖÔÚµÄÎÊÌâÊÇRSÀïµÄÒÑÓÐÊý¾ÝÊÇÓÃSQLÓï¾ä·ÖÀàͳ¼Æ³öÀ´µÄ ......
Private Sub Command1_Click() Dim MyString() As String Open "a.xml" For Binary As #1 ' ´ò¿ª¸Õ´´½¨µÄÎļþ¡£ ReDim MyString(LOF(1) - 1) Put #1, , MyRecord ' ¶ÁÈëËùÓÐ×Ö·ûµ½±äÁ¿ÖÐ ......
vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»» Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?> <?mso-application progid="Excel.Sheet"?> <Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet" xm ......