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文件读取

推荐阅读

收集反馈意见的渠道和方法

宽带账号是什么宽带账号是什么格式

水泡金鱼怎么养？水泡金鱼的饲养方法

心情不爽，且莫消沉

黑五什么时候结束电商黑五什么时候开始，电商黑五什么时候开始卖

关于mysql同时进行读写速度慢的信息

安卓平板自动开关机,三星平板电脑重启时会自动开关机

林内热水器怎么显示屏不亮如何解决,这几招教给你

炒紫苏子的功效与作用及药用价值

除夕是几月几日除夕简单介绍

违章代码7319是什么意思

p2p直播源检测智能电视如何看p2p直播源，p2p节目源如何添加

ping 回包分析,Ping命令结果分析

巴厘纱是什么面料纱是什么面料

晚礼服简笔画

如何让自己敢于当众讲话（）

光遇冥龙怎么驯服

原因和解决方法电脑未建立以太网wifi或手机网络数据连接是什么意思

36岁女,油性皮肤,毛孔粗大,有细纹,皮肤黄,用什么样护肤品？

廙组词廙组词有哪些