选择语句的问题,求大虾指导,求大虾鞭策

花落莫相离

1. 
   
2. <P>功能 重置表格()
   
3.     变量 w,c,y,m,d//w=时间,c=世纪,y=年,m=月份,d=日
   
4.     变量 表格时间=表格.获得内容("表格0",1,0)
   
5.    
   
6.     变量 L=字符串.长度(表格时间)
   
7.     如果(L==9)
   
8.     c=字符串.截取(表格时间,0,2)
   
9.     y=字符串.截取(表格时间,2,4)
   
10.     m=字符串.截取(表格时间,5,6)
    
11.     d=字符串.截取(表格时间,7,9)
    
12.     w=(y+类型.取整(y/4)+类型.取整(c/4)-2*c+类型.取整(26*(m+1)/10)+d-1)%7
    
13.    </P>
    
14. <P>      w=0
    
15. 选择(w)
    
16.       条件 1:
    
17.       表格.设置内容("表格0",1,0,表格时间&"/"&"星期一")
    
18.       条件 2:
    
19.       表格.设置内容("表格0",1,0,表格时间&"/"&"星期二")
    
20.       条件 3:
    
21.       表格.设置内容("表格0",1,0,表格时间&"/"&"星期三")
    
22.       条件 4:
    
23.       表格.设置内容("表格0",1,0,表格时间&"/"&"星期四")
    
24.       条件 5:
    
25.       表格.设置内容("表格0",1,0,表格时间&"/"&"星期五")
    
26.       条件 6:
    
27.       表格.设置内容("表格0",1,0,表格时间&"/"&"星期六")
    
28.       默认:
    
29.       表格.设置内容("表格0",1,0,表格时间&"/"&"星期日")
    
30.   选择结束
    
31. 否则
    
32.      辅助.消息框("请选择正确时间","温馨提示")
    
33.     如果结束
    
34. 
    
35. 功能结束</P>

复制代码

图和代码都奉献上了,想实现的功能:通过表格获取的时间,计算出那天是星期几,并添加到获取的时间后面,并替换原来表格内容(比如:通过表格得到时间2015/3/20,通过计算知道这天是星期五,表格内容替换为2015/3/20/星期五)由于本虾米对选择语句不是很理解,功能实现不了,请大虾指点一下,怎么写才是对的,我的本意是通过计算出来的w取值,设置星期,,如果w=1就是星期一,w=2就是星期二......星期六,默认w=0(星期日)

花落莫相离

如果句型的我会,就是不知道怎么换成选择句型的

1. 如果(w==0)
   
2. 表格.设置内容("表格0",1,0,表格时间&"/"&"星期日")
   
3. 如果结束
   
4. 如果(w==1)
   
5. 表格.设置内容("表格0",1,0,表格时间&"/"&"星期一")
   
6. 如果结束
   
7. 如果(w==2)
   
8. 表格.设置内容("表格0",1,0,表格时间&"/"&"星期二")
   
9. 如果结束
   
10. 如果(w==3)
    
11. 表格.设置内容("表格0",1,0,表格时间&"/"&"星期三")
    
12. 如果结束
    
13. 如果(w==4)
    
14. 表格.设置内容("表格0",1,0,表格时间&"/"&"星期四")
    
15. 如果结束
    
16. 如果(w==5)
    
17. 表格.设置内容("表格0",1,0,表格时间&"/"&"星期五")
    
18. 如果结束
    
19. 如果(w==6)
    
20. 表格.设置内容("表格0",1,0,表格时间&"/"&"星期五")
    
21. 如果结束
    

复制代码

花落莫相离

顶一下,快来个好心的

花落莫相离

junnyfei530 发表于 2015-3-21 07:15
代码如下:
选择(W)
    条件 0:

太感谢了