按钮

张杨

请教各位高手，我在窗体中做了一个空间按钮[登陆]，怎样让他一单击此按钮就打开一个网址，代码怎样写？谢谢

dashllh

空间按钮？

dashllh

很简单，新建一个窗体，放入一个按钮。键入如下代码：
----------------------------------
Private Sub Form_Load()
  Command0.HyperlinkAddress = "http://www.djy-ncpzx.com"
End Sub
----------------------------------
点击后自动弹出http://www.djy-ncpzx.com的页面

张杨

是控件按钮

张杨

Private Sub zz_Click()

ShellEX "http://www.accessoft.com/reg/reg.asp?userid=10768"

End Sub
用这个老是提示SHELLEX函数未定义，请问该怎么写？

张杨

没人回答呀

dashllh

咦？我刚才回答了怎么没显示出来呢。很简单：
---------------------------------
Private Sub Form_Load()
  Command0.HyperlinkAddress = "http://djy-ncpzx.com"
End Sub
---------------------------------
看看能否打开主页？{:soso_e100:}

dashllh

我回复了，还是没显示

dashllh

1. 
   
2. Private Sub Form_Load()
   
3.   Command0.HyperlinkAddress = "http://djy-ncpzx.com"
   
4. End Sub
   

复制代码

dashllh

Private Sub Form_Load()
  Command0.HyperlinkAddress = "http://djy-ncpzx.com"
End Sub