小伟
路人甲
路人甲
  • 注册日期2004-05-19
  • 发帖数126
  • QQ
  • 铜币77枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:1566回复:3

请教AO问题

楼主#
更多 发布于:2004-06-29 17:01
请问各位大虾,在AO的二次开发中,制作的UICONTROLBUTTON如何链接HTML或者WORD之类的文档,最好是给我一些源代码,谢谢了
[此贴子已经被作者于2004-6-29 17:03:37编辑过]
喜欢0 评分0
结束不是我要的结果,却成了彼此唯一的出口!!!!!!!!
destnity
路人甲
路人甲
  • 注册日期2004-03-25
  • 发帖数341
  • QQ
  • 铜币272枚
  • 威望0点
  • 贡献值0点
  • 银元0个
1楼#
发布于:2004-06-30 09:54
<P>测试过了,可以成功执行。看看对你有没有帮助。</P><P>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</P><P>Private Sub UIButtonControl1_Click()
Dim url As String
url = "<a href="http://www.163.com" target="_blank" >http://www.163.com</A>"
gotoweb (url)
End Sub</P><P>Public Sub gotoweb(url As String)
Dim Success As Long</P><P>Success = ShellExecute(0;, vbNullString, url, vbNullString, "C:\", SW_SHOWNORMAL)</P><P>End Sub</P>
签 名: 不能超过 250 个字符 文字将出现在您发表的文章的结尾处。
举报 回复(0) 喜欢(0)     评分
小伟
路人甲
路人甲
  • 注册日期2004-05-19
  • 发帖数126
  • QQ
  • 铜币77枚
  • 威望0点
  • 贡献值0点
  • 银元0个
2楼#
发布于:2004-06-30 11:03
太好了,谢谢
结束不是我要的结果,却成了彼此唯一的出口!!!!!!!!
举报 回复(0) 喜欢(0)     评分
sulh-000
路人甲
路人甲
  • 注册日期2005-03-10
  • 发帖数70
  • QQ
  • 铜币242枚
  • 威望0点
  • 贡献值0点
  • 银元0个
3楼#
发布于:2005-04-04 03:18
<img src="images/post/smile/dvbbs/em02.gif" />
举报 回复(0) 喜欢(0)     评分
游客

返回顶部