VB°æÒ²ÓÐÕâ¸öÎÊÌâ Á½¸öÒ»Æð»Ø´ðÁË ·Ö¶¼ÊÇÄãµÄ
ÎÒwinform»ÃæÉÏÓкܶà¿Ø¼þ ÏÖÔÚÓÐÒ»¸ö°´Å¥ ÎÒÏëµ±°´ÏÂËüµÄʱºò ËùÓеĿؼþ¶¼²»¿É±à¼ µ«³ý¹ýToolStripÉÏÃæµÄbutton
ÎÒʹÓÃÏÂÃæµÄ·½Ê½²»¿ÉÒÔ ÇóÖªµÀµÄ°ïÎÒÏ ллÁË
C# code:
Private Sub È«»Ãæ²»¿É±à¼ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles È«»Ãæ²»¿É±à¼ToolStripMenuItem.Click
Me.Enabled = Not Me.Enabled 'ÏÈÈÃÈ«»Ãæ²»¿É±à¼ÁË
ToolStripMenuItem1.Enabled = True '¸Õ¿ªÊ¼ÈÃToolStrip¿É±à¼ µ«ÊÇûÓдﵽЧ¹û ËùÓÐÓÃÏÂÃæµÄ¼ÌÐø »¹ÊÇûÓÐЧ¹û ²»ÖªµÀÕâ¸öÎÊÌâÔõô´¦Àí£¿ ллÁË
È«»Ãæ²»¿É±à¼ToolStripMenuItem.Enabled = True
Í˳öToolStripMenuItem.Enabled = True
°ïÖúÖ÷ÌâToolStripMenuItem.Enabled = True
End Sub
VB°æÒ²ÓÐÕâ¸öÎÊÌâ Á½¸öÒ»Æð»Ø´ðÁË ·Ö¶¼ÊÇÄãµÄ
ûÈ˻شðÎÒµÄÎÊÌâ°¡ ÔÎ ¸ßÊÖ°ï°ïÎÒ°É ¾ÍµÈÕâ¸öÄØ
ddddd
ÐèÒª ²»¿É±à¼µÄ¾Í .Enabled = false
ToolStripÐèÒª ¿É±à¼ .Enabled = true
²»ÐÐÂð °ï¶¥ÁË
¿ÉÒÔÔÚ×îÍâÃæ·ÅÒ»¸öpanel1µÄ£¬Ö®ºó¶Ôpanel1²Ù×÷¡£
this.panel1.Enabled = false;
panel1 Ò²²»ÐÐ ÒòΪÎҵĿؼþÕ¼ÂúÁËËùÓеĵط½ Ö»ÁôÁËÒ»¸öºÜСµÄ½Ç·ÅÕâ¸öbutton ËùÓÐ˵µ±panel°üº¬ËùÓеĿؼþµÄʱºò Õâ¸öbuttonÒ²¿Ï¶¨±ØÐëÔÚÆäÖÐ
»¹ÓÐÆäËûµÄ°ì·¨Â𣿠ллÁË
±éÀúËùÓпؼþ£¬ÏëÄÇЩ¿Ø¼þ¸Éɶ¾Í¸Éɶ
For Each Contro
Ïà¹ØÎÊ´ð£º
ÎÒÓÃDelphiдÁËÒ»¸öDLL, DLLÀïÓÐMDIµÄ×Ó´°Ìå,DLL³õʼ»¯Ê± ´«µÝµ÷ÓÃÕßµÄTApplication¸øDLL, ÔÚDelphi7Öе÷ÓÃÒѾͨ¹ý,µ«ÊDz»ÖªµÀÔÚVBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ, ÊÇ·ñÄÜÔÚVBÖе÷ÓÃ?
ÄãºÃ£¬ÓÃinstance²»ÊǾͿÉÒÔÁË ......
vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?
°´Ctrl+F5Ô¤±àÒ룬³ö´íʱ»áÌøתµ½´íÎóÐÐ
²»ÊÇÄÇÑùµÄÁË,ÎÒÊÇÒªÇó±àÒë³ÉEXEºóÔËÐÐ,Ìáʾ³ö´íÄÜ·ñÌáʾ´íÔÚÄÄÒ»ÐÐ.
ÎÒ±àÒëºóÔÚÎҵĵçÄÔÉÏÔËÐÐûÎÊÌâ,µ«Ô ......
Ï£Íû´ó¼ÒÄܹ»°ïÎÒÏÂ.¸ÐлÁË..
Ô´Âë´«ÔÚ´óÃ×ÅÌ VB6 µÄÔ´Âë http://www.damipan.com/file/3wNoKLW.html
תΪVB.NETÔ´Âë.
СµÜÍêÈ«ÊÇÐÂÊÖ ²»¶®µÄ˵.Âé·³¸÷λ°ïæһÏÂ
ÎÒµÄEMAILÊÇ:4452 ......
Option Explicit
Private Sub Command1_Click()
WebBrowser1.Navigate "http://mc.qeedoo.com/servers.php"
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal ......
ÔÚvbÕâ±à³ÌÀïËƺõÓкܶàµÄ¶«Î÷ÊÇÏàÁªÏµµÄ£¬ÎªÊ²Ã´ÓÐЩÈ˶ÔvbµÄ±à³ÌÃþ²»µ½Í·ÄÔ°¡£¡²¢ÇÒÓÐЩʺÜÈÝÒ׵ģ¬µ«ÊÇÈ´°ÑËüÃǵĴúÂë±ä³É¸´ÔÓ£¬Ò²È¥ÏëһЩ²»ÄÜʵÏֵĶ«Î÷°¡£¡
û·ÖÁË£¬Â¥Ö÷¶àÀ´µã·Ö£¡
À´½Óµã·Ö
......