亚洲欧洲国产欧美一区精品,激情五月亚洲色五月,最新精品国偷自产在线婷婷,欧美婷婷丁香五月天社区

簡單應用（2小題，每題20分，計40分）

在考生文件夾下，打開DB數(shù)據(jù)庫，完成如下簡單應用：

1. 編寫文件名為FOUR.PRG的程序，根據(jù)表TABA中所有記錄的a,b,c三個字段的值，計算各記錄的一元二次方程的兩個根x1和x2，并將兩個根x1和x2寫到對應的字段x1和x2中，如果無實數(shù)解，在note字段中寫入“無實數(shù)解”。注意：平方根函數(shù)為SQRT()；程序編寫完成后，運行該程序計算一元二次方程的兩個根。注意：一元二次方程公式如下：

解題思路：

在文件four.prg中存放：

USE TABA

SCAN

X = B**2 - 4*A*C

IF X >= 0

XX1 = (-B + SQRT(X))/(2*A)

XX2 = (-B - SQRT(X))/(2*A)

REPLACE x1 with xx1,x2 with xx2

ELSE

REPLACE NOTE WITH "無實數(shù)解"

ENDIF

ENDSCAN

**********************************************************************

2. 打開文件名為testA的表單，表單界面上有兩個命令按鈕，界面要求如下：

1) 設置兩個按鈕的高度為：30；寬度為：80；"退出"按鈕與"查詢"按鈕頂邊對齊；

2) "查詢"按鈕：在該按鈕的Click事件中使用SQL的SELECT命令從表TABA中查詢“無實數(shù)解”的記錄存儲到表TABD中；

3）"退出"按鈕：關閉并釋放表單。

請按要求完成表單的設計，表單設計完成后，運行該表單，單擊"查詢"按鈕進行查詢。

解題思路：

1. 打開并修改表單，先按住Shift鍵，同時選中“查詢”和“退出”兩個按鈕，在其“屬性”的Width處輸入“80”，在Height處輸入“30”，在Top處輸入某一個數(shù)即可。雙擊“查詢”按鈕，在Command1.Click編輯窗口中輸入“SELECT * FROM TABA WHERE note= "無實數(shù)解" into table TABD”語句，并關閉編輯窗口。雙擊“退出”按鈕，在Command2.Click編輯窗口中輸入“RELEASE THISFORM”語句，并關閉編輯窗口。

**********************************************************************