您的位置：程序门 -> vb -> 网络编程

输入问题？

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

输入问题？

发表于：2007-03-03 09:51:49 楼主

vb怎么连接到网页刚刚学习请帮忙

发表于：2007-03-03 10:33:401楼得分:0

private declare function shellＥＸＥＣute lib "shell32.dll " alias "shellＥＸＥＣutea " （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
dim a as long
private sub command1_click（)
a = shellＥＸＥＣute（0&, vbnullstring, "d:\2003.mdb ", vbnullstring, vbnullstring, vbnormalfocus)
end sub

private sub label1_click（index as integer)

doevents
if index = 0 then
a = shellＥＸＥＣute（0&, vbnullstring, "http://sohu.com ", vbnullstring, vbnullstring, vbnormalfocus)
end if
if index = 1 then
a = shellＥＸＥＣute（0&, vbnullstring, "mailto:zou19820704@sohu.com ", vbnullstring, vbnullstring, vbnormalfocus)
end if
end sub

这样可以么?/是这个意思?

发表于：2007-03-03 10:52:242楼得分:0

谢谢你了

发表于：2007-03-03 11:09:263楼得分:0

当我打开一个网页的时候其他的网页就被关闭了
能不能在打开某一个网页的时候不关闭已经打开的网页

发表于：2007-03-03 11:15:514楼得分:0

private sub command1_click（)
shell "c:\program files\internet explorer\iexplore.exe www.csdn.net "
end sub

下一篇：vb中如何获取applet中的数据
上一篇：如何用vb程序连接远程access数据库

其他资讯