当前位置：首页 > 技能相关 > PowerBuilder > 正文内容

PB 根据当前日期计算星期一与星期日的范围（周日期范围）

admin2年前 (2023-01-08)PowerBuilder3300 修订时间:2023-01-08 10:08:45

问题：

如何根据当前日期去取得本周的日期范围，例如当前日期为本周三，获取周一与周日的日期；

解决方案：

解决方案利用到函数：

1、RelativeDate(ToDay(),6) 用于当前日期增加与减少指定的天数；

2、ToDay() 当前日期；

3、daynumber(today()) -2 用于数字化记录星期的值，周一为0，周日为6；

int t
//取得并处理本日在本周的序数，周一为0，周日为6
t=daynumber(today()) -2
if t=-1 then
     t=6
end if
//依据当前日期计算当前星期范围
choose case t
	case 0
	     st_4.text = '星期一'
		sle_4.text = string(today(),'yyyy-mm-dd')
		sle_5.text = string(RelativeDate(ToDay(),6),'yyyy-mm-dd')
	case 1
	     st_4.text = '星期二'
		sle_4.text = string(RelativeDate(ToDay(),-1),'yyyy-mm-dd')
		sle_5.text = string(RelativeDate(ToDay(),5),'yyyy-mm-dd')
	case 2
		st_4.text = '星期三'
		sle_4.text = string(RelativeDate(ToDay(),-2),'yyyy-mm-dd')
		sle_5.text = string(RelativeDate(ToDay(),4),'yyyy-mm-dd')
	case 3
		st_4.text = '星期四'
		sle_4.text = string(RelativeDate(ToDay(),-3),'yyyy-mm-dd')
		sle_5.text = string(RelativeDate(ToDay(),3),'yyyy-mm-dd')
	case 4
		st_4.text = '星期五'
		sle_4.text = string(RelativeDate(ToDay(),-4),'yyyy-mm-dd')
		sle_5.text = string(RelativeDate(ToDay(),2),'yyyy-mm-dd')
	case 5
	     st_4.text = '星期六'
		sle_4.text = string(RelativeDate(ToDay(),-5),'yyyy-mm-dd')
		sle_5.text = string(RelativeDate(ToDay(),1),'yyyy-mm-dd')
	case 6
		st_4.text = '星期日'
		sle_4.text = string(RelativeDate(ToDay(),6),'yyyy-mm-dd')
		sle_5.text = string(ToDay(),'yyyy-mm-dd')
end choose