Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

vbÐÂÎÊÌâ ¼±£¡£¡£¡ - VB / »ù´¡Àà

ÎÒÏëÓ÷½Ïò¼üʵÏÖ¶Ôvb textboxÖеÄÎı¾½øÐбê¼Ç£¬ÒÔʵÏÖÈçͬ¼Çʱ¾ÖÐshift+·½Ïò¼üÑ¡ÔñÎı¾µÄ¹¦ÄÜ£»¼´£ºÎÞÂÛ¹â±êÔÚÄĸöλÖÃÉÏ£¬µ±µ¥»÷Ò»¸ö°´Å¥ ¿ªÊ¼±ê¼Ç£©Ê±£¬¿ªÊ¼¸ßÁÁÏÔʾµ±Ç°µÄ×Ö·û£¬µ±ÔÙ°´ÁíÒ»¸ö°´Å¥£¨½áÊø±ê¼Ç£©Ê±£¬Í£Ö¹±ê¼Ç£¬Í¬Ê±½«Õⲿ·ÖÑ¡ÔñµÄÄÚÈݷŵ½¼ôÇаåÉÏ£»Òƶ¯¹â±êµ½ÆäËüλÖã¬ÎÒÔÙµ¥»÷Ò»¸ö°´Å¥£¨Õ³Ìù£©£¬¾Í¿ÉÒ԰ѸղÅÑ¡ÖеÄÄÚÈÝÕ³Ìùµ½´Ë´¦£¬Ó¦ÈçºÎ±à³Ì£¿[color=#FF6600]ÕâÖÖ·½Ê½ÔÚÎ÷ÃÅ×ÓÊý¿ØÏµÍ³ÖоÍÓÐËùÓ¦ÓÃ[/color]£»£¬Èô²»ºÃ±à³ÌÄÜ·ñÓÃRICHtextbox
 ÊµÏÖ£¿
Çë¸ßÊÖ°ïæ¡£
¼±£¡£¡£¡
shift+·½Ïò¼ü
ctrl+c
ctrl+v

¿´¿´MSDNÖеÄ
SelStart
SelLength
ÊôÐÔ˵Ã÷

·¶Àý£º
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)

Èç¹ûÓóÌÐòÔõôʵÏÖ£¬ÔÚÊý¿ØÏµÍ³ÉϾ¡Á¿ÓÃÒ»¸ö¼üʵÏÖ

2Â¥Ëù˵µÄ·½·¨,Ö»ÄÜÓÃÀ´Ñ¡ÔñÈ«²¿Îı¾£¬µ«ÊÇû·¨ÊµÏÖ±ê¼ÇÈÎÒâÒ»¶Î£¬²¢½«Æä¸´ÖƵŦÄÜ£¬Ò²¾ÍÊÇÈçºÎÈõ±Ç°
¹â±êµÄÓұߵÄÒ»¸ö×Ö·û¼´ÎªText1.SelStart λÖã¿£¬Èô»»³ÉrichtextboxÄÜʵÏÖô

Text1.Text = "***ÕâÊÇÈÎÒⲿ·Ö***"
Text1.SelStart = 3
Text1.SelLength = 6


VB code:

Text1.Text = "***ÕâÊÇÈÎÒⲿ·Ö***"
Text1.SelStart = 3
Text1.SelLength = 6
Clipboard.SetText Text1.SelText, vbCFText



Â¥ÉÏËù˵µÄÊÇÔÚÒÑÖªselstart ÔÚÄǸöλÖã¬ÎÒÏë×öµÄʱÓÃshift+·½Ïò¼ü½øÐÐÈÎÒâÎı¾Ñ¡Ôñ£¬¿ªÊ¼ºÍ½áÊøÎ»ÖÃ
¶¼²»ÖªµÀ£¬Ëæ¹â±êµÄλÖöø¶¨£¬Ñ¡ÔñÍêÖ®ºó£¬µã»÷¸´Öư´Å¥¾Í¿ÉÒÔ¸´ÖÆËùÑ¡ÔñµÄ×Ö·ûµ½¼ôÇаåÉ


Ïà¹ØÎÊ´ð£º

vbµÄÀàÖÐʹÓÃ×Ô¶¨ÒåÀàÐÍÊý¾ÝµÄÎÊÌâ - VB / »ù´¡Àà


ÎÒÔÚÀàÖÐÓÐÒ»¸öº¯Êý
Public Function DownloadAdditionalSite(SiteName As siteconfig, Directory As String, ymd As String) As Boolean
siteconfigÊÇÎÒ×Ô¶¨ÒåÀàÐ͵ÄÊý¾Ý£¬ÎªÊ²Ã´»áÌáʾ¡°Ö»ÓÐÔÚ¹«¹²¶ÔÏóÄ£¿éÖж ......

¹ØÓÚVB DIM ds as new DataSetÎÊÌâ - VB / »ù´¡Àà

DIM ds as new DataSet
ÎÒÕâÑùÉùÃ÷ ÔõÀÏÊDZ¨ Óû§¶¨ÒåÀàÐÍ䶨Ò壿 Õâ¸öÐèÒªÒýÓÃʲôÂ𣿣¿
ǰÌáÊÇDataSet¶ÔÏóÒª´æÔÚ,¾ÍÊǶÔÏóä¯ÀÀÆ÷ÖÐÓÐËü.ûÓоÍÒªÒýÓÃ.

datasetÊÇADO.NET¶ÔÏó
Èç¹ûÄãÓõÄÊÇvb.net£¬ÄÇôÔÚ´ ......

vb - VB / »ù´¡Àà

xmlDoc1.loadXML(h)×ÜÊÇ·µ»Øfalse£¬ÎªÊ²Ã´£¿Ð»Ð»°ïæ»Ø´ðÒ»ÏÂ
hÊÇÊ²Ã´ÄØ¡£¡£¡£¡£¡£¡£¡£¡£¡£

hÊÇxml¸ñʽµÄ×Ö·û´®

ÄãÊÇÏë´ò¿ª¡£XML¸ñʽµÄÎļþ°É£¿

ÎÒÊǰÑh·ÅÔÚxmlDoc1ÀÓÃxmlDoc1.loadXML(h)£¬È»ºóÈ¡xmlDo ......

vb WebBrowser СÎÊÌ⣬Çë½Ì - VB / »ù´¡Àà

vb WebBrowser СÎÊÌ⣬Çë½Ì£º
WebBrowserÀïµÄÍøÖ·Ìø×ªºó£¬ÔõôȡµÃÌø×ªºóµÄÒ³ÃæµÄURLµØÖ·

¶¥Ï¶¥ÏÂ

ÒýÓÃ
BeforeNavigate2
ºÃÏñûÓÐÕâ¸ö°É vb6.0

BeforeNavigate2
Õâ¸ö¿ÉÒÔÓУ¬ºÇºÇ¡£
......

VBµ÷ÓÃEXCEL»æÍ¼£¬ÈçºÎÐÞ¸ÄXÖá×ø±ê - VB / »ù´¡Àà

СµÜÓÃVBµ÷EXCEL×÷ͼ
objExlApp.Workbooks.Add
  objExlApp.Charts.Add
  objExlApp.ActiveChart.ChartType = xlLine
  objExlApp.ActiveChart.HasLegend = True
  objExlApp. ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ