个性化你的Windows 7 Taskbar Thumbnail( 五 ) _云知道

maxSizeTextBox.Text　=　"200"
miniSizeTextBox.Text　=　"200"
xsTextBox.Text　=　"16"
ysTextBox.Text　=　"16"
tmTextBox.Text　=　"16"
bmTextBox.Text　=　"16"
lmTextBox.Text　=　"16"
rmTextBox.Text　=　"16"
dtTextBox.Text　=　"400"
"修改注册表后,重启explore.exe
Dim　Explorers()　As　Process　=　Process.GetProcessesByName("explorer")
For　Each　Explorer　As　Process　In　Explorers
Explorer.Kill()
Next
Process.Start("explorer.exe")
Explorers　=　Nothing
End　Sub
Private　Sub　mainForm_Load(ByVal　sender　As　System.Object,　ByVal　e　As　System.EventArgs)　Handles　MyBase.Load
maxSizeTextBox.Text　=　"200"
miniSizeTextBox.Text　=　"200"
xsTextBox.Text　=　"16"
ysTextBox.Text　=　"16"
tmTextBox.Text　=　"16"
bmTextBox.Text　=　"16"
lmTextBox.Text　=　"16"
rmTextBox.Text　=　"16"
dtTextBox.Text　=　"400"
On　Error　Resume　Next
maxSizeTextBox.Text　=　My.Computer.Registry.GetValue(path,　"MaxThumbSizePx",　Nothing).ToString
miniSizeTextBox.Text　=　My.Computer.Registry.GetValue(path,　"MinThumbSizePx",　Nothing).ToString()
xsTextBox.Text　=　My.Computer.Registry.GetValue(path,　"ThumbSpacingXPx",　Nothing).ToString()
ysTextBox.Text　=　My.Computer.Registry.GetValue(path,　"ThumbSpacingYPx",　Nothing).ToString()
tmTextBox.Text　=　My.Computer.Registry.GetValue(path,　"TopMarginPx",　Nothing).ToString()
bmTextBox.Text　=　My.Computer.Registry.GetValue(path,　"BottomMarginPx",　Nothing).ToString()
lmTextBox.Text　=　My.Computer.Registry.GetValue(path,　"LeftMarginPx",　Nothing).ToString()
rmTextBox.Text　=　My.Computer.Registry.GetValue(path,　"RightMarginPx",　Nothing).ToString()
dtTextBox.Text　=　My.Computer.Registry.GetValue("HKEY_CURRENT_USER/Software/Microsoft/Windows/CurrentVersion/Explorer/Advanced",　"ExtendedUIHoverTime",　Nothing).ToString
End　Sub
End　Class
程序界面:
出处：http://www.cnblogs.com/technology/
【个性化你的Windows 7 Taskbar Thumbnail】本文示例源代码或素材下载

个性化你的Windows 7 Taskbar Thumbnail( 五 )

推荐阅读

华禹P30试飞－外观篇

宝可梦探险寻宝凯西宾果数据胡地宾果数据介绍

在公司受伤怎么走工伤流程

滤芯和机油滤清器有什么区别?

高商誉股票什么意思

1920 1080是几k

可爱边框简笔画怎么画

青槐的寓意

孕妇禁忌教你如何安胎

胆结石按摩哪个位置胆结石患者可以按摩这10个穴位

汽车端子电路接触状态检查方法

葫芦底不能朝天什么意思，室内挂葫芦口朝上还是朝下

怎么人工喂小狗喝奶，狗狗喝奶的原则性问题

微信朋友圈可不可以看到来访次数

太阳能增压水泵呜呜响就是不上水

曲阜东站到丽水的高铁时刻表，曲阜到广东汕头的高铁多长时间