建站
咨詢(xún)
售后
建站咨詢(xún)
新聞中心
這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷(xiāo)解決方案
VB.NET超鏈接實(shí)現(xiàn)方法介紹
VB.NET超鏈接的實(shí)現(xiàn)，對(duì)于大部分初學(xué)者來(lái)說(shuō)還是比較容易的。我們可以通過(guò)本文給出的相關(guān)代碼編寫(xiě)的解讀，并對(duì)其進(jìn)行實(shí)際編寫(xiě)，來(lái)充分掌握這一應(yīng)用技巧，方便我們以后的應(yīng)用，提高編程效率。
在學(xué)習(xí)VB.NET超鏈接的實(shí)現(xiàn)方法之前，首先讓我們了解這門(mén)語(yǔ)言的特點(diǎn)：
1.代碼托管。被托管的代碼享受.netframework提供的安全保障和垃圾回收機(jī)制，但是這也同時(shí)表明，你的程序被框在Framework里面了。API變得不太方便。
2.強(qiáng)大的面向?qū)ο筇匦浴，F(xiàn)在VB7已經(jīng)是一個(gè)完全的面向?qū)ο蟪绦颉?/p>
現(xiàn)在VB7已經(jīng)支持類(lèi)的各種特性：繼承，函數(shù)的覆蓋，重載，虛擬，隱藏……
3.功能強(qiáng)大，程序界面更標(biāo)準(zhǔn)。
4.程序代碼結(jié)構(gòu)化更強(qiáng)，開(kāi)發(fā)環(huán)境舒適體貼。
VB.NET超鏈接前，首先需要新建立一個(gè)模塊
然后再其中添加如下代碼 ：
- 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
接著就簡(jiǎn)單不過(guò)了！
在你所要進(jìn)行超連接的窗體中，如實(shí)現(xiàn)LABEL的超連接
那就在LABEL的CLICK事件中加入 gotoweb或sendemail 即可完成VB.NET超鏈接！
【編輯推薦】
- VB.NET結(jié)構(gòu)化異常相關(guān)解決技巧分享
- 深入探討VB.NET創(chuàng)建臨時(shí)文件操作方法
- VB.NET公共運(yùn)行環(huán)境配置要點(diǎn)解析
- VB.NET對(duì)象克隆的應(yīng)用法則
- VB.NET集合存儲(chǔ)內(nèi)容解析
分享文章：VB.NET超鏈接實(shí)現(xiàn)方法介紹
網(wǎng)站地址：http://www.5511xx.com/article/djigpeh.html
