上机题目:课后请同学们一定要练习下面的上机试题。 一、在全国计算机等级考试上机试题中(第32套中的简单应用中的第2小题)。( E: r$ q. M7 e
二、在全国计算机等级考试上机试题中(第33套中的简单应用中的第1、2小题)。: c V6 J" |% ]% h/ h
表单、菜单与报表( r/ y9 J4 A- [' ~
关于表单设计器' }/ Q! S# p- Y% F! N
表单题型
$ I$ ~- N, O$ p: G 类型一
+ r! O4 Q/ A: j& M/ Q9 T/ n4 b4 | Ⅰ 一个文本框 两个命令按钮
' g4 e# Z9 b$ ]' d" A# p2 i 典型题型:新建一个表单,其上有一个文本框,两个命令按钮,一个叫‘查询’,一个叫‘退出’,当单击查询按钮时,会在文本框中显示……的……,当单击退出按钮时,会退出表单' a& W/ Q$ N& x
解题步骤:
9 a( X; P7 Y3 C (1)新建表单
3 S7 W3 {' F' v7 _* L+ x f (2)添加好一个文本框 和 两个命令按钮, 总共三个控件( ]. ^6 T5 h* z% I! U
(3)给两个命令按钮改标题
7 [3 E: a+ C$ g; G (4)在查询按钮上右击, 添加命令代码:Select …… from …… where …… into array aaa6 g# H& R" v) i2 l2 S" Q
Thisform.text1.value=aaa
- Q# |; E9 n9 p* ? (5)在退出命令按钮上右击, 添加命令代码:Thisform.release
) j& `! M5 u2 Z. h2 B Ⅱ 两个文本框 两个命令按钮
X0 |+ h$ M$ y$ ^ 典型题型:新建一个表单,其上有两个文本框,两个命令按钮,一个叫‘查询’,一个叫‘退出’,在第一文本框中输入条件,当单击查询按钮时,会在第二个文本框中显示……的……,当单击退出按钮时,会退出表单9 A# p3 J& d. Q( d6 v5 _1 P
解题步骤:
9 R( ]1 p/ T8 G2 E1 {' N) f$ p (1)新建表单3 P5 y. b2 h# V3 I/ @/ R( x- A6 H3 J
(2)添加好两个文本框 和 两个命令按钮, 总共四个控件
$ m+ c$ k, B1 t (3)给两个命令按钮改标题
' F7 t# ?1 f5 ? (4)在查询按钮上右击, 添加命令代码如下
) |& U/ V: t& X Select …… from …… where ……=thisform.text1.value into array aaa
" o. v I; P* c+ a Thisform.text2.value=aaa3 Y4 t2 X, ?, H/ J
(5)在退出命令按钮上右击, 添加命令代码:Thisform.release
2 p, T6 c* h7 C 类型二
/ A. F) H& {: r3 m, v Ⅰ 一个表格控件 两个命令按钮
8 N" R3 p# {' _% B5 s4 V 典型题型:新建一个表单,其上有一个表格控件,两个命令按钮,一个叫‘查询’,一个叫‘退出’,当单击查询按钮时,会在表格控件中显示……的……,当单击退出按钮时,会退出表单
6 n5 }$ k/ K1 d4 o; s$ [( a! t1 } 解题步骤:
/ \! ]5 C: E8 n. T (1)新建表单
$ L# p7 O, v. Z6 f (2)添加好一个表格控件 和 两个命令按钮, 总共三个控件5 m" D0 ~, t" V, R
(3)给两个命令按钮改标题
* v) l+ C" P3 } e8 X% c4 h R. T' I (4)修改表格控件的一些属性:columncount,列标题,recordsourcetype
+ H# {$ k8 Z3 Y0 q4 u (5)在查询按钮上右击, 添加命令代码如下
& V+ A( G9 A- f0 x! o- w, a Thisform.grid1.recordsource=”Selec……from …… where …… into cursor aaa”" H5 _2 U: |: I
(6)在退出命令按钮上右击, 添加命令代码:Thisform.release6 g% ]0 B: o1 x" C* ~. x
Ⅱ 一个文本框 一个表格控件 两个命令按钮
# Y k% [6 J+ y" {# B4 u 典型题型:新建一个表单,其上有一个文本框,一个表格控件,两个命令按钮,一个叫‘查询’,一个叫‘退出’,当单击查询按钮时,会在表格控件中显示……的……,当单击退出按钮时,会退出表单
/ k) N/ d. Q, e- L! B* x3 R0 U% N- c4 e6 ` 解题步骤:
# X0 f" u: E$ u* h3 e3 z, f (1)新建表单
A1 `4 \. f2 A0 V (2)添加好一个文本框 一个表格控件 和 两个命令按钮, 总共四个控件7 m0 V7 s: _: d3 \) T- Z
(3)给两个命令按钮改标题
6 E7 Y, ^3 G, B7 F+ M6 p! `( \5 A9 y (4)修改表单控件的一些属性:columncount,列标题,recordsourcetype
+ O" g8 Y, B" y x" E9 Y (5)在查询按钮上右击, 添加命令代码如下$ M% x6 s: P( [) p7 P
Thisform.grid1.recordsource=”Selec……from……where……=thisform.text1.value; into cursor aaa”, r$ z9 f! z5 x
(6)在退出命令按钮上右击, 添加命令代码:Thisform.release
% m8 ?9 x+ ]9 F 表单题型 {6 ~; U/ V0 p$ _. g; P
作用:利用表单设计器可以进行面向对象的程序设计。5 `! L! W) F! N) @( @) q
创建:①鼠标操作:“文件”→“新建” →勾选“表单” →“新建文件”。( G$ I4 L2 F5 V2 s
②命令操作:CREATE FORM
& G# b/ o6 M/ |% ]2 l" d; x 修改(打开)表单: MODIFY FORM 文件名/ V* _% k5 D% B8 p, }1 N* l
运行表单: ①鼠标操作:“表单”→“执行表单”;或者单击工具栏上的“运行”按钮。1 g! N" b, ~9 h- R; B0 ]- t% l
②命令操作:DO FORM 文件名/ D) V) \0 k" o' d& }: p& A
题目: ★ 一个表格 一个命令按钮 ★( u% ?: N' q. P0 ?* x* A
一、建立表单MYFORM1,在表单上添加一个表格控件(名称为grdCourse)和一个命令按钮(名称Command1),命令按钮的标题为“退出”。表格控件是用来显示表course的内容(要求RecordSourceType属性必须为0)。单击命令按钮能够退出该表单。
_. C b7 o; j( t" \ 步骤:3 f+ k8 I8 G- v* {8 X
1.“文件”→“新建” →勾选“表单” →“新建文件”。2 f: K8 J* Y- H. p$ x4 J$ l. p: [
2.在“表单设计器”中,单击鼠标右键,在弹出菜单中选择“数据环境”菜单项,在“打开”对话框中选中表“course”并单击“确定”按钮,接着关闭“添加表或视图”对话框。$ Q, O% r, E2 p( W( J% k/ W t
3. 在“数据环境设计器”中,按住表“course”,然后拖动鼠标至“表单设计器”中,松开鼠标。1 n" d' v7 C: J# a
4. 在“表单设计器”中,选中“表格”控件,在“属性”的RecordSourceType中选择“0 - 表”。! g* M$ h5 C6 O: X
5.在“表单设计器”中,添加一个命令按钮,单击命令按钮在“属性”的Caption处输入“退出”,然后双击“退出”命令按钮,在“Command2.Click”编辑窗口中输入“Thisform.Release”,接着关闭编辑窗口。
3 s0 Q% J& H; y. H% G7 x& u6 v 6.保存表单,表单的文件名输入MYFORM1,最后运行表单。! T; d; O: ^- z2 R& D3 \6 T3 |, ?
★ 一个表格 两个命令按钮 ★
1 ^& W2 m1 N2 ^$ I' K 二、建立表单MYFORM2,在表单上添加一个表格控件(名称为grid1)和两个命令按钮,命令按钮的标题分别为“查询”和“退出”。单击“查询”按钮能够在表格控件中显示course表中的全部信息;单击“退出”按钮能够退出该表单。% T2 n* @0 V+ ~
步骤:
8 c: \1 O" j$ y3 U 1.“文件”→“新建” →勾选“表单” →“新建文件”。/ U/ n% H0 o; a* ]% r; X% m: s
2.在“表单设计器”中,添加一个表格控件。将表格控件的RecordSourceType属性设为“4-SQL说明”。
% p: L9 P1 O/ {" h 3.接着在“表单设计器”中添加两个命令按钮,单击第一个命令按钮在“属性”的Caption处输入“查询”,然后双击“查询”命令按钮,在“Command1.Click”编辑窗口中输入:thisform.grid1.RecordSource="select * from course into cursor aaa",接着关闭编辑窗口。
' j( i+ X0 v% D; [ 4.单击第二个命令按钮在“属性”的Caption处输入“退出”,然后双击“退出”命令按钮,在“Command2.Click”编辑窗口中输入:thisform.release。接着关闭编辑窗口。" W1 D& C' k3 B7 C- o
5.保存表单,表单的文件名输入MYFORM2,最后运行表单。
0 ~, y/ r; ]0 ?* G/ e4 _2 G. l5 @ ★ 一个文本框 一个表格 两个命令按钮 ★
: J5 r! a+ Q5 U$ X 三、建立表单MYFORM3,表单名为courseform。在表单上添加一个表格控件(名称为grid1)、一个文本框、一个标签控件和两个命令按钮,命令按钮的标题分别为“查询”和“退出”。标签控件的标题为“课程号”。通过文本框来输入课程号。单击“查询”按钮,是根据文本框中的值来查询course表中的信息,然后将查询的结果显示在表格控件中;单击“退出”按钮能够退出该表单。$ C3 l/ B- j1 C$ {) P5 ] k
步骤:1 g% X% g% V F6 g
1.“文件”→“新建” →勾选“表单” →“新建文件”。
3 m' k5 C5 y9 s 2.在“表单设计器”中,将表单的Name属性设为“courseform”。, N$ v" E) m+ ^. \0 b* U3 Z, Y1 f
3.在“表单设计器”中,添加一个表格控件。将表格控件的RecordSourceType属性设为“4-SQL说明”。
; p5 v- K k5 Q! P4 |4 X 4.接着在“表单设计器”中添加一个标签控件和一个文本框。单击标签控件在“属性”的Caption处输入“课程号”。
4 l) g9 p4 X& [! l 5.在“表单设计器”中添加两个命令按钮,单击第一个命令按钮在“属性”的Caption处输入“查询”,然后双击“查询”命令按钮,在“Command1.Click”编辑窗口中输入:thisform.grid1.RecordSource="select * from course where 课程号=thisform.text1.value into cursor bbb",接着关闭编辑窗口。
2 I" m& C+ D* w" I) G; p% j 6.单击第二个命令按钮在“属性”的Caption处输入“退出”,然后双击“退出”命令按钮,在“Command2.Click”编辑窗口中输入:thisform.release。接着关闭编辑窗口。; }3 C( |3 S/ U t
7.保存表单,表单的文件名输入MYFORM3,最后运行表单。/ h0 @4 [7 F$ U+ T) W
关于菜单设计器
8 C/ v" r- T, h+ S 菜单分为:“下拉式菜单” 和 “快捷菜单”, K; t1 ^0 q- g. l7 n5 H+ z. b
创建:①鼠标操作:“文件”→“新建” →勾选“菜单” →“新建文件”。% i7 m* C# j o
②命令操作:MODIFY MENU [文件名]; ?3 `$ \6 m1 b! n6 E& k
★如果指定的文件名存在,则此时命令为修改;否则为建立。! O6 S1 p2 C* P9 K5 L( k
运行菜单: DO 文件名.mpr: |+ r* U2 u+ P, x
★这时文件名后一定要跟扩展名.mpr。( F! i' ?" N, V& c1 s( ?
菜单的扩展名分为:①.mnx 定义(保存) 时的菜单扩展名1 [* c' l% f0 j! O
②.mpr 生成(运行) 时的菜单扩展名 |