VB设计一应用程序

来源:百度知道 编辑:UC知道 时间:2024/06/06 19:56:50
设计一应用程序,要求如下:
(1)运行时名为form1的窗体上有一行文字"欢迎光临"(楷体,小二)以30 Twip/50ms的速度从右向左滚动,当超出窗体左边界时,重新从窗体右边界开始继续从右向左滚动;
(2)单击窗体上"配置计算机"按钮,即进入名为form2的计算机配置界面;
(3)用户在form2中配置完计算机后,单击"确定"按钮,则所有配置信息显示在右面的list1中(注意:文本框后面的单位也要加上);
(4)单击form2上的"返回"按钮,则返回主界面;
(5)单击form1"结束"按钮,则结束程序运行。

1.

private sub form_load()

timer1.interval=100

end sub

private sub timer1_timer()

label1.left=label1.left-100

if label1.left<=0 then label1.left=form1.width

end sub

2.form1窗体上的command1命令按钮

private sub command1_click()

form2.show

form1.hide

end sub

3.form2窗体上的command1命令按钮

private sub command1_click()

list1.additem text1.text & label1.caption

list1.additem text2.text & label2.caption

end sub

4.

Private Sub Command2_Click()

Form1.Show

Form2.Hide

End Sub

5. 

private sub command2_click()

end 

end sub

朋友,没办法,只有放一张图片,我还有几张放不进去,如果你有什么不懂的发消息给我