四、綜合應用題

　　【操作步驟】 步驟1：單擊常用工具欄中的“新建”按鈕，文件類型選擇

　　“表單”，打開表單設計器。單擊常用工具欄中的“保存”按鈕，在彈出“保存”對話框中輸入“mystock”即可。

　　步驟2：在“表單設計器一mystock.SCX”中，在“屬性”的 Caption處輸入“股票持有情況”，在Name處輸入“mystock”。步驟3：在“表單設計器一myStock.SCX”中，添加兩個文本框(“Text1”和“Text2”)。在“表單設計器一mystock.SCX”中，添加3個命令按鈕，單擊第1個命令按鈕，在“屬性”的Caption處輸入“查詢”;單擊第2個命令按鈕，在“屬性”的Caption處輸入“清空”;單擊第3個命令按鈕，在“屬性”的Caption處輸入“退出”按鈕。

　　步驟4：雙擊“查詢”命令按鈕，在“Commandl.Click”編輯窗口中輸人命令組，接著關閉編輯窗口。

　　pinyin=alltrim(thisform.Text1.value)

　　open database stock use stock_name

　　locate for漢語拼音=pinyin iffound()

　　SELECT持有數量，股票簡稱; FROM stock—s1，stock_name;

　　WHERE漢語拼音=pinyin and stock—sl.股票代碼=stock—name.股票代碼;INTO array athisform.Text1.value=a E2]

　　thisform.text2.value=a[1]else

　　wait“沒有查詢到，請重輸”window timeout 2endif

　　步驟5：雙擊“清空”命令按鈕，在“Command2.Click”編輯

　　窗口中輸人命令組，接著關閉編輯窗口。

　　thisform.Text1.value=””

　　thisform.text2.value=””

　　步驟6：雙擊“退出”命令按鈕，在“Command3.Click”編輯

　　窗口中輸入“Thisform.Release”，接著關閉編輯窗口。

　　步驟7：運行表單，并按題目要求進行查詢。

　　相關推薦：

　　2014年計算機等級考試時間調整通知

　　2014年計算機二級考試VFP考點復習匯總

　　考試吧推薦：2014年3月計算機二級考前沖刺備考專題