VBÈçºÎ½øÈëinternet
Çë½Ì£¡ÈôÒª×öµ½µãcommand1 ¾ÍÄÜ´ò¿ªInternet ²¢ÄܽøÈëÒ»¸öÖ¸¶¨µÄÍøÖ· ±ÈÈçwww.163.com »òÕßÊÇIPµØÖ·¡£Ð»Ð»£¡
VB code:
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Private Sub Command1_Click()
ShellExecute hwnd, "open", "www.163.com ", "", "", 1
End Sub
Private Sub Command1_Click()
Dim ie As Object
Set ie = CreateObject("INTERNETEXPLORER.APPLICATION")
ie.Visible = True
ie.Navigate "http://www.163.com"
End Sub
VB code:
Private Sub Command1_Click()
Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE http://www.baidu.com/", vbNormalFocus
End Sub
лл£¡
ÎÒÓÐÒ»¸öÏë·¨£¬ÏëÇë½Ìһϣ¬¼ÙÈôÎÒÓÃVB±àдÁ˸ö³ÌÐò£¬·ÅÔÚһ̨·þÎñÆ÷ÉÏ£¬ÄÜ·ñʵÏÖÎÒÁí±àд¸ö¿Í»§¶Ë³ÌÐò£¬»òÕßʲô±ðµÄ³ÌÐò£¬ÄÜ·ÃÎʺͲÙ×÷ÎÒ·ÅÔÚ·þÎñÆ÷ÉϵijÌÐò¡£·þÎñÆ÷×°µÄÊÇserver 2000.¶àлָµ¼£¡
ÓÃMicrosoft Internet Transfer Control ¿Ø¼þ À´ÊµÏÖËüÃǵÄͨОͿÉÒÔÁË¡£ÄãÍøÉÏËÑÒ»ÏÂËüµÄʹÓã¬Ó¦¸Ã¿
Ïà¹ØÎÊ´ð£º
¿´ÁËһЩVB iniÎļþдÈë¶ÁÈ¡µÄ·½·¨ µ«ÊÇ»¹ÊDz»ÖªµÀÔõôд£¬ÉÏÃæÐ´Á˺ܳ¤ ºÜ¶à£¬µ«ÊÇÎÒ²»ÖªµÀÔõôÓã¬ÎÒÏëÎÊÒ»ÏÂÔõÑùд²ÅÄÜʵÏÖÔÚTEXT1ÖÐд×Ö£¬È»ºóµãCommand1Ìá½»£¬È»ºóTEXT1ÀïÃæµÄÊý×Ö¾Íд½øINIÀïÃæ[Section]µÄKey1 ......
°ïÎÒ¸Ä¸Ä ÎÒ×ܾõµÃÓÐÎÊÌâ
Type ID
number As Single
score As Integer
name As String * 6
End Type
Dim personl As ID, i%
Private Sub Command1_Click()
i = 0
&nbs ......
VBÔõÑù»ñµÃÊó±ê´¦µÄ³¬¼¶Á¬½ÓÄØ£¿
ÔÚWebBrowser¿Ø¼þÖÐÓÐÕâÑùÒ»¸öʼþ:StatusTextChange(index As Integer, ByVal Text As String)
ËüµÄText²ÎÊýÕýÊÇÊó±ê´¦µÄ³¬¼¶Á¬½Ó,µ«ÎÊÌâÊÇÈç¹ûÎÒµÄä¯ÀÀÆ÷Õýà ......
Ö»»áVB£¬µ±¹ý1ÄêµÄVB³ÌÐòÔ±
ÏÖÔÚÏëÓëʱ¾ã½ø£¬Ñ§ÄÄÃÅÓïÑÔºÃÄØ
vb.net ,C# ,Java, »¹ÊÇVC++?
ÄÄÃÅÄܹ»¿ìËÙµÄÉÏÊÖ£¬²¢×ªÐÍ£¿
C#£¬winform»òwebform¶¼¿ÉÒÔ
vb.net
VC++
ÒýÓÃ
VC++
Âé·³ÄÜ˵¸öÀíÓÉô¡£¡£¡ ......
ΪʲôÎÒÓÃform.showºÍform.hide¶à´ÎÁ¬½ÓÁËÁ½¸ö´°¿ÚÖ»ÄÜ»¥»»Á´½ÓÁ½´Î°¡£¿
´úÂë¿´¿´
ÕÕµÀÀíform.show û´ÎÊýÏÞ¶¨µÄ°É
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
ÒýÓÃ
ÎÒÒ²¿ì·èÁË¡£
Â¥Ö÷ÖªµÀÔõô·¢Ìùô£¿
Â¥Ö÷Ò² ......