获取当前 URL VB.net - VBA

在许多情况下，我们需要在VB.net或VBA程序中获取当前URL。这可能是因为我们需要将URL保存到日志中，或者更新网页上的链接。在本文中，我们将介绍如何使用VB.net和VBA编程语言获取当前URL。

VB.net

使用Request对象获取当前URL

在VB.net中，我们可以使用Request对象获取当前URL。下面是一个演示如何获取当前URL的代码片段：

Dim currentUrl As String = Request.Url.AbsoluteUri

该代码将返回当前页面的完整URL。我们可以将其用于保存日志或更新链接。请注意，此方法适用于ASP.NET应用程序，而不适用于桌面应用程序。

使用WebBrowser控件获取当前URL

如果我们正在使用Windows桌面应用程序并希望获取当前URL，则可以使用WebBrowser控件。下面是一个演示如何获取当前URL的代码片段：

Dim currentUrl As String = WebBrowser1.Url.ToString()

该代码将返回当前WebBrowser控件中显示的URL。我们可以将其用于更新链接。

VBA

使用ActiveDocument对象获取当前URL

在VBA中，我们可以使用ActiveDocument对象获取当前URL。下面是一个演示如何获取当前URL的代码片段：

Dim currentUrl As String
currentUrl = ActiveDocument.FullName

该代码将返回活动文档的完整路径，其中包括文件名和扩展名。我们可以从中提取URL并将其用于保存日志或更新链接。

使用InternetExplorer对象获取当前URL

如果我们正在使用Windows桌面应用程序并希望获取当前URL，则可以使用InternetExplorer对象。下面是一个演示如何获取当前URL的代码片段：

Dim currentUrl As String
currentUrl = InternetExplorer1.LocationURL

该代码将返回InternetExplorer控件中显示的URL。我们可以将其用于更新链接。

结论

在VB.net和VBA中，我们可以使用不同的方式获取当前URL。我们可以使用Request对象、WebBrowser控件、ActiveDocument对象或InternetExplorer对象。我们可以根据我们的应用程序需求选择合适的方法。