浙江省二级计算机vfp,2005-2009年浙江省计算机VFP二级考试试卷(含答案)

浙江vfp二级

1、编制一个能进行数字时钟显示功能的表单。表单将自动以1秒为间隔动态显示系统时间，

时、分、秒用汉字说明。图1为表单中控件的布局界面，时钟控件名为Timer1，图2 为表单运行后界面。

1、Form1 Init

this.timer1.interval=1000

this.timer1.enabled=.t.

Timer1 Timer s=substr(time(),1,2)

f=substr(time(),4,2) m=substr(time(),7,2)

thisform.text1.value=s+"时"+f+'分'+m+'秒'

2、编制一个表单完成表文件“课程.dbf”内容的显示功能。命令按钮“上一条”、“下一条”

和“退出”名称分别为COMMAND1、COMMAND2和COMMAND3。采用非绑定方式实现。界面如图3、图4所示。具体要求：

1) 点击“上一条”按钮时，显示上一条记录。当到达表头时，转到末记录。 2) 点击“下一条”按钮时，显示下一条记录。当到达表尾时，转到首记录。 3) 当点击“退出” 按钮时，退出表单。

2、Form1 Init

this.text1.value=课程号

this.text2.value=课程名 this.text3.value=学时数

thisform.refresh

Command1 Click skip -1

if bof() go bottom

endif

thisform.text1.value=课程号 thisform.text2.value=课程名

thisform.text3.value=学时数 thisform.refresh

Command2 Click skip

if eof() go top

endif

thisform.text1.value=课程号 thisform.text2.value=课程名 thisform.text3.value=学时数 thisform.refresh