2010年計(jì)算機(jī)等考二級(jí)VF上機(jī)沖刺模擬試題(37)

　　二、簡(jiǎn)單應(yīng)用(2小題，每題20分，計(jì)40分)

　　在考生文件夾下完成如下簡(jiǎn)單應(yīng)用:

　　1.使用SQL命令查詢(xún)2001年(不含)以前進(jìn)貨的商品，列出其分類(lèi)名稱(chēng)、商品名稱(chēng)、進(jìn)貨日期，查詢(xún)結(jié)果按進(jìn)貨日期升序排序并存入文本文件infor_a.txt中;所用命令存入文本文件cmd_aa.txt中;

　　2.用SQLUPDATE命令為所有商品編碼首字符是"3"的商品計(jì)算銷(xiāo)售價(jià)格：銷(xiāo)售價(jià)格為在進(jìn)貨價(jià)格基礎(chǔ)上加22.68%，并把所用命令存入文本文件cmd_ab.txt中。

　　解答：

　　1.使用命令：MODI COMM cmd_aa.txt(擴(kuò)展名不能省)，在編輯窗口中輸入代碼：

　　SELECT 分類(lèi).分類(lèi)名稱(chēng), 商品.商品名稱(chēng), 商品.進(jìn)貨日期;

　　FROM 商品管理!分類(lèi) INNER JOIN 商品管理!商品 ;

　　ON 分類(lèi).分類(lèi)編碼 = 商品.分類(lèi)編碼;

　　WHERE 商品.進(jìn)貨日期 < {^2001-1-1};

　　ORDER BY 進(jìn)貨日期TO FILE infor_a.txt

　　也可以先用查詢(xún)?cè)O(shè)置器做，再?gòu)?fù)制SQL代碼。

　　2. 使用命令：MODI COMM cmd_ab.txt(擴(kuò)展名不能省)，在編輯窗口中輸入代碼：

　　upda 商品 set 銷(xiāo)售價(jià)格=進(jìn)貨價(jià)格*1.2268 where left(商品編碼,1)="3"

　　三、綜合應(yīng)用(1小題，計(jì)30分)

　　建立表單，表單文件名和表單名均為myform_a，表單標(biāo)題為"商品瀏覽"，表單樣例如圖所示(左圖)。其它功能要求如下:

　　1.用選項(xiàng)按鈕組(OptionGroup1)控件選擇商品分類(lèi)(飲料(Option1)、調(diào)味品(Option2)、酒類(lèi)(Option3)、小家電(Option4));

　　2.單擊"確定"(Command2)命令按鈕，顯示選中分類(lèi)的商品，要求使用DOCASE語(yǔ)句判斷選擇的商品分類(lèi)(如右圖所示);

　　3.在右圖所示界面中按Esc鍵返回左圖所示界面;

　　4.單擊"退出"(Command1)命令按鈕，關(guān)閉并釋放表單。

　　注：選項(xiàng)按鈕組控件的Value屬性必須為數(shù)值型。

 

　　解答：建立表單，用指定文件名保存，更改表單的Name和Caption屬性，添加選項(xiàng)按鈕組，用生成器設(shè)置其各選項(xiàng)的標(biāo)題，將其Value屬性值設(shè)為0(保證選項(xiàng)按鈕組控件的Value屬性必須為數(shù)值型)。添加兩個(gè)命令按鈕，設(shè)置其標(biāo)題。

　　設(shè)置“確定”按鈕的Click事件代碼為：

　　do case

　　case thisform.optiongroup1.value=1

　　sele * from 商品 where 分類(lèi)編碼="1001"

　　case thisform.optiongroup1.value=2

　　sele * from 商品 where 分類(lèi)編碼="2001"

　　case thisform.optiongroup1.value=3

　　sele * from 商品 where 分類(lèi)編碼="3001"

　　case thisform.optiongroup1.value=4

　　sele * from 商品 where 分類(lèi)編碼="4001"

　　endcase

　　設(shè)置“退出”按鈕的Click事件代碼為：

　　thisform.release

　　附：本題相關(guān)表