范例解读VB.NET获取环境变量

开发 后端
VB.NET获取环境变量的方法在实际编程中是经常会遇到的一个重要操作。我们会通过两个范例来为大家详细解读这一操作的具体应用技巧。

VB.NET编程语言的使用范围非常广泛,可以帮助开发人员处理各种程序中的需求,而且还能对移动设备进行操作。我们今天要教给大家的则是有关VB.NET获取环境变量的方法。首先让大家一起看看几个应用范例,方便大家理解。#t#

Windows系统将很多重要的信息(比如计算机名和用户名)存储在环境变量中。访问这些变量来获取这些信息是很多程序中迟早要用到的功能,在这篇文章中,我将向您介绍如何使用VB.NET来获取环境变量的信息。

为了获取环境变量的信息,您需要获取相应的环境变量数值,在VB.NET中,您可以使用System.Environment类中的两个方法GetEnvironmentVariable和GetEnvironmentVariables。以下的例子为您展示了如何使用这些与环境变量相关的方法。

VB.NET获取环境变量例1

在列表A中,我定义了一个名为strComputerName的变量,用它来存储计算机的名称,我使用了Environment类中的GetEnvironmentVariable方法来获取所需要的环境变量信息,这个例子的结果是"COMPUTERNAME"。

 

  1. Private Sub GetEnvironmentVariable()  
  2. Dim strComputerName As String  
  3. strComputerName = Environment.
    GetEnvironmentVariable("COMPUTERNAME")  
  4. MessageBox.Show(strComputerName)  
  5. End Sub 

 

VB.NET获取环境变量例2

在这个例子中,我向表单中添加了一个列表控件ListBox1,参见列表B,我将变量dictEntry定义为一个DictionaryEntry,然后我我使用了Environment类中的GetEnvironmentVariable方法创建了一个循环来遍历所有的环境变量。对每一个条目,我都在列表框中添加一行写入条目的键值,当运行这些代码的时候,您会看到图1中的结果。

 

  1. Private Sub GetEnvironment
    Variables()  
  2. Dim dictEntry As System.
    Collections.DictionaryEntry  
  3. ForEach dictEntry In Environment
    .GetEnvironmentVariables()  
  4. ListBox1.Items.Add("Key: " & 
    (dictEntry.Key.ToString()) & 
    " Value: " & _  
  5. (dictEntry.Value.ToString()))  
  6. Next  
  7. End Sub 

VB.NET获取环境变量的相关解读就为大家介绍到这里。

责任编辑:曹凯 来源: CSDN
相关推荐

2010-01-08 10:37:50

VB.NET数据库

2009-08-19 16:38:30

VB.NET接口范例

2010-01-13 15:01:13

VB.NET操作MyS

2010-01-13 09:31:39

VB.NET窗体打印

2010-01-14 09:55:06

VB.NET IEnu

2010-01-18 16:58:29

VB.NET Over

2010-01-14 17:41:57

VB.NET变量范围

2010-01-21 16:37:56

VB.NET变量声明

2009-10-21 10:05:30

VB.NET运行环境

2010-01-08 10:48:05

VB.NET多线程

2010-01-19 17:03:25

VB.NET可执行语句

2010-01-08 14:50:47

VB.NET测试硬盘速

2009-10-15 13:06:12

VB.NET Shar

2010-01-08 18:16:52

VB.NET变量

2009-10-12 14:13:00

VB.NET使用局部变

2011-05-20 16:34:35

VB.NET

2009-10-28 09:47:01

VB.NET局部静态变

2010-01-12 18:28:28

VB.NET共享变量

2010-01-22 11:02:30

VB.NET创建新变量

2009-10-29 13:38:05

VB.NET Shar
点赞
收藏

51CTO技术栈公众号