日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時間:8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
VB.NET調(diào)用IE幾種常見方法介紹

VB.NET編程語言為開發(fā)人員帶來了非常大的好處。virus構(gòu)建一個性能穩(wěn)定,安全牢固的開發(fā)環(huán)境等。那么在這里我們就為大家介紹一下有關(guān)VB.NET調(diào)用IE的兩種代碼編寫方法,希望能對大家有所幫助。#t#

VB.NET調(diào)用IE代碼示例:

  1. Dim p As New Process
  2. '獲得URL
  3. aURL = GetURL()
  4. '獲得IE路徑
  5. p.StartInfo.FileName = 
    System.Environment.
    GetFolderPath( _
  6. Environment.SpecialFolder.
    ProgramFiles).Trim() _
  7. & "\Internet Explorer\
    IEXPLORE.EXE"
  8. p.StartInfo.Arguments 
    = aDenURL
  9. '啟動IE
  10. 'p.Start(aDenURL)
  11. p.Start()
  12. '主程序開始等待IE結(jié)束
  13. p.WaitForExit()

另一種VB.NET調(diào)用IE的方法

 
 
 
  1. Imports System.Threading 
  2. Private Sub Button1_Click(ByVal 
    sender As System.Object, ByVal e 
    As System.EventArgs) Handles 
    Button1.Click
  3. Dim webobj As Object
  4. webobj = CreateObject("Internet
    Explorer.Application")
  5. With webobj
  6. .visible = True
  7. .Navigate2("http://www.google.co.jp/")
  8. Do While (.busy Or .readyState <> 4)
  9. Thread.Sleep(100)
  10. Loop
  11. .Document.f.q.Value = Me.TextBox1.Text
  12. .Document.f.btng.Click()
  13. End With
  14. MsgBox("completed.")
  15. End Sub

VB.NET調(diào)用IE的相關(guān)方法就為大家介紹到這里啦。


新聞標(biāo)題:VB.NET調(diào)用IE幾種常見方法介紹
標(biāo)題URL:http://m.5511xx.com/article/cciocph.html