VB.NET超链接实现方法介绍

开发 后端
VB.NET超链接的实现,在实际编写中是非常常见的一种操作步骤。不过,初学者在应用这一操作时需要注意一些细节,避免出错。

VB.NET超链接的实现,对于大部分初学者来说还是比较容易的。我们可以通过本文给出的相关代码编写的解读,并对其进行实际编写,来充分掌握这一应用技巧,方便我们以后的应用,提高编程效率。

在学习VB.NET超链接的实现方法之前,首先让我们了解这门语言的特点:

1.代码托管。被托管的代码享受.netframework提供的安全保障和垃圾回收机制,但是这也同时表明,你的程序被框在Framework里面了。API变得不太方便。

2.强大的面向对象特性。现在VB7已经是一个完全的面向对象程序。

现在VB7已经支持类的各种特性:继承,函数的覆盖,重载,虚拟,隐藏……

3.功能强大,程序界面更标准。

4.程序代码结构化更强,开发环境舒适体贴。

VB.NET超链接前,首先需要新建立一个模块

然后再其中添加如下代码 :

  1. Option Explicit  
  2. Public Const email = "support
    @online.com"
     
  3. Public Const URL = "http://
    blog.csdn.net/flm2003/"
     
  4. 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  
  5. Public Const SW_SHOWNORMAL = 1 
  6. Public Sub gotoweb()  
  7. Dim Success As Long  
  8. Success = ShellExecute(0&, 
    vbNullString, URL, vbNullString,
     "C:", SW_SHOWNORMAL)  
  9. End Sub  
  10. Public Sub sendemail()  
  11. Dim Success As Long  
  12. Success = ShellExecute(0&, vbNullString, 
    "mailto:" & email, vbNullString, 
    "C:", SW_SHOWNORMAL)  
  13. End Sub 

接着就简单不过了!

在你所要进行超连接的窗体中,如实现LABEL的超连接

那就在LABEL的CLICK事件中加入 gotoweb或sendemail 即可完成VB.NET超链接!

【编辑推荐】

  1. VB.NET结构化异常相关解决技巧分享
  2. 深入探讨VB.NET创建临时文件操作方法
  3. VB.NET公共运行环境配置要点解析
  4. VB.NET对象克隆的应用法则
  5. VB.NET集合存储内容解析

 

责任编辑:曹凯 来源: zdnet.com.cn
相关推荐

2010-01-15 19:17:23

2010-01-07 16:51:56

VB.NET窗体钩子

2010-01-15 10:56:50

VB.NET继承实现多

2010-01-07 15:25:11

VB.NET数组

2010-01-22 10:41:33

VB.NET声明结构

2009-11-10 12:42:47

VB.NET Prin

2010-01-12 10:40:58

VB.NET数据库压缩

2010-01-21 13:34:56

VB.NET删除文件夹

2010-01-15 15:26:46

VB.NET自定义类型

2010-01-21 17:58:40

VB.NET List

2010-01-08 13:35:35

VB.NET写Log方

2010-01-08 18:31:45

VB.NET历史菜单

2010-01-19 10:03:35

VB.NET Labe

2010-01-07 15:49:10

VB.NET DoLoop

2010-01-14 17:52:54

VB.NET显示系统信

2010-01-19 18:37:24

VB.NET内存占用

2010-01-20 17:47:54

VB.NET注释

2010-01-07 18:17:00

VB.NET连接SAP

2009-10-28 09:55:29

VB.NET MyCl

2010-01-21 17:48:25

VB.NET Sing
点赞
收藏

51CTO技术栈公众号