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

会计考友

　第28套　　一、
, N' B# z: A8 i3 i8 W　　1. 打开数据库
8 B2 h' n( S4 l" v　　OPEN DATABASE stock
, \: y  Q0 v) U0 A7 D7 W  i  b& L　　2. 移去表
9 `+ b4 a% j) S: u* w　　REMOVE TABLE stock_fk
　　如果提示信息，那么单击“是”按钮。
, i, m3 A; N0 v+ a* c; [. f　　可以有两种方法：一是命令方法，二是菜单方法。
　　命令方法：
/ o+ V/ V9 v9 O" Z　　OPEN DATABASE stock
+ u% f$ w2 m' [( B6 @* [　　ADD TABLE stock_name
　　菜单方法：
; t+ e% w. ~  l; f: I( |　　1. 单击“文件\打开”命令项，选择“文件类型”为数据库，打开“stock”。
8 A, W( y- k3 `4 V  ~; J　　2. 在“数据库设计器-stock”中单击鼠标右键，显示右击菜单，选择“添加表”命令，并选择相应的表文件即可(stock_name)。
& |6 b) j. e! z& H6 |) S9 _5 P! x　　方法一：
8 Z2 p- Q+ Z! k+ E9 _; c  G　　1. 打开并修改数据库
　　MODIFY DATABASE stock
% m4 B% G+ q7 ]& w8 [# ]　　2. 在“数据库设计器-stock”中，选择表“stock_sl”并单击鼠标右键，选择“修改”命令，在屏幕上显示“表设计器-stock_sl.dbf”窗口，单击“索引”选项卡，然后输入索引名“股票代码”，选择类型为“主索引”，表达式为“股票代码”，最后单击“确定”按钮，再单击“是(Y)”就可以建立主索引了。
( r" f% l: s, u  y- p2 g　　方法二：
　　使用命令生成主索引
( v0 j! A& \5 d$ r　　ALTER TABLE stock_sl ADD PRIMARY KEY 股票代码 TAG 股票代码
( D7 Y0 V9 u6 x% v+ B7 A( F3 B) _　　1. 在“数据库设计器-stock”中，选择表“stock_name”并单击鼠标右键，选择“修改”命令项。
5 C. q9 M2 w, F8 L3 S　　2. 在“表设计器-stock_name.dbf”中，选择“股票代码”字段，在“字段有效性”标签的“规则”中输入“left(股票代码,1)="6"”，在“信息”中输入“"股票代码的第一位必须是6"”，最后单击“确定”按钮即可。

会计考友

二、　　SELECT stock_name.股票简称,stock_sl.现价,stock_sl.买入价,stock_sl.持有数量;
　　FROM stock_name,stock_sl;
　　WHERE stock_sl.股票代码=stock_name.股票代码 And stock_sl.现价>stock_sl.买入价 ;
　　ORDER BY stock_sl.持有数量 DESC;
  G7 z* {2 q" r" }& v" ^' U　　INTO TABLE stock_temp
: b2 G$ l0 y% O5 T' ]* H; X! o　　1. 单击“工具\向导\报表”菜单项，并显示“向导选取”对话框。
/ d4 T/ A' X; o7 Z5 ?& t& P& K　　2. 在“向导选取”对话框中，选择“一对多报表向导”并单击“确定”按钮，并显示“一对多报表向导”对话框。
　　3. 在“一对多报表向导”对话框的“步骤1-从父表选择字段”中，首先要选取表“stock_name”，在“可用字段”列表框中显示表stock_name的所有字段名，并选定“股票简称”添加到“选定字段”列表框中，单击“下一步”按钮。
　　4. 在“一对多报表向导”对话框的“步骤2-从子表选择字段”中，选取表“stock_sl”，在“可用字段”列表框中显示表stock_sl的所有字段名，并选定所有的字段添加到“选定字段”列表框中，单击“下一步”按钮。
　　5. 在“一对多报表向导”对话框的“步骤3-为表建立关系”中，单击“下一步”按钮。
# ]3 V$ B) g# o　　6. 在“一对多报表向导”对话框的“步骤4-排序记录”中，选定“股票代码”字段并选择“升序”，再单击“添加”按钮，单击“完成”按钮。
6 m/ \# R( M/ Q8 v% D7 q# W　　7. 在“一对多报表向导”对话框的“步骤6-完成”中，在“报表标题”文本框中输入“股票持有情况”，单击“完成”。
　　8. 在“另存为”对话框中，输入保存报表名“stock_report”，再单击“保存”按钮，最后报表就生成了。
# V; C. J* Z  F% _) w　　三、
　　1. 在命令窗口中输入建立表单命令
7 H+ @4 {) \* D" j8 s　　CREATE FORM mystock
　　2. 在“表单设计器-mystock.scx”中，在“属性”的Caption处输入“股票持有情况”，在Name处输入“mystock”。
, a8 B  h" u4 r: I' _: |1 c　　3. 在“表单设计器-mystock.scx”中，添加两个文本框(“Text1”和“Text2”)。
; h/ {% L& v! q) Z3 k0 n) R　　4. 在“表单设计器-mystock.scx”中，添加两个命令按钮，单击第1个命令按钮在“属性”的Caption处输入“查询”，单击第2个命令按钮在“属性”的Caption处输入“退出”。
　　5. 双击“查询”命令按钮，在“Command1.Click”编辑窗口中输入命令组，接着关闭编辑窗口。
　　pinyin= alltrim(thisform.text1.value)
　　open database stock
+ T: K. \  \4 O8 j6 I　　use stock_name
& f* |8 l$ N# K3 {+ Z% U　　locate for 汉语拼音=pinyin
　　if found()
　　select 持有数量,股票简称 from stock_sl,stock_name ;
　　where 汉语拼音=pinyin and stock_sl.股票代码=stock_name.股票代码;
　　into array a
8 D4 g7 g+ v$ D' C6 i9 _. ~　　thisform.text1.value=a[2]
　　thisform.text2.value=a[1]
　　else
　　wait "没有查询到,请重输" window timeout 2
　　endif
　　6. 双击“退出”命令按钮，在“Command2.Click”编辑窗口中输入“Release Thisform”，接着关闭编辑窗口。