VFP程序填空借鉴文本.docx
- 文档编号:15075283
- 上传时间:2023-06-30
- 格式:DOCX
- 页数:2
- 大小:14.41KB
VFP程序填空借鉴文本.docx
《VFP程序填空借鉴文本.docx》由会员分享,可在线阅读,更多相关《VFP程序填空借鉴文本.docx(2页珍藏版)》请在冰点文库上搜索。
VFP程序填空借鉴文本
1.执行下列命令序列(已知表中有20条记录)
USE学生
?
BOF()____1____ .F.
?
RECNO()____2____ 1
SKIP3
?
RECNO()____3____ 4
GOTOP
DISPNEXT3
?
RECNO()____4____ 3
USE
编号行对应的输出结果是( )
2.编制一个计算圆面积的表单。
表单中有文本框控件Text1、Text2,命令按钮Command1、Command2,表单和控件的相关属性已设置。
具体要求:
(1)在Text1文本框中输入圆半径,按Command1按钮,则在Text2文本框中显示圆面积。
(2)当输入的圆半径为负数时,按Command1按钮后,则弹出messagebox窗口,显示“圆半径不能为负数!
”。
(3)按Command2按钮,则退出表单。
Command1的Click事件
R=__1__val(thisform.Text1.Value)
if__2__R>0
__3__Thisform.Text2.Value=3.14*R^2
else
Messagebox("圆半径不能为负数!
")
Endif
Command2的Click事件
__4__thisform.release
3.已知:
已存在学生.dbf(学号,姓名,性别,出生年月,奖学金,简历,照片),表中有20条记录。
SETTALKOFF
CLEAR
USE学生
?
RECNO()____1____1
SKIP6
?
RECNO()____2____7
DELE
PACK
LIST
?
RECNO()____3____20
?
RECCOUNT()____4____19
USE
SETTALKON
编号行对应的输出结果是( )
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VFP 程序 填空 借鉴 文本
![提示](https://static.bingdoc.com/images/bang_tan.gif)