VF程序题Word下载.docx

VF程序题Word下载.docx

《VF程序题Word下载.docx》由会员分享，可在线阅读，更多相关《VF程序题Word下载.docx（80页珍藏版）》请在冰豆网上搜索。

SETTALKOFF

***********SPACE**********

【?

】

XM="

王迪"

】姓名=XM

IFFOUN（）

【?

】学号,姓名,英语,生年月日

ELSE

?

"

ENDIF

USE

SETTALKON

RETURN

依次显示XSDB.DBF数据表中的记录内容。

请在【】处添上适当

*的内容，使程序完整。

DOWHILE【?

DISP

ENDDO

USE

求1到50的累加和（S=1+2+3+...+50）并显示。

请在【】处添上

*适当的内容，使程序完整。

I=1

DOWHILE【?

H=H+I

?

H

【程序填空】

实现:

求0-100之间的奇数之和，超出范围则退出。

请在【】处

*添上适当的内容，使程序完整。

X=0

Y=0

DOWHILE.T.

X=X+1

DOCASE

CASE【?

LOOP

CASEX>

=100

OTHERWISE

Y=Y+X

ENDCASE

0-100之间的奇数之和为:

Y

-------------------------------------------------------

统计300到600之间（包括300和600）能被3整除的数的个数。

GS=0

N=300

IFMOD（N,3）=0

ENDIF

300到600之间（包括300和600）能被3整除的数的个数为"

GS

查找XSDB表中计算机成绩最高分的学生，将其姓名和计算

*机字段的内容显示出来,如：

王迪98。

请在【】处添上适

*当的内容，使程序完整。

USEXSDB

MAX=计算机

dowhile.NOT.EOF（）

IFMAX<

计算机

MAX=计算机

enddo

XM,MAX

*功能：

下面程序是计算1+1+2+2+…+n+n之和的平方根的程序。

INPUTTON

FORI=1TON

S=【?

ENDFOR

结果是"

【?

以下程序通过键盘输入4个数字，找出其中最小的数。

INPUT"

请输入第一个数字"

TOX

M=X

DOWHILEI<

=3

INPUT"

请输入数字"

IF【?

M=X

最小的数是"

M

以下程序的功能如（图1）。

】TON

FORI=0TON

T=T+【?

ENDFOR

T的值是:

T

显示输出图形：

**

****

******

*请在【】处添上适当的内容，使程序完整。

*---------