| 上一篇主題 :: 下一篇主題   | 
	
	
	
		| 發表人 | 
		內容 | 
	
	
		小寶寶
 
 
  註冊時間: 2004-08-20 文章: 57
 
  第 1 樓
  | 
		
			
				 發表於: 星期二 二月 22, 2005 9:59 pm    文章主題: 給大家想想看~回傳年月!! | 
				     | 
			 
			
				
  | 
			 
			
				隨便一個函數名稱EX: DATE_YYMM()
 
?DATE_YYMM(1)==>"9403"
 
?DATE_YYMM(0) ==>"9402"
 
?DATE_YYMM(-1)==>"9401"
 
 
以此往下推~需考慮到100年!!
 
 
小弟想了一個早上~
 
 
給大大動動腦一下~ | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		朱育興
 
 
  註冊時間: 2003-08-25 文章: 661 來自: 台中市大里區
  第 2 樓
  | 
		
			
				 發表於: 星期二 二月 22, 2005 11:30 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				 	  | 代碼: | 	 		  
 
FUNCTION DATE_YYMM
 
LPARAMETERS L_nMonth
 
IF TYPE("L_nMonth") != "N"
 
  L_nMonth = 0
 
ENDIF
 
RETURN LTRIM(TRANSFORM(VAL(PADR(DTOS(GOMONTH(DATE(),L_nMonth)),6))-191100,"@R 999999"))
 
 | 	 
  _________________ 希望有更多人來參與
 
 VFP wiki - 需要大家一起完成的VFP電子書與FAQ  | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		小賴
 
 
  註冊時間: 2004-12-27 文章: 477
 
  第 3 樓
  | 
		
			
				 發表於: 星期三 二月 23, 2005 9:09 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				使用朱兄之函數, 試問L_nMonth該如何決定 ?
 
L_nMonth = DATE() 至 基準日之月份數 ?
 
如果這樣, 參數是否應是 "基準日" 何須參數 L_nMonth
 
或許小寶兄沒有把問題描述的夠具體 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		garfield Site Admin
  
  註冊時間: 2003-01-30 文章: 2160
 
  第 4 樓
  | 
		
			
				 發表於: 星期三 二月 23, 2005 10:33 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				L_nMonth 是加或減幾個月份
 
朱兄的基準日是 date() , 如果不想用date()當基準日, 請改程式將日期當參數傳來再運算. _________________ 利用>>搜尋<<的功能會比問的還要快得到答案. | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		朱育興
 
 
  註冊時間: 2003-08-25 文章: 661 來自: 台中市大里區
  第 5 樓
  | 
		
			
				 發表於: 星期三 二月 23, 2005 11:02 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				以樓主的範例來看,1、0、-1 應該是代表:下一個月、本月、上個月;所以覺得只是 GOMONTH() 函數的延伸應用罷了。 _________________ 希望有更多人來參與
 
 VFP wiki - 需要大家一起完成的VFP電子書與FAQ  | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		小寶寶
 
 
  註冊時間: 2004-08-20 文章: 57
 
  第 6 樓
  | 
		
			
				 發表於: 星期三 二月 23, 2005 12:02 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				原來關鍵在GOMONTH()
 
 
了解了!! | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		bin1x
 
 
  註冊時間: 2004-08-27 文章: 462
 
  第 7 樓
  | 
		
			
				 發表於: 星期三 二月 23, 2005 2:15 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				| 這種函數在計算帳齡時很好用 | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		 |