菜鸟请教,在VB中如何新建当前窗口。
Private Sub CommandButton2_Click()Set ix = CreateObject("InternetExplorer.Application")
'页面最大化
ix.Top = 0
ix.Height = 740
ix.Left = 0
ix.Width = 1024
ix.Visible = True '显示页面
'等候登陆
ix.Navigate "www.***.com" '登陆
如何在当前页面新建窗口,显示页面后使用页面“关闭”按钮关闭网页。
End Sub --------------------编程问答-------------------- 这个问题复杂吗?还是高人不再家。 --------------------编程问答-------------------- Private Sub Command1_Click()
Dim ix As Object
Set ix = CreateObject("INTERNETEXPLORER.APPLICATION")
With ix
.Visible = True
.Width = Screen.Width \ 15
.Height = (Screen.Height - 405) \ 15
.Left = 0: .Top = 0
.Navigate "http://www.baidu.com"
End With
End Sub
--------------------编程问答-------------------- 都是很好的建议! 值得学习
补充:VB , 控件