一个用来创建特殊文件夹的东东，希望大家提出宝贵建议，呵呵！！

不错不错

我在vb.net2005中编译不能通过，提示错误：

警告 1 无法加载引用“AxSysInfoLib”的类型库。库没有注册。 (异常来自 HRESULT:0x8002801D (TYPE_E_LIBNOTREGISTERED)) WindowsApp
警告 2 无法加载引用“SysInfoLib”的类型库。库没有注册。 (异常来自 HRESULT:0x8002801D (TYPE_E_LIBNOTREGISTERED)) WindowsApp
警告 3 无法找到类型库“MSComctlLib”的包装程序集。 WindowsApp
警告 4 未能找到引用的组件“AxSysInfoLib”。
警告 5 未能找到引用的组件“MSComctlLib”。
警告 6 未能找到引用的组件“SysInfoLib”。

还是可以运行，不过窗体透明度的选项不能显示。

我运行没问题
请楼主按以下方式修改下代码试试
----------------------------------
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
x = Me.Width
y = Me.Height
TrackBar1.Value = 100
End Sub
改为
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
TrackBar1.Value = 100
End Sub
---------------------------------
Private Sub StatusStrip1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles StatusStrip1.Resize
Me.Width = x
Me.Height = y
End Sub
删除掉
----------------------------------
Form1的FormBorderStyle的属性改为Sizable
-------------------------------
运行后试试是否是你要的功能

一切正常~~~呵呵~

把窗体的不透明度设为0,此时就不容易在操作该软件了,
希望能在改进.