Çë½ÌÔõÑùʹÇúÏß×óÒÆ£¬×îºÃÄÜÌù³ö´úÂ룬лл¡£
url=][/url]
bmpÔõôÉÏ´«£¿
ÎÒµÄͼƬÔÚD:\sin.bmp
ÒªÏÈ´«µ½ÍøÂçÉÏ£¬ÔÙÌùÏàÓ¦µÄ URL ¡£
¿ÉÒÔ´«µ½ÄãµÄÏà²áÖС£
ÄãÒ²¿ÉÒԲο¼Õâ¸öÌù×ÓÖÐ 8F µÄʾÀý£º
http://topic.csdn.net/u/20091105/11/5877aaf1-4850-4c0e-924d-ee3a03aa846f.html
......
»¹ÓÐÎÞ±ðµÄ¸üºÃµÄ´«Ê䷽ʽ£¿
ÎÒÖ»ÖªµÀTCPÓëUDP.
Õâ¸öÊǹ¹½¨ÆäËûÐÒéµÄ»ù´¡
ÒýÓÃ
Õâ¸öÊǹ¹½¨ÆäËûÐÒéµÄ»ù´¡
£¿£¿£¿ Ī·ÇTCP/UDP Êǹ¹½¨IPX/SPX/ATM/NETBIOSµÈÐÒéµÄ»ù´¡Âð£¿
ÒýÓÃ
ÒýÓà 2 Â¥ modest µÄ»Ø¸´:
Õâ¸öÊǹ¹½¨ÆäËûÐÒéµÄ»ù´¡
£¿£¿£¿ Ī·ÇTCP/UDP Êǹ¹½¨IPX/SPX/ATM/NETBIOSµÈÐÒ ......
Format(Now, "hh:mm:ss")ʱ¼äÊDz»±äµÄ£¬Ôõôʹʱ¼ä¶¯Ì¬±ä»¯
Õâô¾Ã»¹Ã»È˻ذ¡
¼ÓÒ»¸ötimer¿Ø¼þ,
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
text1.Text = Format(Now, "hh:mm:ss")
......
ÎÒҪʵÏÖ¶Ô½ÓÊÜÊäÈëµÄÎı¾¿ò½øÐÐʵʱ¼à²â,Ö»ÄܽÓÊÜÊäÈëÊýÖµ,Èç¹ûÊäÈëµÄΪ¿Õ¸ñ»ò×ÖĸµÈÈκηÇÊýÖµÄÚÈÝ,Ôò¼´Ê±±¨´í.Ó¦¸ÃÈçºÎʵÏÖ?
VB code:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not (Chr(KeyAscii) Like "[0-9]") And KeyAscii <> 8 Then
KeyAscii = 0
......
VBÖÐÈçºÎʵÏÖÈÃtext1ÏÔʾlistview1ijÁеÄÈ«²¿ÄÚÈÝ£¿
for i= to
text1=text1 & ListView1.ListItems(i).ListSubItems(10)
next i
VB code:
text1=""
for i=1 to liseview1.listitem.count
text1=text1 & ListView1.ListItems(i).ListSubItems(10)
next i
ÒýÓÃ
VB code ......
ÕжÔÈÕVB¹¤³Ìʦ
ÒªÇó¶þÄêÒÔÉϵÄVB¾Ñé
Óйý¶ÔÈÕÏîÄ¿µÄ×îºÃ£¬ÄÜ¿´¶®ÈÕÓïµÄ
ÓкÏÊʵķ¢¼òÀúµ½ÓÊÏäxiaocm2004@163.com
¸çÃÇ
´óÁ¬ÓÐÄãµÄµØÅÌÂð£¿
VBû×ö¹ýÕ¦Õû£¡
VB6µ¹ÊÇûÎÊÌ⣬¿Éϧ²»¶®ÈÕÓï
°ï¶¥£¡
¿´²»¶®ÈÕÓï
·ÇVB·¹ý
¶®ÈÕÓ¶®VB
¶ÔÈÕÏîÄ¿1Ä깤×÷¾Ñé¡«
......