    VBHtmlתΪıļ           ҳ  ѧԺ       缼  ͼͼ  ϵͳ  ָ    칫  ý嶯  վӪ  ֤  ҳ    web    Ϸ  QQ      ǰλã   򿪷  VB  VBHtmlתΪıļ     VBHtmlתΪıļ ڣ200767 ߣ 鿴:[     С ]        p align="center">νһıļHtmlļʽתΪTxtıļأǱҪ۵ˡǶ֪ıļкܶıǣ$#@60;Html$#@62;$#@60;Head$#@62;$#@60;Body$#@62;ȵȣıļУЩûõģҪǶɾȥҳıļкܶ಻ɼݣá$#@60;!----$#@62;ݡJavaűЩıļҲǲõģҲҪǶɾȥˣǿԵóôһۣ 
һ򵥵HtmlתTxtĻԭǣıļӲȥıļӲֵдıļȥ 
ˣ۾ӦЩʵʵĶˡתĲԼ򵥵عΪ 
 
1 ȥ$#@60;head$#@62;ֵ 
2 ȥ$#@60;script$#@62;ֵJavaű 
3 ת$#@60;brΪз 
4 ת$#@60;/p$#@62;Ϊз 
5 תȥеĳı 
6 ת$#@60;Ϊ 7 ת$#@62;Ϊ> 
8 ת&Ϊ& 
9 ת Ϊո 
10ת"Ϊ 
11ȥתͷͽβֵпո 
12ת 
 
תĲVBĺIsStrʵ֣ĴȥıText3гıļͷ$#@60;/Head$#@62;ǲֵ: 
 
Do While InStr(1, LCase(Text3.Text), "$#@60;/head$#@62;") 0 
 
Text3.SelStart = 0 
Text3.SelLength = InStr(1, LCase(Text3.Text), "$#@60;/head$#@62;") + 6 
Text3.SelText = "" 
 
Loop 
 
ϸĳο嵥Դתʱǵת淶ĳıļҪתļ׼磺$#@60;/head$#@62;û$#@60;head$#@62;֮ԣʱתͲɡңֻת˲ֵĳıǣıǣǡFORMûбתࡢ꾡Ĺܾдˡۡ  
嵥 
Option EXPlicit 
Private Sub Form_Load() 
CommonDialog1.CancelError = True 
Text3.Visible = False 
Command1.Capti   = "" 
Command2.Caption = "ת==$#@62;" 
Command3.Caption = "" 
End Sub 
            
 [1]   [2]   [3]   [4]   һҳ      Ʊҳַͱ⣬͸QQ/Msnĺһ 
 
   VBHtmlתΪıļ £   VBHtmlתΪıļ  VBHtmlתΪıļ   
һƪ: VBʵ֡ICQʽӭ  
һƪ: ModemͨѶ⴦  رվرֹתصר¿תأעԭʼ  .°Ȩԭʼ.ڱվתµĸ˺վǱʾл⡣վת  صаȨϵ༭Ա,ǾԸ. תעԴhttp://www.hackhome.com     ƷƼ  
 ȵTOP10    VB+Accessͼϵͳ    VBʱͱܵ    ؼС洰С仯仯    VBѧ±ܼӴ    VBʹDirectXļ̳    VBݿԴ60ʵ    VBʹEXCEL    180VBͼνԴʵ    API޸עģ    VB쳬Ի˵    ͨſؼMSCommʹ    WINDOWSϢ˵    16תʮ, 16תɶƵ    vsprintӡʵ    webbrowser 2ղأ    VB6DataGridʵͨõӱ    FindWindow    VB6.0ͼ    VB̳ ڶ£ؼѧϰ    VB֮·ý     رƼ    ǳVB.Net Windows Form    ׹Ʊ˰ʼ    VisualBasic 6еĺִ    Զȡû½ƣٽ֤    APIָĿ¼ļ    VBݿԴ60ʵ    VBIEԶ尴ť    VBMS OfficeCOM    Visual Basicװ    WebComputingADOܽᱨ    vsprintӡʵ    VBʵһ򵥵ESMTPͻ    webbrowser 2ղأ    SetForegroundWindow    API޸עģ    VB쳬Ի˵    WINDOWSϢ˵    ؼС洰С仯仯    VBʱͱܵ         | () | Ȩ |  | Ϣ   Copyright 2003-2007  All Rights Reserved.  ICP05018371       