十年网站开发经验 + 多家企业客户 + 靠谱的建站团队
量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决
首先使用 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.Text + ds(i).DriveType.ToString + " " '驱动器类型
TextBox1.Text = TextBox1.Text + ds(i).Name + " " '盘符(驱动器名)
TextBox1.Text = TextBox1.Text + ds(i).IsReady.ToString + " " '是否就绪
If ds(i).IsReady = True Then
TextBox1.Text = TextBox1.Text + ds(i).VolumeLabel + " " '卷标
TextBox1.Text = TextBox1.Text + ds(i).TotalSize.ToString + " " '驱动器容量
TextBox1.Text = TextBox1.Text + ds(i).TotalFreeSpace.ToString '驱动器可用容量
End If
TextBox1.Text = TextBox1.Text + vbNewLine
Next
将D:\图书管理系统\数据库.mdb路径写成相对路径,不要写成绝对路径。如果数据库.mdb与你的程序文件在同一个目录的话,写成“数据库.mdb”就好了。
一般是6CD的版本,1,2是VS的安装盘,3是系统必备组件安装盘,4,5,6是MSDN的安装盘,顺序有可能不太一样,你可以自己确定一下哪张盘是什么的。然后放入VS安装盘第一张,会先检测系统必备,会要求你装什么之类的,这时你放入系统必备组件安装盘,它会自动安装需要的组件,之后就可以正常安装VS了。祝好运。