VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½Ó - VB / »ù´¡Àà
VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷ÕýæµÄʱºòËûµÄText²¢²»»á¼°Ê±¸üС£
ÎÒÓÖ³¢ÊÔÓÃNavigate2ËûÀïÃæÒ²ÓиöURL²ÎÊý£¬µ«ÊÇÕâ¸öURLÓëÎÄ×Ö»òͼƬÖеij¬¼¶Á¬½Ó»¹ÊÇÓв»Í¬µÄ.
ÏÖÔÚÎÒµÄÒªÇóÊÇ£¬µã»÷ij¸ö´øÓÐÁ¬½ÓµÄÎÄ×Ö»òͼƬʱÎÒÒªÏȵõ½Õâ¸öÁ¬½ÓµØÖ·£¬È»ºóÈ¥´ò¿ªÍøÒ³,ÉÏÃæµÄÁ½¸ö·½·¨
¶¼²»ÄÜÂú×ãÎÒµÄÒªÇó¡£
ÔÚÕâÀïÇë¸ßÈËÖ¸µãÒ»ÏÂ.
´ËÌùÌáµÄÎÊÌâºÜºÃ£¬Ò²ÄÜ×öµ½£¬Ö»ÊǺÜÂé·³£¬ËùÒÔµ½ÏÖÔÚûÈ˻شËÌù¡£°ï涥һϡ£
ÓÑÇéUp ..................
ÒòΪÁ´½Ó²»Ò»¶¨¶¼ÊǵØÖ·£¬Ò²¿ÉÄÜÊÇÒ»¸ö½Å±¾µ÷Óã¬ËùÒÔÔÚ BeforeNavigate2() ºÍ NewWindow2() ʼþÖлñµÃ URL ±È½Ï¿¿Æ×¡£
ºÇºÇ......Â¥ÉϵĴð»°ÕæÈÃÎÒÍüÁËÊÇÀ´ÎÊ£¬ÎÊÌâµÄ.
¼ÈȻ΢ÈíÄÜ×öµ½£¬ÎÒÏë¿Ï¶¨»¹ÊÇÓа취µÄ..........
Õ⻹ÓÃ˵£¬Äãд¸öä¯ÀÀÆ÷Äں˿϶¨Ò²ÄÜ×öµ½¡£
ÀÏ´ó ÊÕµ½Õ¾¶ÌÁËô£¿
ÎÒÖ»ÖªµÀÔÚRichTextBoxÖÐÊó±êÒÆÖÁÁ´½Óʱ»áÓÐÏûϢ֪ͨ,Õâʱ¿ÉÒÔ´¦Àí,²»ÖªµÀWBÊÇ·ñÒ²ÓÐÀàËÆµÄÏûÏ¢,ÄãÕÒÕÒWBµÄ×ÊÁÏ
mark
ÏÂÃæÁ½¸ö·½·¨¶¼ÊÇÕë¶Ôµã»÷Á´½ÓÄܹ»ÔÚÖ¸¶¨WebBrowserÖдò¿ªµÄ
¶ø²»ÊÇÓÐЩÇé¿öÏ»áÔÚIEÖдò¿ª
Ò»¸öʹÓÃNewWindow2()ʼþ£¬Ó¦¸ÃÄܹ»½â¾öÎÊÌ⣬
·ÅÒ»¸öWebBrowse¡¢Ò»¸öcommandbutton
VB code:
Option Explicit
Private Sub Command1_Click()
WebBrows
Ïà¹ØÎÊ´ð£º
Ï£Íû´ó¼ÒÄܹ»°ïÎÒÏÂ.¸ÐлÁË..
Ô´Âë´«ÔÚ´óÃ×ÅÌ VB6 µÄÔ´Âë http://www.damipan.com/file/3wNoKLW.html
תΪVB.NETÔ´Âë.
СµÜÍêÈ«ÊÇÐÂÊÖ ²»¶®µÄ˵.Âé·³¸÷λ°ïæһÏÂ
ÎÒµÄEMAILÊÇ:4452 ......
ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
ÎÒÊÇVBµÄгÉÔ±£¬ÏÖÔÚÏëÓÃVBÀ´×ö¸öTXTÎĵµ£¬Çë´ó¼Ò¸øÎÒ´úÂë¼°½éÉÜÒ»ÏÂÏàÓ¦µÄ¿Ø¼þ£¡
·Ç³£¸Ðл£¡£¡£¡£¡£¡£¡
¿ÉÒÔÓÃһЩOFFICE¿Ø¼þ
googleÉÏÕÒһϰÉ,VBдÈëTXT,ºÜ¶àÑùÀý´úÂëµÄ
Ö±½Óµ÷²éÓþͿÉÒÔÁË
Ãæ¶ÔÃÀÅ® ......
¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......
ÓÐûÓÐFOR VB Ë®¾§±¨±íµÄÊé»òÊǵç×ÓÎĵµ°¡£¿ÓÐÐÅÏ¢µÄÅóÓѸæËßÏ ллÁË
ÎÒҲûÕÒµ½
Èç¹ûÄãÓÐ FOR ÆäËü µÄÎĵµ£¬Ò²¿ÉÒԲο¼°É£¡
¡®µÀÀí¡¯ÊÇÒ»Öµģ¬Ö»ÊÇ¡°±í´ï·½Ê½¡±²»Í¬¶øÒÑ¡£
mark
pls learn from ba ......