VB.NET超鏈接實現方法介紹
作者：佚名
VB.NET超鏈接的實現，在實際編寫中是非常常見的一種操作步驟。不過，初學者在應用這一操作時需要注意一些細節，避免出錯。
VB.NET超鏈接的實現，對于大部分初學者來說還是比較容易的。我們可以通過本文給出的相關代碼編寫的解讀，并對其進行實際編寫，來充分掌握這一應用技巧，方便我們以后的應用，提高編程效率。
在學習VB.NET超鏈接的實現方法之前，首先讓我們了解這門語言的特點：
1.代碼托管。被托管的代碼享受.netframework提供的安全保障和垃圾回收機制，但是這也同時表明，你的程序被框在Framework里面了。API變得不太方便。
2.強大的面向對象特性?，F在VB7已經是一個完全的面向對象程序。
現在VB7已經支持類的各種特性：繼承，函數的覆蓋，重載，虛擬，隱藏……
3.功能強大，程序界面更標準。
4.程序代碼結構化更強，開發環境舒適體貼。
VB.NET超鏈接前，首先需要新建立一個模塊
然后再其中添加如下代碼 ：
- Option Explicit
- Public Const email = "support
@online.com"- Public Const URL = "http://
blog.csdn.net/flm2003/"- Public 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- Public Const SW_SHOWNORMAL = 1
- Public Sub gotoweb()
- Dim Success As Long
- Success = ShellExecute(0&,
vbNullString, URL, vbNullString,
"C:", SW_SHOWNORMAL)- End Sub
- Public Sub sendemail()
- Dim Success As Long
- Success = ShellExecute(0&, vbNullString,
"mailto:" & email, vbNullString,
"C:", SW_SHOWNORMAL)- End Sub
接著就簡單不過了！
在你所要進行超連接的窗體中，如實現LABEL的超連接
那就在LABEL的CLICK事件中加入 gotoweb或sendemail 即可完成VB.NET超鏈接！
【編輯推薦】
責任編輯：曹凱
來源：
zdnet.com.cn
