内容发布更新时间 : 2024/11/6 8:17:59星期一 下面是文章的全部内容请认真阅读。
14、设计一个程序，找出11---10000之间的所有回文数。 所谓回文数是指左右数字完全对称的自然数。 例如：121、12321、484、555等都是回文数。
Clear S=0
Store 0 to a,b,c,d,i For i=1000 to 9999 a=int(i/1000) b=int(i/100) c=int(i/10) d=i
if a=d and b=c s=s+1 endif endfor ?s return
(网上完全找不到11-10000，只有1000-9999的凑数了)
15、从键盘随机输入A、B、C三个数值，将它们从小到大排列后输出。
clear
input \input \input \if a>b
t=a: a=b: b=t endif if c<=a ?c,a,b else
if c<=b ?a,c,b else
?a,b,c endif endif
11
16、完善如图3所示的“课程情况”表单。
图3 “课程情况”表单
（1）编写“上一个”按钮的Click事件代码，单击使表单显示下一条记录内容。 （2）编写“下一个”按钮的Click事件代码，单击使表单显示下一条记录内容。 （3）编写“退出”按钮的Click事件代码，单击时退出表单。
(1)skip -1
Thisform.refresh (2)skip 1
Thisform.refresh (3)thisfrom.release
常用函数1、数值处理函数
(1) 取绝对值函数 (2) 求符号函数 (3) ★求平方根函数 (4) 求指数函数 (5) 求对数函数 (6)取整函数 (7)求余数函数 (8)四舍五入函数 (9)求最大值和最小值函数 (10)π函数 (11)随机数函数
ABS（<数值表达式>） sign(<数值表达式>) aqrt(<数值表达式>) exp(<数值表达式>) log(<数值表达式>) Log10(<数值表达式>) int(<数值表达式>) Ceiling(<数值表达式>) Floor(<数值表达式>)
mod(<数值表达式1>,<数值表达式2>) round(<数值表达式1>,<数值表达式2>) max(<表达式1>,<表达式2>,?) min(<表达式1>,<表达式2>,?) PI() rand()
12
2、字符处理函数
(12)★字符串长度函数 len(<字符表达式>) (13)生成空格字符函数 space(<数值表达式>) (14)大小写字母转换函数 lower(<字符表达式>) Upper(<字符表达式>)
(15) ★删除字符串前后空格函数 rtrim(<字符表达式>)【删除尾部空格】 Lirim(<字符表达式>)【删除前导空格】
Alltrim(<字符表达式>)【删除前导和尾部空格】 (16) ★取子串函数 left(<字符表达式>,<数值表达式>) Right(<字符表达式>,<数值表达式>)
Subster(<字符表达式>,<起始位置>[,<数值表达式>]) (17)求子串位置函数 at(<字符表达式1>,<字符表达式2>[,<数值表达式>]) atc(<字符表达式1>,<字符表达式2>[,<数值表达式>]) (18)计算子串出现次数函数 occurs(<字符表达式1>,<字符表达式2>)
(19)字符串替换函数 stuff(<字符表达式1>,<起始位置>,<长度>,<替换的字符>) (20)字符替换表达式 chrtran(<字符表达式>，<被替换的字符>,<替换的字符>) (21)字符串匹配函数 like(<字符表达式1>,<字符表达式2>) (22)产生重复字符函数 replicate(<字符表达式>,<数值型表达式>)
3、日期和时间函数
(23)系统日期和系统时间函数 (24)求年份、月份和天数函数
(25)求时、分和秒函数 (26)求星期函数
date() Time() Datetime()
year(<日期表达式>|<日期时间表达式>) month(<日期表达式>|<日期时间表达式>) day(<日期表达式>|<日期时间表达式>) hour(<日期时间表达式>) minute(<日期时间表达式>) sec(<日期时间表达式>)
dow(<日期时间表达式>)[对应一周的第几天] cdow(<日期时间表达式>)[第几天的英文名称]
4、数据类型转换函数
(27) ★字符串转换为数值函数 val(<字符表达式>)
(28) ★数值转换成字符串函数 str(<数值型表达式>[,<长度>,[,<小数位数>]]) (29)字符串转换成日期或日期时间 ctod(<字符型表达式>) ctot(<字符型表达式>)
(30)日期或日期时间转换成字符串 droc(<日期表达式>|<日期时间表达式>[,1]) Ttoc(<日期时间表达式>[,1]) (31)字符与ASCII码之间的转换 ASC(<字符型表达式>) CHR(<数值型表达式>) (32)宏替换函数 &<字符型变量>[.]
13
★5、MESSAGEBOX函数
(33)messagebox(<提示信息字符串>[,<对话框类型>[,<对话框标题字符串>]]) 例：messagebox(“非法数据！”,5+16+256,“提示信息”) 数值 0 1 2 数值 16 32 48 64
数值 0 256 512 所选择的按钮 “确定”按钮 “取消”按钮 “终止”按钮 “重试”按钮 返回值 1 2 3 4 所选择的按钮 “忽略”按钮 “是”按钮 “否”按钮 返回值 5 6 7 默认按钮 第一个按钮 第二个按钮 第三个按钮 图标 “停止”图标 “问号”图标 “惊叹号”图标 “信息”图标 对话框按钮 仅有“确定”按钮 “确定”和“取消”按钮 “终止”、“重试”和“忽略”按钮 数值 3 4 5 对话框按钮 “是”、“否”和“取消”按钮 “是”、“否”按钮 “重试”和“取消”按钮
14