- 17
- 0
- 约1.81万字
- 约 11页
- 2017-05-10 发布于贵州
- 举报
第1章
1. 按要求设置窗体属性
2.在窗体上建立一个标签Label1。程序代码如下:
Private Sub Form_Click()
Label1.Caption = 你单击了窗体
End Sub
Private Sub Form_DblClick()
Label1.Caption = 你双击了窗体
End Sub
3. 在窗体上建立两个文本框Text1(输入数)、Text2(输出数)和一个命令按钮Command1。两个文本框的Text属性均为空。
Private Sub Command1_Click()
Dim x As Single
x = Val(Text1.Text)
Text2.Text = 15 * x
End Sub
第2章
1~3题:按要求完成操作练习。
4. Private Sub Command1_Click() 最大化按钮
Form1.WindowState = 2 最大化
End Sub
Private Sub Command2_Click() 还原按钮
Form1.WindowState = 0 还原
End Sub
Private Sub Command3_Click() 最小化按钮
您可能关注的文档
- 《Access数库实用教程》第十章图书馆管理系统.ppt
- 《Altium esigner winter 09电路设计案例教程》-第17-18讲 第9章 数码管显示电路的PCB设计.ppt
- 《Altium_esigner_winter_09电路设计案例教程》-第9-10讲_创建多部件元件.ppt
- 《Altium_esigner_winter_09电路设计案例教程》-第17-18讲_第9章_数码管显示电路的PCB设计.ppt
- 《ARM嵌入式系基础教程》试题.doc
- 《Authorwre7.0中文版多媒体制作教程》_4.ppt
- 《Authorwre7.0中文版多媒体制作教程》_5.ppt
- 《Authorwre7.0中文版多媒体制作教程》_14.ppt
- 《AUTOCAD004机械制图零件图集》——轴类零件部分(001-050).doc
- 《C 面向对象序设计》习题与上机解答-提交稿-陈维兴.doc
原创力文档

文档评论(0)