| 程序代码: | 
Dim range As Microsoft.Office.Interop.Word.Range
range = Me.Application.Selection.Range
range.Hyperlinks.Add(range, "http://www.tiancao.net")
| 程序代码: | 
    '插入超链接,换行
    Public Sub AddURL(ByVal Display As String, ByVal URL As String)
        Dim R As Microsoft.Office.Interop.Word.Range
        R = W.Selection.Range
        R.Hyperlinks.Add(W.Selection.Range, URL, , , Display)
    End Sub
[本日志由 tiancao1001 于 2019-06-02 05:24 PM 编辑]
|  | 
暂时没有评论
| 发表评论 - 不要忘了输入验证码哦! | 
 
 
 
				 用户登陆
 用户登陆 站点日历
 站点日历 站点统计
 站点统计 最新评论
 最新评论 
 
 Insert Hyperlink to Word in VB.NET   [ 日期:2019-06-02 ]   [ 来自:
 Insert Hyperlink to Word in VB.NET   [ 日期:2019-06-02 ]   [ 来自: