怎样得到一个系统盘的全名 不是字符 是全名 如:本地磁盘(C:)?

2016-01-29 12:39 1 1 收藏

怎样得到一个系统盘的全名 不是字符 是全名 如:本地磁盘(C:)?,怎样得到一个系统盘的全名,不是字符,是全名,如:本地磁盘(C:)?

【 tulaoshi.com - ASP.NET 】


Private Sub Command1_Click() Dim ShellApp, oPanel, FolderItem1, FolderItem2, oItem Set ShellApp = CreateObject("Shell.Application") Set oPanel = ShellApp.NameSpace(0)
Set FolderItem2 = Nothing For Each FolderItem1 In oPanel.Items If FolderItem1.Name = "我的电脑" Then Set FolderItem2 = FolderItem1.Getfolder: Exit For End If Debug.Print FolderItem1.Name Next
If FolderItem2 Is Nothing Then MsgBox "找不到项目!" Exit Sub End If
Set oItem = Nothing For Each oItem In FolderItem2.Items Debug.Print oItem.Name NextEnd Sub
输出结果如下:
控制面板3.5 软盘 (A:)WINDOWS98 (C:)程序 (D:)本地磁盘 (E:)数据备份 (F:)光盘 (G:)

来源:http://www.tulaoshi.com/n/20160129/1487056.html

延伸阅读
标签: 电脑入门
硬盘图标怎么改?对于很多电脑爱好者来说,可能会觉得我的电脑里几个本地磁盘硬盘图标没什么个性,看多了觉得图标好丑。如果你也无法容忍这些Windows自带硬盘图标的话,下面图老师小编教大家自定义硬盘图标吧。 1,首先要找到.ico的图标素材,存放在要更改分区根目录,命名为a.ico。图片素材大家可以去一些素材网或者百度图库找找,一般可以...
标签: 电脑入门
有用户后反应文件夹都可以隐藏,系统盘能不能限制,让别人不能访问呢?答案是可以的,只要你根据以下教程操作,就能限制驱动盘的访问权限了。 1、 按下Win+R键,输入gpedit.msc,启动组策略编辑器; 2、 在组策略编辑器中依次进入"用户配置→管理模板→Windows组件→Windows资源管理器"; 3、 在右边找到防止从'我的...
标签: 磁盘光盘
系统盘刻录光盘教程 现在网上有着许多电脑爱好者制作的操作系统或者备份喜欢的系统,对于广大用户来说都有各自忠于的系统,但是对于一些珍藏系统的爱好者就经常提出一个问题如何刻录系统盘?为了方便这些爱好者,特别做出一个使用Nero  9.0 刻录的教程给大家。 首先我们要准备2件事情: 第一:Nero  9.0绿色移动版(支持...
标签: 浏览器
IE浏览器地址栏里显示本地磁盘   很早以前就发现在IE浏览器的地址栏里面有时候会出现本地磁盘的盘符,感到很奇怪,是什么原因造成的?一定是朋友在使用我的电脑的某种操作才造成的,那过程是什么?于是在电脑上操作n次都没有成功。到网上去搜,几乎所有答案都是如何去掉IE浏览器地址栏里面会显示本地磁盘的问题,还说这是IE和explorer共...
看外貌来判断 单身的女生一般都不会过于注重自己的外貌。因为基本上没有人会看你的外貌,女生一般打扮都是因为有自己在意的男生。如果一个女生特别的邋遢,特别不注意自己的形象,那就证明她是没有男朋友的。 从她的饮食来判断 如果你跟这个女生吃饭的时候,这个女生从来不节制自己的食欲,吃的特别特别的多。那么证明你在这...

经验教程

103

收藏

50
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部