这个...vfp（2/2）
作者：传说外路人
c、roerd、click
20、想让计时器控件暂停工作，应该设置属性：。
a、endbledb、visiblec、readonlyd、name
三、填空题。（共30题，每题1分）
1、如果想设置用以存放自己vfp文件的目录（如c:\myvfp），只要输入下面命令即可：
2、将下列数值运算符按优先级依次递减的顺序排序：－、+、%、/、*、**、^、+（单目）、―（单目）、（）
3、写出下列表达式的值left(’’visualfoxpro6.0’’,30)
substr(“visualfoxpro6.0”,8,6)at(‘cd’,‘cad’)
at(‘cd’,‘abcd’)stuff(‘zhongguo’,6,3,’hua’)
ctod(‘^2007－3－16’)dtoc(date)dtoc(date,1)
4、对于一个空表，则recno=且eof=bof=；若记录指针移到表尾，则recno=且eof=；若记录指针移到表头，则recno=且bof=；如果工作区中表没有打开，则recno=。
5、写出vfp中下列记录范围的四种限定方法：表文件中的所有记录：；从当前记录开始连续n条记录：；记录号为n的一条记录：；从当前记录开始到最后所有记录：。
6、写命令：
（1）显示出第n条记录：
（2）显示出入校总分在570分以上的女生的姓名
（3）显示出表cs1的表结构
7、模糊查询用户指定表文件中指定字段（字符型）的指定内容，如果用户指定的表文件不存在，给予提示信息。
settalkoff
clear
accept”请输入表文件名（带扩展名）：”tofilename
accept”请输入要查询的字段名（字符型）：”tofieldname
accept”请输入要查询的内容（字符串）：”tochar1
fn=”f:\2007年工作\任课\vfp\上机\”+filename
if
brop;lt;=2
j=1
dop;lt;=3
a(i,j)=i+j
??a(i,j)
j=j+1
enddo
?
i=i+1
enddo
settalkon
return
执行此程序，程序的运行结果为
4、假设表xmms一共有10条记录
usexmms
go3
skip4
现在是哪条记录？
skip?2
现在是哪条记录？
gobottom
现在是哪条记录？
skip
现在记录号是几？
skip－100
现在记录号是几？
go3
listnext3
显示哪3条？
显示完成后当前记录是哪条？
5、假设键盘上输入m的值为10，顺序执行下列操作后，屏幕最后显示的结果是：
settalkoff
clea
input”m=”tom
s=0
fori=mto1step－1
ifss(i)
s=s+1
??str(i,5)
endif
endfor
?str(s,5)
settalkon
funcss
parax
forj=2tox－1
ifint(x/j)=x/j
exit
endif
endfor
ifj=x
retu.t.
else
retu.f.
endif
endfunc
20、想让计时器控件暂停工作，应该设置属性：。
a、endbledb、visiblec、readonlyd、name
三、填空题。（共30题，每题1分）
1、如果想设置用以存放自己vfp文件的目录（如c:\myvfp），只要输入下面命令即可：
2、将下列数值运算符按优先级依次递减的顺序排序：－、+、%、/、*、**、^、+（单目）、―（单目）、（）
3、写出下列表达式的值left(’’visualfoxpro6.0’’,30)
substr(“visualfoxpro6.0”,8,6)at(‘cd’,‘cad’)
at(‘cd’,‘abcd’)stuff(‘zhongguo’,6,3,’hua’)
ctod(‘^2007－3－16’)dtoc(date)dtoc(date,1)
4、对于一个空表，则recno=且eof=bof=；若记录指针移到表尾，则recno=且eof=；若记录指针移到表头，则recno=且bof=；如果工作区中表没有打开，则recno=。
5、写出vfp中下列记录范围的四种限定方法：表文件中的所有记录：；从当前记录开始连续n条记录：；记录号为n的一条记录：；从当前记录开始到最后所有记录：。
6、写命令：
（1）显示出第n条记录：
（2）显示出入校总分在570分以上的女生的姓名
（3）显示出表cs1的表结构
7、模糊查询用户指定表文件中指定字段（字符型）的指定内容，如果用户指定的表文件不存在，给予提示信息。
settalkoff
clear
accept”请输入表文件名（带扩展名）：”tofilename
accept”请输入要查询的字段名（字符型）：”tofieldname
accept”请输入要查询的内容（字符串）：”tochar1
fn=”f:\2007年工作\任课\vfp\上机\”+filename
if
brop;lt;=2
j=1
dop;lt;=3
a(i,j)=i+j
??a(i,j)
j=j+1
enddo
?
i=i+1
enddo
settalkon
return
执行此程序，程序的运行结果为
4、假设表xmms一共有10条记录
usexmms
go3
skip4
现在是哪条记录？
skip?2
现在是哪条记录？
gobottom
现在是哪条记录？
skip
现在记录号是几？
skip－100
现在记录号是几？
go3
listnext3
显示哪3条？
显示完成后当前记录是哪条？
5、假设键盘上输入m的值为10，顺序执行下列操作后，屏幕最后显示的结果是：
settalkoff
clea
input”m=”tom
s=0
fori=mto1step－1
ifss(i)
s=s+1
??str(i,5)
endif
endfor
?str(s,5)
settalkon
funcss
parax
forj=2tox－1
ifint(x/j)=x/j
exit
endif
endfor
ifj=x
retu.t.
else
retu.f.
endif
endfunc