云南龙网

  1. 首页 > 云知道 > >

vfp试题，几道VFP试题急需答案( 三 )

云知道试题

【vfp试题，几道VFP试题急需答案】

vfp试题，几道VFP试题急需答案


4，VFP 考题 运行结果5,151 .t.2 正确3 合格4 备注型5 pack 、 zap6 字符型、日期型、数值型、逻辑型、日期时间型、备注型7 next n 、rest 、record n8 c9 d运行结果5,151 .t.2 正确3 合格4 备注型5 pack 、 zap6 字符型、日期型、数值型、逻辑型、日期时间型、备注型7 next n 、rest 、record n8 c9 d运行结果5,151 .t.2 正确3 合格4 备注型5 pack 、 zap6 字符型、日期型、数值型、逻辑型、日期时间型、备注型7 next n 、rest 、record n8 c9 d5，VFP试题自定义函数求圆的面积半径接受用户指定在命令窗口中输主程序：clearset talk offinput "请输入圆的半径：" to r?"此圆的面积是：",area(r)set talk on returnproc area(r) s=3.14*r*rreturn s主程序：clearset talk offinput "请输入圆的半径：" to r?"此圆的面积是：",area(r)set talk on returnproc area(r) s=3.14*r*rreturn s主程序：clearset talk offinput "请输入圆的半径：" to r?"此圆的面积是：",area(r)set talk on returnproc area(r) s=3.14*r*rreturn s6，vfp试题西华学院赋值给A经济与管理学院赋值给B将A与B连接clearstore "西华学院" to Astore "经济与管理学院" to Bc=a-b?c?for i=1 to len(c)-1 STEP 2 s=0 for j=i+2 to len(c) STEP 2 if substr(c,i,2)=substr(c,j,2) then s=s+1 endif endfor if s>0 then ??substr(c,i,2) ENDifendforclearstore "西华学院" to Astore "经济与管理学院" to Bc=a-b?c?for i=1 to len(c)-1 STEP 2 s=0 for j=i+2 to len(c) STEP 2 if substr(c,i,2)=substr(c,j,2) then s=s+1 endif endfor if s>0 then ??substr(c,i,2) ENDifendforclearstore "西华学院" to Astore "经济与管理学院" to Bc=a-b?c?for i=1 to len(c)-1 STEP 2 s=0 for j=i+2 to len(c) STEP 2 if substr(c,i,2)=substr(c,j,2) then s=s+1 endif endfor if s>0 then ??substr(c,i,2) ENDifendfor7，VFP试题求高手解答 7 set8 Machine Pinyin Stroke9 没有空可填，且你已经全部写出来了10 "123456"11 "ll"12 013 1514 字符15 主索引 普通19 打开20 value captionset defa to d:\source\vfp03 clear use dh.dbf zsl=0 locate all for订货人="邓丽" if found()do while not eof（）zsl=zsl+ 订货数量continueenddo? "邓丽订货总数量是：",str(zsl)else?"此人没订货！" endif use7 set8 Machine Pinyin Stroke9 没有空可填，且你已经全部写出来了10 "123456"11 "ll"12 013 1514 字符15 主索引 普通19 打开20 value captionset defa to d:\source\vfp03 clear use dh.dbf zsl=0 locate all for订货人="邓丽" if found()do while not eof（）zsl=zsl+ 订货数量continueenddo? "邓丽订货总数量是：",str(zsl)else?"此人没订货！" endif use7 set8 Machine Pinyin Stroke9 没有空可填，且你已经全部写出来了10 "123456"11 "ll"12 013 1514 字符15 主索引 普通19 打开20 value captionset defa to d:\source\vfp03 clear use dh.dbf zsl=0 locate all for订货人="邓丽" if found()do while not eof（）zsl=zsl+ 订货数量continueenddo? "邓丽订货总数量是：",str(zsl)else?"此人没订货！" endif use8，VFP考试试题答案选 A 首先，recno()函数为计算表格的记录指针位置，即记录指针指在哪条记录， 函数返回值就是几 其次，除了表格中存在的记录位置外，还有两个位置，bof和eof，bof是第一 条记录之前，叫做顶，eof是最后一条记录之后，叫做底 最后，当指针指在表格中存在的记录上时，指在第几个记录，recno()就显示 几；当指针指在顶时，recno()显示1;当指针指在底时，recno()显示最后一条记录数加1（五条记录就显示六） 解题： 一、当前记录号为1时 如上所述，记录指针指在1，故recno()显示1 二、BOF()为真时 BOF()是判断指针是否在顶位置的函数，为真说明指针在顶上，故recno() 显示1 三、EOF()为真时 EOF()是判断指针是否在底位置的函数，为真说明指针在底上，又因为一共有十条记录，故recno()显示11 综上所述，选择答案A 显示答案选 A 首先，recno()函数为计算表格的记录指针位置，即记录指针指在哪条记录， 函数返回值就是几 其次，除了表格中存在的记录位置外，还有两个位置，bof和eof，bof是第一 条记录之前，叫做顶，eof是最后一条记录之后，叫做底 最后，当指针指在表格中存在的记录上时，指在第几个记录，recno()就显示 几；当指针指在顶时，recno()显示1;当指针指在底时，recno()显示最后一条记录数加1（五条记录就显示六） 解题： 一、当前记录号为1时 如上所述，记录指针指在1，故recno()显示1 二、BOF()为真时 BOF()是判断指针是否在顶位置的函数，为真说明指针在顶上，故recno() 显示1 三、EOF()为真时 EOF()是判断指针是否在底位置的函数，为真说明指针在底上，又因为一共有十条记录，故recno()显示11 综上所述，选择答案A 显示答案选 A 首先，recno()函数为计算表格的记录指针位置，即记录指针指在哪条记录， 函数返回值就是几 其次，除了表格中存在的记录位置外，还有两个位置，bof和eof，bof是第一 条记录之前，叫做顶，eof是最后一条记录之后，叫做底 最后，当指针指在表格中存在的记录上时，指在第几个记录，recno()就显示 几；当指针指在顶时，recno()显示1;当指针指在底时，recno()显示最后一条记录数加1（五条记录就显示六） 解题： 一、当前记录号为1时 如上所述，记录指针指在1，故recno()显示1 二、BOF()为真时 BOF()是判断指针是否在顶位置的函数，为真说明指针在顶上，故recno() 显示1 三、EOF()为真时 EOF()是判断指针是否在底位置的函数，为真说明指针在底上，又因为一共有十条记录，故recno()显示11 综上所述，选择答案A 显示9，关于VFP的几道题 1 VAL（）把字符串中的数字取出来 所以为0*6结果为04 同上 结果为 122 D答案表达式前面是个日期时间型和后面的TIME()函数值类型不匹配3 *** -123负号也算一位所以STR(X,3)输出星号5 EMPTY（）函数测试参数是否为空当表达式取下列值时，empty( ) 函数返回“真”(.T.) 。表达式类型取值 字符型数值型货币型 浮点型 整型双精度型 日期型日期时间型逻辑型备注字段通用字段empty( ) 函数返回“真”(.T.)6 & 命令执行宏替换 。参数& MemVarName指定宏替换中引用的内存变量名或数组元素名 。请不要加上用于区分内存变量与字段的前缀 M.，否则将产生语法错误 。宏的长度不要超过 Visual FoxPro 中允许的最大语句长度 。在宏替换中，变量不能递归引用其自身 。7 set strictdate 命令指定不明确的日期和日期时间常数是否产生错误 。语法SET STRICTDATE TO [0 | 1 | 2]参数0(默认值)指定关闭严格的日期格式检查 。这个设置提供了对以前版本的Visual FoxPro 的兼容性 。1指定所有的日期和日期时间常数必须符合严格的日期格式 。任何不符合严格日期格式的日期或日期时间常数，或任何无效值都会产生一个错误，不论是在编译时、运行时或在一个交互的 Visual FoxPro 工作期中 。2对于将 STRICTDATE 设置为 1，但是也加强了 CTOD( ) 和 CTOT( )函数中字符串的严格日期格式 。注意，要小心应用这个级别，因为 Visual FoxPro 6.0以前版本的代码使用的日期格式可能不符合严格数据格式，有可能造成难以料的运行时错误 。1、scatter field 学号，姓名 to a2、结果是 111、scatter field 学号，姓名 to a2、结果是 111 VAL（）把字符串中的数字取出来 所以为0*6结果为04 同上 结果为 122 D答案表达式前面是个日期时间型和后面的TIME()函数值类型不匹配3 *** -123负号也算一位所以STR(X,3)输出星号5 EMPTY（）函数测试参数是否为空当表达式取下列值时，empty( ) 函数返回“真”(.T.) 。表达式类型取值 字符型数值型货币型 浮点型 整型双精度型 日期型日期时间型逻辑型备注字段通用字段empty( ) 函数返回“真”(.T.)6 & 命令执行宏替换 。参数& MemVarName指定宏替换中引用的内存变量名或数组元素名 。请不要加上用于区分内存变量与字段的前缀 M.，否则将产生语法错误 。宏的长度不要超过 Visual FoxPro 中允许的最大语句长度 。在宏替换中，变量不能递归引用其自身 。7 set strictdate 命令指定不明确的日期和日期时间常数是否产生错误 。语法SET STRICTDATE TO [0 | 1 | 2]参数0(默认值)指定关闭严格的日期格式检查 。这个设置提供了对以前版本的Visual FoxPro 的兼容性 。1指定所有的日期和日期时间常数必须符合严格的日期格式 。任何不符合严格日期格式的日期或日期时间常数，或任何无效值都会产生一个错误，不论是在编译时、运行时或在一个交互的 Visual FoxPro 工作期中 。2对于将 STRICTDATE 设置为 1，但是也加强了 CTOD( ) 和 CTOT( )函数中字符串的严格日期格式 。注意，要小心应用这个级别，因为 Visual FoxPro 6.0以前版本的代码使用的日期格式可能不符合严格数据格式，有可能造成难以料的运行时错误 。1 VAL（）把字符串中的数字取出来 所以为0*6结果为04 同上 结果为 122 D答案表达式前面是个日期时间型和后面的TIME()函数值类型不匹配3 *** -123负号也算一位所以STR(X,3)输出星号5 EMPTY（）函数测试参数是否为空当表达式取下列值时，empty( ) 函数返回“真”(.T.) 。表达式类型取值 字符型数值型货币型 浮点型 整型双精度型 日期型日期时间型逻辑型备注字段通用字段empty( ) 函数返回“真”(.T.)6 & 命令执行宏替换 。参数& MemVarName指定宏替换中引用的内存变量名或数组元素名 。请不要加上用于区分内存变量与字段的前缀 M.，否则将产生语法错误 。宏的长度不要超过 Visual FoxPro 中允许的最大语句长度 。在宏替换中，变量不能递归引用其自身 。7 set strictdate 命令指定不明确的日期和日期时间常数是否产生错误 。语法SET STRICTDATE TO [0 | 1 | 2]参数0(默认值)指定关闭严格的日期格式检查 。这个设置提供了对以前版本的Visual FoxPro 的兼容性 。1指定所有的日期和日期时间常数必须符合严格的日期格式 。任何不符合严格日期格式的日期或日期时间常数，或任何无效值都会产生一个错误，不论是在编译时、运行时或在一个交互的 Visual FoxPro 工作期中 。2对于将 STRICTDATE 设置为 1，但是也加强了 CTOD( ) 和 CTOT( )函数中字符串的严格日期格式 。注意，要小心应用这个级别，因为 Visual FoxPro 6.0以前版本的代码使用的日期格式可能不符合严格数据格式，有可能造成难以料的运行时错误 。1、scatter field 学号，姓名 to a2、结果是 11

推荐阅读


上一篇：苏州到涟水高铁什么时间通车，苏州南站到涟水票价

下一篇：丰田二手车首付多少，二手车2014款丰田花冠多少钱