黑板擦多功能

多功能桌面

本程序包括五个窗体其中有：

1、主窗体是基本的界面显示，

2、控制面板窗体拥有电脑基本的控制程序，

3、网络搜索窗体相当于浏览器，

4、注册码计算窗体，

5、电脑程序监测。主窗体

1我的电脑、2控制面板、3网络搜索器、4注册码计算、5电脑程序监测代码介绍：

privatesubcommand1_click

form3.show

endsub

privatesubcomputer_click

form1.show

endsub

privatesubcontrol_click

controlpanel.show

endsub

privatesubform_load

move（screen.widthheight）\2'屏幕中间显示窗体

endsub

privatesubgetpassword_click

frmmain.show

endsub

privatesubinternet_click

sousuo.show

endsub

privatesublook_click

form3.show

endsub

privatesubzhuce_click

form2.show

endsub

本窗体主要功能是打开其它窗体，且在屏幕中间显示界面。

控制面板

包涵电脑控制面板中的部分功能。

代码介绍

optionexplicit

privatesubcancel_click

unloadme'exittheprogram

endsub

privatesubform_load

move（screen.widthheight）\2'屏幕中间显示窗体endsub

privatesubicon_click（indexasinteger）

ifindex=1then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundllappwiz.cpl，，1"）elseifindex=2then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundlltimedate.cpl"）elseifindex=3then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundlldesk.cpl，，0"）elseifindex=4then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundllinetcpl.cpl，，0"）elseifindex=5then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundlljoy.cpl"）

elseifindex=6then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundllmain.cpl@1"）elseifindex=7then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundllmodem.cpl"）elseifindex=8then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundllmain.cpl@0"）elseifindex=9then

callcontrolpanels（"rundll32.exeshell32.dll，control_rundllmmsys.cpl，，0"）elseifindex=10then