求助!!用V做B软件

来源：百度知道 编辑：UC知道 时间：2024/07/04 11:33:51
我想做一个VB软件
窗体有： Form1 两个
控键有：Command1 两个
Label1 两个
Text1
Image1 三个
Timer1
对象属性设置
Command1 Caption 检测CPU/内存
Command2 Caption 确定
Label1 Caption 未起动
Label2 Caption www.baidu.com
Text1 TEXT 为空
Timer1 不知道怎么设
事件是：我按Command2可以检测Text1是否有输入字符，按Label2可以跳到我设的网站www.baidu.com，按Command1可以检测到CPU的使用率和内存的使用情况，Image1-3有图片通过Timer1可以让图片动就像Flash一样可以动，当我按键盘ctrl+z时Label1的未起动变成启动然后跳到窗口FORM2还可以跳出http://LYCKJ.IK8.COM。
我的积分不多拉,因为我太.......

Public Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
private sun command2_click()
if text1.text<>"" then
'有字符输入
else
'无字符输入
end if
end sub
private sub label2_click()
Dim fg As String
fg = "http://www.baidu.com"
ret& = ShellExecute(Me.hwnd, "Open", fg, "", App.Path, 1)
end sub