Çë½Ì£ºÔõôÓÃVBʵÏÖ¼ÆÊ±Æ÷µÄÀÛ¼Ó - VB / »ù´¡Àà
ÎÒÒѾÓÃtimer¿Ø¼þ×öºÃÁËÒ»¸öÃë±í¹¦ÄÜ£¬ÓÃÀ´ÏÔʾ»úÆ÷Õâ´ÎµÄ¹¤×÷ʱ¼ä£¬ÔõôÄÜÔÙÓÃÒ»¸ö±êÇ©ÏÔʾ»úÆ÷×ܹ²¹¤×÷µÄʱ¼äÄØ£¿
±ÈÈ磬µÚÒ»´Î¹¤×÷1Сʱ10·Ö20Ã룬µÚ¶þ´Î¹¤×÷2Сʱ10·Ö20Ã룬ÄÇôÀÛ»ý¹¤×÷ʱ¼ä¾ÍÊÇ3Сʱ20·Ö40Ã룬²¢ÇÒÕâ¸öÀÛ»ýµÄÖµ²»»á¶ªÊ§µÄ¡£
ллÁË£¬Çë´óÏÀÃǰïæ£¡
1 ÓñíÖÐн¨¸öÀ¸Î»total_runtime¼Ç¼
ÿµ±¹Ø±Õ³ÌÐòµÄʱºò¸üÐÂtotal_runtime=total_runtime+±¾´ÎÔËÐÐʱ¼ä
2 ¼Ç¼ÔÚiniÎļþÖÐн¨¸ö²ÎÊýtotal_runtime
ÿµ±¹Ø±Õ³ÌÐòµÄʱºò»ØÐ´iniÎļþÖеÄtotal_runtime=total_runtime+±¾´ÎÔËÐÐʱ¼ä
ÄÇÔÚÀÛ¼Ó֮ǰ£¬ÎÒÔõôȡ³ö±¾´ÎÔËÐеÄʱ¼äÄØ£¿
¸Ð¼¤£¡£¡
ÓÃÕâ¸öʱ¼ä
Private Sub Timer1_Timer()
s = s + 1
If s > 59 Then
m = m + 1
s = 0
If m > 59 Then
h = h + 1
m = 0
End If
 
Ïà¹ØÎÊ´ð£º
ÏÖÔÚÎÒÏë¸ù¾ÝtreeviewÉÏÿ¸ö½ÚµãµÄȨÏÞ£¬Ã»ÓÐȨÏ޵Ľڵ㲻Äܱ»Ñ¡ÖУ¬¶øÇҳɻÒÉ«£¬ÔõôʵÏÖ£¬ÔÚÏߵȡ£¡£¡£
Õâ¸ö£¿¡£¡£¡£
Ã²ËÆÃ»·¨¡£
ÊÔÊÔÄܲ»ÄܸÄijЩnodeµÄÑÕÉ«£¬¼Ç¼ÏÂÉϴεÄnodeclickÀïµÄnode¡£
Ï´εã»÷µÄÈç¹ ......
vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......
Êý¾Ý¿âÀïÓÐÒ»¸ö×ֶεÄÄÚÈÝÊǶþ½øÖÆ£¬Ôõô²ÅÄܰÑÕâ¸ö¶þ½øÖƶÁ³öÀ´
ʹÓÃ×Ö½ÚÁ÷¶ÔÏó¿ÉÒÔʵÏÖ
ÀýÈçÏÖÔÚÊý¾Ý¿âÀïÓиö×ֶεÄÄÚÈÝÊÇ0x504B03040A0000000800407F263C3B02465390000000820000000A0000006273CECACCE22E7478 ......
Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
vb WebBrowser СÎÊÌ⣬Çë½Ì£º
WebBrowserÀïµÄÍøÖ·Ìø×ªºó£¬ÔõôȡµÃÌø×ªºóµÄÒ³ÃæµÄURLµØÖ·
¶¥Ï¶¥ÏÂ
ÒýÓÃ
BeforeNavigate2
ºÃÏñûÓÐÕâ¸ö°É vb6.0
BeforeNavigate2
Õâ¸ö¿ÉÒÔÓУ¬ºÇºÇ¡£
......