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

¼òµ¥µÄVB×éºÏ¿òÎÊÌâ

ÓÐÁ½¸ö×éºÏ¿ò·Ö±ðÊÇcombo1ºÍcombo2ÔÚ³õʼ»¯Ê±ºòcombo1ÖÐÒѾ­ÓÐÁ½¸öÏîÄ¿µçÊÓ»úºÍ±ùÏä
ÎÒÏëÔËÐÐʱºòÔÚcombo1ÖÐÑ¡ÔñÒ»¸öÏîÄ¿£¬ÔÚcombo2ÖоÍÏÔʾ¸ÃÏîÄ¿Ëùº­¸ÇµÄ²úÆ·
ÎÒ±àдÁËÒÔÏ´úÂëÔÚÔËÐеÄʱºò×ÜÊdzö´í£¬Çë´ó¼Ò°ïæ¿´¿´
Select Case Combo1.ListIndex
Case 0
For i = 0 To Combo2.ListCount - 1
Combo2.RemoveItem i 
Next i   
Combo2.AddItem "³¤ºç²Êµç"
Combo2.AddItem "¶«Ö¥²Êµç"
Combo2.AddItem "ÏÄÆÕ²Êµç"
Combo2.AddItem "²Êºç²Êµç"
Case 1
For i = 0 To Combo2.ListCount - 1
Combo2.RemoveItem i
Next i
Combo2.AddItem "ËÉϱùÏä"
Combo2.AddItem "¶«Ö¥±ùÏä"
Combo2.AddItem "ÏÄÆÕ±ùÏä"
Combo2.AddItem "²Êºç±ùÏä"

   
End Select
³ÌÐòÔËÐÐʱºòµ±µÚÒ»´ÎÔÚcombo1Ñ¡ÖÐÒ»¸öÏîĿʱºò£¬ÔÚcombo2ÖÐÄÜÕýÈ·ÏÔʾ³öÀ´ÄÄЩ²úÆ·
µ±µÚ¶þ´ÎÔÚcombo1Ñ¡ÖÐÏîĿʱ£¬¾ÍÌáʾCombo2.RemoveItem iÕâ¸öÓï¾ä±àÒë³ö´í
For i = 0 To Combo2.ListCount - 1
Combo2.RemoveItem i 
Next i 

¿ÉÒÔÓÃCombo2.ClearÀ´´úÌæ

µ°Ìù¡£¡£¡£

ÒòΪÄãµÚÒ»´ÎÔÚcombo1Ñ¡ÖÐÒ»¸öÏîĿʱºò£¬Ã»ÓÐÖ´ÐÐforÑ­»·ÀïµÄÄÚÈÝ
µÚ¶þ´ÎÑ¡ÖÐcombo1µÄʱºò,ÿִÐÐÒ»´ÎCombo2.RemoveItem i ,Combo2.ListCount¾Í¼õСÁË,¶øiÔÚ±ä´ó,ÏÔÈ»»áÔ½½çÁË.

ÕâÑù:
Select Case Combo1.ListIndex
Case 0
Combo2.clear
Combo2.AddItem "³¤ºç²Êµç&q


Ïà¹ØÎÊ´ð£º

ΪʲôCдDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷ÓÃ

ΪʲôCдµÄDLLÎļþC¡¢PBÄܵ÷ÓÃVB²»Äܵ÷Óã¿
VBÀïΪʲôÓеÄDLLÖ±½Óͨ¹ýÒýÓÿÉÒÔʹÓã¿ÓеÄÐèҪͨ¹ýdeclareÉêÃ÷Íⲿº¯Êý£¿ÕâЩDLLÓÐʲô²î±ð£¿

1¡¢ÎªÊ²Ã´PBÄÜͨ¹ýDECLAREÉùÃ÷¶øVB²»ÐУ¿
2¡¢Èç¹ûÕâ¸ödllÖÐµÄ ......

asp.net(vb)ÎÊÌâ

login.aspx.vb:

    Public ReadOnly Property nameT() As String
        Get
            Return TextBox1.Text
    &nb ......

VB »ñÈ¡ÍøÒ³Ô´´úÂë

Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......

vbÄÜ·ñ°Ñwinsock¿Ø¼þ·â×°µ½dllÖÐ

vb½«winsock¿Ø¼þ·â×°µ½dllÎÊÌâ ÓÐʲôºÃµÄ˼·£¿ Èç¹ûÓÃSocket APIÄØ£¿
ÀýÈ磬ÏñÏÂÃæÕâÑù·â×°Winsock¿Ø¼þ£¬ÐеÄͨ£¿
´´½¨ActiveX dll£¬Ìí¼Ó´°ÌåfrmClient£¬¼ÓÈëWinSock¿Ø¼þwskClient¡£
Àà´úÂ룺
Option Expli ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ