vb.net获取c盘号 vbnet config文件读取 _获取

vb.net如何获取电脑中的所有盘符首先使用 System.IO.DriveInfo.GetDrives()获取System.IO.DriveInfo ，存入ds()
然后遍历ds，获取各个信息部分。
Dim ds() As System.IO.DriveInfo = System.IO.DriveInfo.GetDrives()
For i As Integer = 0 To ds.Length - 1
TextBox1.Text = TextBox1.Textds(i).DriveType.ToString" " '驱动器类型
TextBox1.Text = TextBox1.Textds(i).Name" " '盘符（驱动器名）
TextBox1.Text = TextBox1.Textds(i).IsReady.ToString" " '是否就绪
If ds(i).IsReady = True Then
TextBox1.Text = TextBox1.Textds(i).VolumeLabel" " '卷标
TextBox1.Text = TextBox1.Textds(i).TotalSize.ToString" " '驱动器容量
TextBox1.Text = TextBox1.Textds(i).TotalFreeSpace.ToString '驱动器可用容量
End If
TextBox1.Text = TextBox1.TextvbNewLine
Next
win7下vb.net 如何获取硬盘序列号Private Function 硬盘序列号() As String
Try
Dim myInfo As Microsoft.Win32.RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey("HARDWARE\DEVICEMAP\Scsi\Scsi Port 0\Scsi Bus 1\Target Id 0\Logical Unit Id 0")
硬盘序列号 = Trim(myInfo.GetValue("SerialNumber"))
Catch
Try
Dim myInfo As Microsoft.Win32.RegistryKey = My.Computer.Registry.LocalMachine.OpenSubKey("HARDWARE\DEVICEMAP\Scsi\Scsi Port 1\Scsi Bus 1\Target Id 0\Logical Unit Id 0")
硬盘序列号 = Trim(myInfo.GetValue("SerialNumber"))
Catch
硬盘序列号 = ""
End Try
End Try
End Function
试下vb.net获取c盘号，如果返回为空vb.net获取c盘号，则表示失败。
在本机win8win8.1有效vb.net获取c盘号，不过好像在有些机器上没用。
VB.NET获取目录文件夹名称【vb.net获取c盘号 vbnet config文件读取】先用System.IO.Directory.GetDirectories函数获取子目录的名称（包括其路径），再用System.IO.Path.GetFileName获取子目录的名称。下面是代码：
Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
For Each s In System.IO.Directory.GetDirectories("C:\Windows")
Console.WriteLine(System.IO.Path.GetFileName(s))
Next
End Sub
下面是部分输出：
Application Data
AppPatch
assembly
BOCNET
Boot
Branding
ConfigSetRoot
Cursors
Debug
DigitalLocker
Downloaded Installations
Downloaded Program Files
ehome
en-US
Fonts
Globalization
Help
...
可能有更简洁的方法，你可以到MSDN看看
System.IO.Directory.GetDirectories：
System.IO.Path.GetFileName：
通用 I/O 任务：
vb.net 获取局域网计算机的当前用户名和计算机型号等信息Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Private Sub GetName()
Dim sJM As String
Dim sMC As String
Dim sIP As String
Dim s As String
s = String(128, Chr(0))
GetComputerName s, Len(s)
s = UCase(Left(s, InStr(1, s, Chr(0)) - 1))
sJM = s'计算机名称
s = String(128, Chr(0))
GetUserName s, Len(s)
s = UCase(Left(s, InStr(1, s, Chr(0)) - 1))
sMC = s‘当前用户名称
End Sub
'用这种方法在远程获得再发回本机就可以吧
'取计算机型号暂时不会
vb.net获取c盘号的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vbnet config文件读取、vb.net获取c盘号的信息别忘了在本站进行查找喔。

vb.net获取c盘号 vbnet config文件读取

推荐阅读

学dj在哪里学比较好 dj学多久

宝宝|宝宝白天出生和晚上出生，差距很大

毛球殿下除菌猫砂靠谱吗？DOWNYBALL毛球殿下除菌猫砂好吗

爱普生l805废墨怎么排出来

如何做优雅女生观后感如何做优雅女生，如何做优雅女生作文

艾叶晒干之前要洗吗

过失损坏交通设施有怎样刑事处罚

抵抗力差吃什么维生素抵抗力差吃什么

把茄子炸的脆脆的是什么菜

饲料保存方法饲料储存方法

机动车怎么审车机动车怎么审

十大奢侈品运动鞋品牌 brooks是什么品牌

10克甘草大约是多少片

俄罗斯女人的体味那么难闻,她们有没有想过消除身上的体味？

人参发芽还能吃吗

88vip不到1000淘气值会自动续费吗

脑袋秀逗

火腿切开后保存方法火腿切开后如何保存方法

小孩皮肤过敏怎么办家长应做好这几点

痰湿阻滞怎么调理