a我考网

 找回密码
 立即注册

QQ登录

只需一步,快速开始

扫一扫,访问微社区

查看: 156|回复: 1

[考试试题] 计算机等级考试二级VF题库75套上机试题(9)

[复制链接]
发表于 2012-7-31 22:22:49 | 显示全部楼层 |阅读模式
第9套  一、( }+ |' h9 T- T  p' x
  OPEN DATABASE SELLDB
" R- }7 r$ r7 _. L# n2 n) Z7 w  CREATE TABLE 客户表(客户号 C(4), 客户名 C(20), 销售金额 N(9,2))' Y$ _6 j1 v# E  p' p% v
  1. 打开并修改数据库
+ W  x; [- z) T  c( r; U  MODIFY DATABASE selldb
; R# F6 J) ^7 r4 P2 u/ G* P  2. 在“数据库设计器-Selldb”中,选择表“客户表”并单击鼠标右键,选择“修改”命令,在“表设计器-客户表.dbf”中,单击“索引”选项卡,然后输入索引名“客户号”,选择类型为“主索引”,表达式为“客户号”,最后单击“确定”按钮,再单击“是(Y)”就可以建立索引了。
4 i" l9 e8 @) h3 R5 Q" g1 b; @  ALTER TABLE 部门成本表 ADD COLUMN 备注 C(20)
/ l2 t) E1 [# [$ R# y  e0 n  1. 选择"客户表"为当前表( B$ m5 d* v" U
  2. 在命令窗口输入建立报表命令
0 L# H  ~7 p0 X  CREATE REPORT p_s3 c5 O, i* P1 \2 U5 O
  2. 单击“报表\快速报表”菜单项,在“打开”对话框中选择表“客户表”并单击“确定”按钮。( s5 Q7 v* H! q  d  l' h, s  q
  3. 在“快速报表”对话框中,单击“确定”按钮。
0 u9 {# q/ e& c3 `+ @. J' A  4. 单击“报表\标题/总结”菜单项,在“标题/总结”对话框的“报表标题”框中的“标题带区”打勾,再单击“确定”按钮。; r7 s# G( n8 x  V# V$ x% a, C
  5. 如果“报表控件”工具栏没显示,则单击“显示\报表控件工具栏”菜单项,在“标题”区添加一个标签,用于存放标题“客户表一览表”。
! x, N4 a& S$ q+ [1 y  6. 按“Ctrl+W”键,关闭保存该报表。
4 D7 i/ \4 M" }5 O  M  z# ?  二、  H1 E* o0 Q" E: N# I
  文件three.prg正确的内容如下:% @5 C! [4 Q. Y: Q" z# M
  SELECT 销售表.部门号, 部门表.部门名, 销售表.商品号, 商品代码表.商品名,;. P! X6 L6 g  v( f
  销售表.一季度利润+ 销售表.二季度利润+ 销售表.三季度利润+ 销售表.四季度利润 AS 年销售利润;
+ c1 n2 i3 P$ E0 _  FROM (销售表 INNER JOIN 部门表 ON 销售表.部门号 = 部门表.部门号);) @" b: P' U9 A9 f9 d
  INNER JOIN 商品代码表 ;* V$ n2 ?" E# y1 [
  ON 销售表.商品号 = 商品代码表.商品号 ;
+ V, \0 N  \! v6 `( W* I  WHERE 销售表.年度 = "2006";9 K, D* [( ?1 r0 h7 w+ h6 l
  ORDER BY 销售表.部门号, 5 DESC INTO TABLE TABA
: e7 T# B/ R' c  文件four.prg正确的内容如下:, F0 H9 }# ]# a5 Y
  SELECT 销售表.部门号, 部门名, SUM(一季度利润+二季度利润+ 三季度利润+ 四季度利润) AS 年销售利润;1 X0 w& N% E1 i. V$ z8 A
  FROM 销售表 JOIN 部门表 ON 销售表.部门号 = 部门表.部门号;( R; X+ e" s2 v$ v
  WHERE 销售表.年度 = "2005";0 w' T* U% S6 @: ?8 r$ L; d  X
  GROUP BY 销售表.部门号 INTO TABLE LS& `. t; j% N1 z9 ]- y. f# x3 j; n
  SELECT 部门表.部门号, 部门名, SUM(一季度利润) 一季度利润,SUM(二季度利润) 二季度利润,SUM(三季度利润) 三季度利润,SUM(四季度利润) 四季度利润;
% m2 F5 f; p8 E& |" z  FROM 部门表,销售表;( l( O' j! F5 F- L& z
  WHERE 部门表.部门号 = 销售表.部门号 AND 年度 = "2005";( u2 P8 M2 x: Y0 v5 }2 ]
  GROUP BY 部门表.部门号;3 c) @1 b+ a7 j4 C0 s% D( ^
  ORDER BY 销售表.部门号 INTO TABLE account
回复

使用道具 举报

 楼主| 发表于 2012-7-31 22:22:50 | 显示全部楼层

计算机等级考试二级VF题库75套上机试题(9)

三、  1. 新建表单& k; I  {6 M  w* y: i- \  c6 E
  CREATE FORM xs& N  _* I# Z$ l& x9 [6 x5 C' m
  2. 在“表单设计器-xs.scx”中,在“属性”的Caption处输入“部门销售查询”。
5 L$ r; a! q5 A- e3 o8 I0 K. y  3. 在“表单设计器-xs.scx”中,添加两个标签,在第1个标签Label1“属性”的Caption处输入“部门号”,在第2个标签Label1“属性”的Caption处输入“年度”。! y% ]- ^+ p7 a: r" M0 h$ l8 e
  4. 在“表单设计器-xs.scx”中,添加两个文本框(Text1和Text2)。
, L/ I- w9 t9 X* p  5. 在“表单设计器-xs.scx”中,添加一个表格Grid1,在其“属性”的RecordSourceType处选择“4 - SQL 说明”。
0 R0 ~5 {0 N6 T& i+ W# u5 R  6. 在“表单设计器-xs.scx”中,添加两个命令按钮,在第1个命令按钮“属性”窗口的Caption处输入“查询”,在第2个命令按钮“属性”窗口的Caption处输入“退出”。
" g6 q) _' s" ^  7. 在“表单设计器”中,双击“查询”命令按钮,在“Command1.Click”编辑窗口中输入下列语句,接着关闭编辑窗口。
& J+ @- I4 W( W  q) J4 g  X1 = ALLTRIM(ThisForm.Text1.Value)
5 g. V! ^! z* y4 s( J" u0 C  X2 = ALLTRIM(ThisForm.Text2.Value)
: J* W5 N/ N1 C* O  ThisForm.Grid1.RecordSource = "SELECT 销售表.商品号, 商品名, 一季度利润, 二季度利润, 三季度利润, 四季度利润 ;" @9 Y8 K; r( z: ~
  FROM 销售表 JOIN 商品代码表 ON 销售表.商品号 = 商品代码表.商品号 ;
; V2 n  t; T, Y$ L8 g  WHERE 部门号 = X1 AND 年度 = X2 INTO CURSOR lsb"' I$ q5 F7 J1 V/ H) Z! R, v0 Y
  SELECT 销售表.商品号, 商品名, 一季度利润, 二季度利润, 三季度利润, 四季度利润 ;( x; m$ w" ~, o* @: s4 q
  FROM 销售表 JOIN 商品代码表 ON 销售表.商品号 = 商品代码表.商品号 ;0 B1 J% ]! l9 k( r; q  V
  WHERE 部门号 = X1 AND 年度 = X2 INTO TABLE xs&X1$ p* m/ w9 w( M% g
  8. 在“表单设计器”中,双击“退出”命令按钮,在“Command2.Click”编辑窗口中输入“Release Thisform”语句,接着关闭编辑窗口。
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|Woexam.Com ( 湘ICP备18023104号 )

GMT+8, 2024-5-4 16:21 , Processed in 0.286722 second(s), 23 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表