在驅動器的根目錄之下建立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
運行程序，選定圖標後，打開“我的電腦”，點擊“查看”-“刷新”，即可看到效果。->
