vf程序设计题

你的循环条件是T，这是无条件进入循环，而你的表中专业字段没有"计算机"这个值，所以就不会执行else里面的exit，这样就无法退出循环，所以你的循环条件要改成：not eof()，连起来就是：

do while not eof()

①编一过程用于求一元二次方程的两个实根，要求主程序实现输入和输出的功能。

set talk off

store 0 to x1,x2

input "a=" to a

input "b=" to b

input "c=" to c

if fun(a,b,c)>=0

x1,x2

else

messagebox("无实数解！")

endif

return

function fun(a,b,c)

D=B^2-4AC

if D>=0

D2=sqrt(D)

X1=(-b+D2)/(2a)

X2=(-b-D2)/(2a)

Endif

return D

②将计算圆、长方形的面积的程序编为两个自定义函数，然后被主程序调用。

set talk off

input "r = " to r

input "a = " to a

input "b = " to b

"圆面积 = "

fun1(r)

"长方形面积 = "

fun2(a,b)

return

function fun1(r)

return Pi()rr

function fun2(a,b)

return ab

A和D的答案是一样的，d=95经过公式运算b=字符1+‘’，这是字符的连接运算。所以b=字符1，然后继续，d=int(95/2)=47,再返回计算，所以这个最右边的数字是字符1 只有AD符合。

字符的连接运算：'张三'+'李四'='张三李四' VF程序设计教材41页

1．关系数据库的任何检索 *** 作都是三种基本运算的组合，这三种基本运算不包括( B )

A） 联接 B） 比较 C） 选择 D）投影

2．“项目管理器”的“文档”选项卡用于显示和管理( D)

A） 表单、报表和和查询 B） 数据库、表单和报表

C） 查询、报表和视图 D）表单、报表和标签

3 在Visual FoxPro中，表结构中的逻辑型、通用型、日期型字段的宽度由系统自动给出，它们分别为( A )

A）1，4，8 B）4，4，10

C）l，10，8 D、2，8，8

4 在程序中不需要使用public等命令明确声明和建立，可直接使用的内存变

量是 ( A )

A）局部变量 B）公共变量 C）私有变量 D）全局变量

5．下列属于非容器类控件的是 A

A）Text B）Form C）Page D）Container

6．若使“文本框”控件中输入的内容在运行时显示为“”号，需修改文本框的 D 属性

A）Text B）Name C）Value D）PasswordChar

7．要为当前表所有职工增加100元工资，应该使用命令 D

A）CHANGE工资 WITH 工资十100

B）REPLACE工资WITH工资十100

C）CHANGE ALL工资WITH工资＋100

D）REPLACE ALL工资WITH工资＋100

8．SQL语句中条件短语的关键字是 A

A）WHERE B） FOR

C）WHILE D） CONDITION

9．以下关于查询的描述正确的是 D

A）不能根据自由表建立查询 B）只能根据自由表建立查询

C）只能根据数据库表建立查询 D）可以根据数据库表和自由表建立查询

10 VFP中支持两种类型的菜单，分别是 C

A)条形菜单和d出式菜单 B)条形菜单和下拉式菜单

C)d 出式菜单和下拉式菜单 D)复杂菜单和简单菜单

二、填空题（每空3分，共30分）

1．在Visual FoxPro的表之间建立—对多联系是把( 主表 )的主关键字字段添加到的（相关 ）表中。

2．项目文件的扩展名是( PJX )。

3．命令？ ROUND（3372007,3）的执行结果是( 337201 )。

4．在定义字段有效性规则时，在规则框中输入的表达式类型是 逻辑型。

5．数据库表之间的一对多联系通过主表的 ( 主 )索引和子表的 ( 普通 )索引实现。

6．数据环境是表单的数据来源，它可以包括与表单有联系的__视图________、__自由表______或是__数据库表__________。

7．在SQL语句中空值用 ( null ) 表示

三、简答题（每题10分，共40分）

1简述VF开发应用程序的过程

先创建表及相关数据文件，然后创建程序，最后使用项目管理器连编形成EXE文件

2叙述下列各命令的功能：

GO BOTTOM 图 指针指向最后一条记录

MODIFY STRUCTURE 打开表设计器，修改表结构

3简述什么是类？类和对象的区别和联系？

类是对一类相似对象的性质描述。

任何一个对象都是某一个类的实例。

2、子程序SUBPRG带有参数P，N，功能是计算P=N！

主程序Mainprg读入正整数M和K（K<M），并调用子程序SUBPRG求出最后输出S的值

Mainprg

Set talk off

Input '请输入K的值:' to K

Input '请输入M的值:' to M

i = K &&__________

s = 0 &&_________

Do while i<M &&_______

Do Sub with k,i &&__________

s = s+k &&_____________

i = i+1

K,I

ENDDO &&______________

"s=", s

Set talk on

Return

subprg

function sub &&这样用是一样的

parameter P,N &&___________

Store 1 to P ,L

Do while L<=N

P= PL && __________

L= L+1 &&__________

Enddo

Return

二、填空题

1、使用数据库设计器为两个表建立联系，首先应在父表中建立__主__或候选_索引，在子表中建立_____普通___索引。

2、常量 n表示的是_____逻辑___型的数据。

3、在Visual FoxPro中参数传递的方式有两种，一种是按值传递，另一种是按引用传递，将参数设置为按引用传递的语句是：SET UDFPARMS__to reference_______________ 。

4、运行表单时，Load事件是在Init事件之_______前___被引发。

5、如下程序的输出结果是___11_____ 。

　 i=1

DO WHILE i<10

　 i=i+2

ENDDO

i

6、数据库系统的核心是__数据库管理系统_______________。

7、数据库设计包括概念设计、_物理_______设计和__逻辑______设计。

8、在二维表中，元组的____属性__不能再分成更小的数据项。

9、RIGHT(“123456789”,LEN(“货币”))的计算结果是___"6789"______。

10、每个数据库表可以建立多个索引，但是___主____索引只能建立一个。

11、在VF中，用LOCATE ALL FOR命令按条件对某个表中的记录进行查询后，若查不到满足条件的记录，用EOF() 函数测试，返回值应是____T______。

12、所谓自由表就是那些不属于任何_____数据库___的表。

13、在职工表中有一数值型的“基本工资”字段，要给目前基本工资为800元的职工每人增加200元，使用的命令是__replace all 基本工资 with 基本工资+200 for 基本工资=800___。

14、在VF中，可提供___32767_____个工作区，前10个区可以用1~10作为区号，还可以用符号__A-J___作为区号别名。一个工作区可以打开___1___个数据表文件。

三、分析解答题

2、 有一个编号数量表文件 BHSLDBF。其内容如下：

记录号 编号 数量

1 A1 10

2 A0 65

3 A2 72

4 B10 40

5 B12 50

阅读以下程序，写出运行结果。

Set Talk Off

Use BHSL

Set Order To Tag 编号

Store 0 To S

Locate For 数量>10

Do While noteof()

编号

If SUBSTR(编号,2,1)=[1]

S=S+数量

Endif

Continue

Enddo

S

Use 运行结果是：__A0 A2 B10 B12

90________ 。

Set Talk On

3、修改下面程序的错误，使其能够计算出30以内（含30）能被5整除的正整数之和。

注意：不要修改或删除y=y+x及其后面的命令和语句。

Clear

store 0 to x,y

Do While T

x=x+1

Do CASE

CASE Mod(x,5)=0

y=y+x

CASE x>30

exit

Endcase

Enddo

y

四、编程题

1、 计算1+2+3+4+5+……+50 的和。

s=0

for i=1 to 50

s=s+i

endfor

"s=",s

return

2、 有如下命令序列，其功能是根据输入的考试成绩显示相应的成绩等级；

Set Talk Off

Clear

Input “输入考试成绩” To chj

dj=IIF(chj<60,”不及格”,IIF(chj>=85,”优秀”,”及格”))

？”成绩等级：”+dj

Set Talk On

请用DO CASE …ENDCASE 多分支选择结构改写程序，同样实现以上功能。

Set Talk Off

Clear

Input “输入考试成绩” To chj

do case

chj >=85

dj=优秀"

chi >=60

dj="及格"

otherwise

dj="不及格"

endcase

？”成绩等级：”+dj

Set Talk On

以上就是关于vf程序设计题全部的内容，包括:vf程序设计题、VF的程序设计题，急！！！！高手帮帮忙啊！、vf 程序题 在文本框text1中输入95，单击“计算”按钮，输入的统计结果是等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！