更换驱动器的图标

悔恨的自己zzq

悔恨的自己zzq

2016-02-19 13:18

最近很多朋友喜欢上设计,但是大家却不知道如何去做,别担心有图老师给你解答,史上最全最棒的详细解说让你一看就懂。
在驱动器的根目录之下建立Autorun.inf文件可以更改该驱动器的图标,其格式为:
  
  [autorun]
  ICON=驱动器名 路径 Icon图标文件全名
  
  基于这样的原理,我们可以在VB程序中轻松实现此任务。以更改驱动器D的图标为例:新建标准EXE工程,添加一个按钮和一个公共对话框,然后拷贝如下代码。
  
  PrivateSubCommand1_Click()
  DimsAsString
  WithCommonDialog1
  .Filter="(*.ico)|*.ico"
  .DialogTitle="查找图标"
  .ShowOpen
  s=.FileName
  EndWith
  
  Open"d:autorun.inf"ForOutputAs#1
  Print#1,"[autorun]" vbCrLf "ICON=" s
  Close#1
  EndSub
  
  PrivateSubForm_Load()
  Command1.Caption="更换驱动器图标"
  EndSub
  
  运行程序,选定图标后,打开“我的电脑”,点击“查看”-“刷新”,即可看到效果。->

展开更多 50%)
分享

猜你喜欢

更换驱动器的图标

编程语言 网络编程
更换驱动器的图标

磁带驱动器的使用

Linux Linux命令 Linux安装 Linux编程 Linux桌面 Linux软件 Linux内核 Linux管理
磁带驱动器的使用

s8lol主宰符文怎么配

英雄联盟 网络游戏
s8lol主宰符文怎么配

Bitlocker驱动器加密怎么用

电脑网络
Bitlocker驱动器加密怎么用

Delphi编程检测驱动器类型

编程语言 网络编程
Delphi编程检测驱动器类型

lol偷钱流符文搭配推荐

英雄联盟 网络游戏
lol偷钱流符文搭配推荐

win10设备和驱动器里无效图标怎么删除

windows10
win10设备和驱动器里无效图标怎么删除

处理驱动器和文件夹

ASP
处理驱动器和文件夹

lolAD刺客新符文搭配推荐

英雄联盟
lolAD刺客新符文搭配推荐

Jquery 滑入滑出效果实现代码

Jquery 滑入滑出效果实现代码

全屏幕编辑软件的编写(C语言)05

全屏幕编辑软件的编写(C语言)05
下拉加载更多内容 ↓