注意:访问本站需要Cookie和JavaScript支持!请设置您的浏览器! • 打开购物车 • 查看留言 • 付款方式 • 联系我们 |
首页 | 电子入门 | 学单片机 | 免费资源 | 下载中心 | 商品列表 | 象棋在线 | 在线绘图 | 加盟五一 | 加入收藏 | 设为首页 |
选择分类:当前分类——加盟五一 相关联或者相类似的文章: VB中*网址*打开方法集合(650) 销售过程中的“黄灯法则”(650) 电子元器件使用须知(二)(650) JavaScript 对象与数组参考大全(650) DS1820使用中注意事项(650) COPY(650) 实用应急灯的制作 (649) 电子实验套件更多优秀的特点(649) 12. 可预置可逆4位计数器(649) 电子技术自立学习法(649) 小故事大道理(648) 本站收音功放多用板的IC资料(648) 电脑的耗电量也有大小不一(648) [讨论]议兴趣与学习(648) 商报:千万不要相信分红险!(648) 音响与女人的区别(647) 婚姻篇(647) 低频微弱信号的模拟预处理(647) 四电压比较器LM339的8个典型应用例子(647) 同在一个城市不见面 周迅李亚鹏感(646) 首页 前页 后页 尾页 本站推荐: | VB中*网址*打开方法集合 网址打开全方法集合: 1.基于start.exe +++++++++++++++++++源码1++++++++++++++++++++++ url="http://www.baidu.com" shell "start " & url,0 +++++++++++++++++++源码2++++++++++++++++++++++ url="http://www.baidu.com" shell "cmd.exe /c start " & url,0 2.基于文件浏览器(explorer.exe) +++++++++++++++++++源码+++++++++++++++++++++++ url = "http://www.baidu.com" Shell "explorer " & url, 0 3.基于IE浏览器的 +++++++++++++++++++源码1(使用IE对象)++++++++++ Dim Browser As Object url="http://www.baidu.com" Set Browser = CreateObject("InternetExplorer.Application") Browser.Visible = True Browser.Navigate (url) +++++++++++++++++++源码2++++++++++++++++++++++ Private Sub cmd1_Click() url = "http://www.baidu.com" exe = Environ("programfiles") & "\Internet Explorer\IEXPLORE.EXE" Shell exe & Space(1) & url, 1 End Sub 5.基于API的 ’API函数声明 : +++++++++++++++++++源码++++++++++++++++++++++ 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 Const SW_SHOWNORMAL = 1 ’函数返回值为大于32的整数表明成功执行调用,小于或等于32表明调用失’败。 ’例如: Dim Result Result = ShellExecute(0, vbNullString, "http://www.ccw.com.cn", vbNullString, vbNullString, SW_SHOWNORMAL) If Result <= 32 Then MsgBox "调用浏览器错误!", vbOKOnly + vbCritical, "错误:", 0 End If 6.基于WebBrowser控件的 +++++++++++++++++++源码++++++++++++++++++++++ url="http://www.baidu.com" WebBrowser1.Navigate url 1、 本站不保证以上观点正确,就算是本站原创作品,本站也不保证内容正确。 2、如果您拥有本文版权,并且不想在本站转载,请书面通知本站立即删除并且向您公开道歉! |
本站协议 |
版权信息 |
关于我们 |
本站地图 |
营业执照 |
发票说明 |
付款方式 |
联系方式
深圳市宝安区西乡五壹电子商行——粤ICP备16073394号-1;地址:深圳西乡河西四坊183号;邮编:518102 E-mail:51dz$163.com($改为@);Tel:(0755)27947428 工作时间:9:30-12:00和13:30-17:30和18:30-20:30,无人接听时可以再打手机13537585389 |