新手求问 数字转中文 有答必采纳

s52o1

已经时间 是  2014/10/05 10:00
我想把时间转中文
年=二零一四
月=十零
日=五
时=十零
分=零

开个什么....传值处理
处理时间(时间)
变量 i
for(i=0;0>下标;i++)
如果(时间=="")
跳出
如果结束
end

来个像上面那个 例子   上面那个例子是 我乱写的

秋来潮汐

1. 功能 按钮0_点击()
   
2.     变量 中文数字 = 数组[10]  
   
3.     测试 = 数组[21]
   
4.     中文数字[0] = "零"
   
5.     中文数字[1] = "一"
   
6.     中文数字[2] = "二"
   
7.     中文数字[3] = "三"
   
8.     中文数字[4] = "四"
   
9.     中文数字[5] = "五"
   
10.     中文数字[6] = "六"
    
11.     中文数字[7] = "七"
    
12.     中文数字[8] = "八"
    
13.     中文数字[9] = "九"
    
14.     时间=系统.时间(2)
    
15.     traceprint(时间)
    
16.     for(i=0;i<10;i++)
    
17.         时间 = 字符串.替换(时间,i,中文数字[i])
    
18.     endfor
    
19.     traceprint(时间)
    
20.     变量 时间分割
    
21.     字符串.分割(时间,"|",时间分割)
    
22.     for(i=1;i<6;i++)
    
23.         if(字符串.右侧(时间分割[i],1)=="零")
    
24.             //比如:把"二零"换成"二十"
    
25.             时间分割[i] = 字符串.左侧(时间分割[i],1) & "十"
    
26.             if(字符串.左侧(时间分割[i],1)=="一")
    
27.                 //把"一零"换成"十"
    
28.                 时间分割[i] =  "十"
    
29.             endif
    
30.         else
    
31.             if(字符串.左侧(时间分割[i],1)!="零")
    
32.                 if(字符串.左侧(时间分割[i],1)=="一")
    
33.                     //比如:把"一五"换成"十五"
    
34.                     时间分割[i] =  "十" & 字符串.右侧(时间分割[i],1)
    
35.                 else
    
36.                     //比如:把"二五"换成"二十五"
    
37.                     时间分割[i] = 字符串.左侧(时间分割[i],1) & "十" & 字符串.右侧(时间分割[i],1)
    
38.                 endif
    
39.                
    
40.             endif
    
41.         endif
    
42.     endfor
    
43.     年 = 时间分割[0]
    
44.     traceprint("年 = " & 年)
    
45.     月 = 时间分割[1]
    
46.     traceprint("月 = " & 月)
    
47.     日 = 时间分割[2]
    
48.     traceprint("日 = " & 日)
    
49.     时 = 时间分割[3]
    
50.     traceprint("时 = " & 时)
    
51.     分 = 时间分割[4]
    
52.     traceprint("分 = " & 分)
    
53.     秒 = 时间分割[5]
    
54.     traceprint("秒 = " & 秒)
    
55.     traceprint("时间 = " & 年 & "年" & 月 & "月" & 日 & "日" & 时 & "时" & 分 & "分" & 秒 & "秒")
    
56. 功能结束

复制代码

优化了下，看看你需要哪个吧

秋来潮汐

1. 功能 按钮0_点击()
   
2.     变量 中文数字 = 数组[10]  
   
3.     中文数字[0] = "零"
   
4.     中文数字[1] = "一"
   
5.     中文数字[2] = "二"
   
6.     中文数字[3] = "三"
   
7.     中文数字[4] = "四"
   
8.     中文数字[5] = "五"
   
9.     中文数字[6] = "六"
   
10.     中文数字[7] = "七"
    
11.     中文数字[8] = "八"
    
12.     中文数字[9] = "九"
    
13.     时间=系统.时间(2)
    
14.     traceprint(时间)
    
15.     for(i=0;i<10;i++)
    
16.         时间 = 字符串.替换(时间,i,中文数字[i])
    
17.     endfor
    
18.     traceprint(时间)
    
19.     变量 时间分割
    
20.     字符串.分割(时间,"|",时间分割)
    
21.     年 = 时间分割[0]
    
22.     traceprint("年 = " & 年)
    
23.     月 = 时间分割[1]
    
24.     traceprint("月 = " & 月)
    
25.     日 = 时间分割[2]
    
26.     traceprint("日 = " & 日)
    
27.     时 = 时间分割[3]
    
28.     traceprint("时 = " & 时)
    
29.     分 = 时间分割[4]
    
30.     traceprint("分 = " & 分)
    
31.     秒 = 时间分割[5]
    
32.     traceprint("秒 = " & 秒)
    
33. 功能结束

复制代码

mkk1222

楼上数组的方式比较好些，如果楼主不嫌麻烦也可以用select语句来实现

ufo585

1. 空间 shijian
   
2. //默认空间
   
3. 
   
4. //开始按钮_点击操作
   
5. 功能 开始_点击()
   
6.     at =日期时间.当前日期()
   
7.     shijian.转换(日期时间.年(at))
   
8.     shijian.转换(日期时间.月(at))
   
9.     shijian.转换(日期时间.日(at))
   
10.     shijian.转换(日期时间.时(at))
    
11.     shijian.转换(日期时间.分(at))
    
12. 功能结束
    
13. 功能 转换(时间)
    
14.     s=""
    
15.     n=字符串.长度(时间)
    
16.     for(i=0;i<n;i++)
    
17.         f=字符串.截取(时间,i,i+1)  
    
18.         选择(f)
    
19.             条件 0:
    
20.             f="零"
    
21.             条件 1:
    
22.             f="一"
    
23.             条件 2:
    
24.             f="二"
    
25.             条件 3:
    
26.             f="三"
    
27.             条件 4:
    
28.             f="四"
    
29.             条件 5:
    
30.             f="五"
    
31.             条件 6:
    
32.             f="六"
    
33.             条件 7:
    
34.             f="七"
    
35.             条件 8:
    
36.             f="八"
    
37.             条件 9:
    
38.             f="九"
    
39.             默认:
    
40.             辅助.消息框("如果没有满足的条件执行默认语句")
    
41.         选择结束
    
42.         s=s&f
    
43.     endfor
    
44.     traceprint(s)
    
45. 功能结束  
    
46. //退出按钮_点击操作
    
47. 功能 退出_点击()
    
48.    
    
49.     辅助.退出()
    
50. 功能结束
    
51. 
    
52. 空间结束
    
53. //空间结束语句

复制代码