DOC《一、案例背景信息》

1 Text3.Text = kola End Sub ? Private Sub Command4_Click() hamburger = Text1.Text chips = Text2.Text kola = Text3.Text total = hamburger *

12 + chips *

5 + kola *

3 Label5.Caption = "您的礼包总费用为:" & total & "元,谢谢!" End Sub ? Private Sub Command5_Click() hamburger =

0 chips =

0 kola =

0 Text1.Text =

0 Text2.Text =

0 Text3.Text =

0 End Sub ? Private Sub Text1_Change() hamburger = Text1.Text End Sub ? Private Sub Text2_Change() chips = Text2.Text ? End Sub ? Private Sub Text3_Change() kola = Text3.Text ? End Sub 7.保存工程,将窗体文件与工程文件均保存到"Point meal"文件夹下. 8.运行该程序-生成exe程序. ? 实践内容:

1、 模仿以上两个程序中任意一个,自行设计一个程序.

2、 给你的程序取一个名字,并将工程保存在该文件夹中

3、 生成exe

4、 要求利用的控件有comandbutton,textbox等,用到的知识为顺序赋值语句,输入,输出等顺序结构程序.

5、 请在下课前提交至个人空间,最迟下周一前给老师发邮件.