2. 计算机
  3. 打开考生文件夹下的DB数据库，完成如下简单应用： (1)编写一个名为FOUR．PRG的程序，根据表TABA中所有记录的a、b、c三个字段的值，计算各记录的一元二次方程的两个根x1和x2，并将两个根x1和x2写到对应的字段x1和x2中，如果无实数解，

打开考生文件夹下的DB数据库，完成如下简单应用： (1)编写一个名为FOUR．PRG的程序，根据表TABA中所有记录的a、b、c三个字段的值，计算各记录的一元二次方程的两个根x1和x2，并将两个根x1和x2写到对应的字段x1和x2中，如果无实数解，

admin2017-07-28  72
问题 打开考生文件夹下的DB数据库，完成如下简单应用：
    (1)编写一个名为FOUR．PRG的程序，根据表TABA中所有记录的a、b、c三个字段的值，计算各记录的一元二次方程的两个根x1和x2，并将两个根x1和x2写到对应的字段x1和x2中，如果无实数解，在note字段中写入“无实数解”。提示：平方根函数为SQRT()；程序编写完成后，运行该程序计算一元二次方程的两个根。(注意：一元二次方程公式如下。)
    χ＝
    (2)打开名为testA的表单，其中有两个命令按钮，界面要求如下：
    ①设置两个按钮的高度均为30，宽度均为80，“退出”按钮与“查询”按钮顶边对齐。
    ②“查询”按钮的功能是在该按钮的Click事件中使用SQL的SELECT命令从表TABA中查询“无实数解”的记录并存储到表TABD中。
    ③“退出”按钮的功能是关闭并释放表单。
    请按要求完成表单的设计，表单设计完成后，运行该表单，并单击“查询”按钮进行查询。
选项
答案(1)【操作步骤】 新建程序four，并输入以下命令： ****“four”程序文件中的代码**** CLOSE ALL USE TABA SCAN IF A＜＞0 AND B*B－4*A*C＞＝0 REPL x1 WITH(－B＋SQRT(B*B－4*A*C))／(2*A)，x2 WITH(－B－SQRT(B*B－4*A*C))／(2*A) ELSE REPL NOTE WITH"无实数解" ENDIF ENDSCAN *********************** 最后保存运行程序。 (2)【操作步骤】 步骤1：打开表单“testA”。 步骤2：按Shift的同时选中“查询”和“退出”两个按钮，然后在属性窗口设定它们的Height属性为30，Width属性为80，在系统菜单中选择“格式”→“对齐”→“顶边对齐”。 步骤3：在“查询”按钮的Click事件中输入下列代码。 ****“three”程序文件中的代码**** SELECT*； FROM TABA； WHERE TABA．note＝“无实数解”； INTO TABLE TABD．dbf *********************** 步骤4：在“退出”命令按钮的Click事件中输入“ThisForm．Release”。保存并运行表单。
解析
转载请注明原文地址:https://kaotiyun.com/show/tWBp777K
本试题收录于： 二级VF题库NCRE全国计算机二级分类
0

二级VF

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)