VFP 愛用者社區 首頁 VFP 愛用者社區
本討論區為 Visual Foxpro 愛用者經驗交流的地方, 請多多利用"搜尋"的功能, 先查看看有無前例可循, 如果還有不懂的再發問. 部份主題有附加檔案, 須先註冊成為社區居民才可以下載.
 
 常見問題常見問題   搜尋搜尋   會員列表會員列表   會員群組會員群組   會員註冊會員註冊 
 個人資料個人資料   登入檢查您的私人訊息登入檢查您的私人訊息   登入登入

請教怎樣顯示中文日期
前往頁面 1, 2  下一頁
 
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區
上一篇主題 :: 下一篇主題  
發表人 內容
jeff2004



註冊時間: 2005-10-30
文章: 27


第 1 樓

發表發表於: 星期一 四月 10, 2006 1:19 pm    文章主題: 請教怎樣顯示中文日期 引言回覆

如今天是2006/04/10,怎樣顯示為今天是二零零六年四月十日?
我只想到的是...
thisyear=year(date())
thismonth=month(date())
thisday=day(date())
do case
Case Thisyear=1
Short = "一年"
.
.
.
.
.
.
case thisyear=XXXX
short="XXXX年"
至於月份跟日期也是用同樣的方法做,但問題就是月份跟日期還比較易做,畢竟只有12個月,12個可能,日期只有31日,31個可能,但年份就很麻煩,難道設幾千個可能嗎?
有沒有甚麼方法可以解決年份這個問題呢?
回頂端
檢視會員個人資料 發送私人訊息
syntech



註冊時間: 2003-05-16
文章: 3932
來自: Taipei,Taiwan

第 2 樓

發表發表於: 星期一 四月 10, 2006 2:00 pm    文章主題: 引言回覆

STRTRAN() 或是 STRTRANC(),
直接換掉數字,
再加上年月日即可

_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問

請聯絡我們,也許我們幫得上忙
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 AIM Address
nelsonchuang



註冊時間: 2003-09-04
文章: 563
來自: 臺灣

第 3 樓

發表發表於: 星期一 四月 10, 2006 2:31 pm    文章主題: Re: 請教怎樣顯示中文日期 引言回覆

jeff2004 寫到:
如今天是2006/04/10,怎樣顯示為今天是二零零六年四月十日?
我只想到的是...
thisyear=year(date())
thismonth=month(date())
thisday=day(date())
do case
Case Thisyear=1
Short = "一年"
.
.
.
.
.
.
case thisyear=XXXX
short="XXXX年"
至於月份跟日期也是用同樣的方法做,但問題就是月份跟日期還比較易做,畢竟只有12個月,12個可能,日期只有31日,31個可能,但年份就很麻煩,難道設幾千個可能嗎?
有沒有甚麼方法可以解決年份這個問題呢?

提示:
i=你的數字
cstr="零一二三四五六七八九"
gcstr=subs(cstr,(I)*2+1,2) &&你要的數字
其它的請你花點時間想想要怎麼作,程式設計不只是幫別人解決問題,也要幫自己解決問題,加油!

_________________
大家好,請多指教
回頂端
檢視會員個人資料 發送私人訊息
jeff2004



註冊時間: 2005-10-30
文章: 27


第 4 樓

發表發表於: 星期一 四月 10, 2006 6:37 pm    文章主題: 引言回覆

樓上的意見都有待研究.........想請問一下哪裡能找到適合VFP新新新手的有關初接觸VFP程序設計的筆記之類的呢?雖然我是新手入門,但想學習得比較深入,不過通常看到的都已經十分深奧了,所以想找點由淺入深的筆記之類的
現在我學的筆記都十分簡單.......如下....

Visual FoxPro 程序設計

一. FoxPro 程序處理
P 如何建立一程序
1) 在command window中輸入指令 modi comm <程序檔名>
2) 用開新檔案按鈕, 選擇 程式

P 程序的保存和修改
3) 編輯完程序, 關閉視窗時系統會要求存檔, 程序檔的擴展名為 prg
4) 若要修改程序可用命令modi comm <程序檔名>

P 程序的執行
5) 在command window中輸入指令 do <程序檔名>

P 程序的調試
6) 語法錯誤
7) 邏輯錯誤

二. 程序語言基礎知識

1) 數據的類型及運算
數值 + - * / % ^
字符 + -
邏輯 .Not. .and. .or.
日期 + -

2) 數據存放
變量、欄位名稱、數組
變量
A = 10
B = ’FoxPro’
C = .F.
D = {^2003/03/07}
E = A+5
欄位名稱
rcode, bname ......
數組
Declare F(6)
F(1)=1
F(2)=1
F(3)=F(1)+F(2)

3) 數據的表示
常量
10
‘A’
{^2003/03/07}
.T.
表達式
2*3+4
A+F(2)
‘A’+’B’+CHR(66)
‘A’+B
{^2003/03/07}+7
D+A
not(.T.) or .F.
(A>10) and (B=’AB’)


三. 程序流程:條件分支及循環
程序流程:條件分支

If <條件>
語句序列1
Else
語句序列2
End If

Do case
Case <條件1>
語句序列1
Case <條件2>
語句序列2
OTHERWISE
語句序列N
EndCase

程序流程:循環
定次循環 -

FOR <變量>=<初值> TO <終值>
語句序列
ENDFOR | NEXT
條件循環 – 若<條件>為.T.則執行語句序列 完成後重覆上述步驟, 直至該條件為.F.

Do While <條件>
語句序列
ENDDO

四. 過程和函數
1) 過程(PROCEDURE)
2) 函數(FUNCTION)
回頂端
檢視會員個人資料 發送私人訊息
jeff2004



註冊時間: 2005-10-30
文章: 27


第 5 樓

發表發表於: 星期一 四月 10, 2006 6:53 pm    文章主題: 引言回覆

還有一個問題就是樓上的都提到是換數字的,應該指把0123456789換成零一二三四五六七八九吧,但是如今天是4月10日,總不行變成四月一零日吧?
回頂端
檢視會員個人資料 發送私人訊息
nelsonchuang



註冊時間: 2003-09-04
文章: 563
來自: 臺灣

第 6 樓

發表發表於: 星期一 四月 10, 2006 8:54 pm    文章主題: 都一樣 引言回覆

jeff2004 寫到:
還有一個問題就是樓上的都提到是換數字的,應該指把0123456789換成零一二三四五六七八九吧,但是如今天是4月10日,總不行變成四月一零日吧?

基本上...我們學的跟你學的,沒有什麼不一樣,只是學得比你早,比你久一點,這跟學徒,師父的級數一樣,學徒要學3年才會出師,因為要打好基礎,相同的東西你用久了,
就是你生命的一部份,你身體的一部份,就好像下雨了,沒傘,你會用手遮一樣,不須別人教.
只要你重覆的思考,運用,你就會揮灑自如,VFP程式,基本上學徒的東西和師傅級的東西用的都一樣,不同的地方在於思考.
你說那個數字和4 月10日的問題
10~19 中文是十 ~十九 對吧
20~29 二十~二十九對吧
30~39 (我是說數字不是日期) 三十~三十九
不論中文或是阿拉伯數字數字的寫法都是
由右至左 個十佰仟....
所以再把這個條件加入
那..你看出來答案了嗎?(先別著急著寫程式,先把條件模擬一下, 再決定要怎麼寫)

_________________
大家好,請多指教
回頂端
檢視會員個人資料 發送私人訊息
jeff2004



註冊時間: 2005-10-30
文章: 27


第 7 樓

發表發表於: 星期一 四月 10, 2006 9:59 pm    文章主題: 引言回覆

那沒基礎的我該怎麼辦呢??????????該如何去打好基礎??
回頂端
檢視會員個人資料 發送私人訊息
小桑•無痕



註冊時間: 2003-07-08
文章: 299
來自: Tainan, Taiwan

第 8 樓

發表發表於: 星期二 四月 11, 2006 8:56 am    文章主題: 引言回覆

jeff2004 寫到:
那沒基礎的我該怎麼辦呢??????????該如何去打好基礎??



多閱讀、多練習、多思考、多討論

_________________
用力 Try 一下...可以發現很多好玩的事....
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 雅虎訊息通 MSN Messenger
Abel



註冊時間: 2005-03-14
文章: 183
來自: 鹿港小鎮

第 9 樓

發表發表於: 星期二 四月 11, 2006 1:10 pm    文章主題: 引言回覆

jeff2004 你好:

我也是一個新手,也一直在挫敗中摸索學習,但是每搞懂了一個久未得其解的問題時,那種興奮與喜悅
相信你能體會的,但有時候真的轉不過來怎麼辦,就來這裡吧!
耐心點,不論各位大大給你點指引 或 提示 或 直接告訴你問題,讓我們都心存感激,
重要的是我們自己要不斷的 try 直到學會,不是嗎?
加油 ~
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件
jeff2004



註冊時間: 2005-10-30
文章: 27


第 10 樓

發表發表於: 星期二 四月 11, 2006 5:37 pm    文章主題: 引言回覆

小桑•無痕 寫到:
jeff2004 寫到:
那沒基礎的我該怎麼辦呢??????????該如何去打好基礎??



多閱讀、多練習、多思考、多討論

所以我現在想找些適合新手建立基礎的閱讀材料
回頂端
檢視會員個人資料 發送私人訊息
jeff2004



註冊時間: 2005-10-30
文章: 27


第 11 樓

發表發表於: 星期二 四月 11, 2006 11:30 pm    文章主題: 引言回覆

想請問如以下這些是不是一條指令只能改變一個數字?
STRTRAN()
gcstr=subs(cstr,(I)*2+1,2)
回頂端
檢視會員個人資料 發送私人訊息
nelsonchuang



註冊時間: 2003-09-04
文章: 563
來自: 臺灣

第 12 樓

發表發表於: 星期三 四月 12, 2006 11:09 am    文章主題: 模組化 引言回覆

jeff2004 寫到:
想請問如以下這些是不是一條指令只能改變一個數字?
STRTRAN()
gcstr=subs(cstr,(I)*2+1,2)

如果你想要重覆作一件事,就像是把2006轉換成二零零六
就把它寫成一個FUNCTION
這個你要去查一下,要如何作
因為你再這樣問下去.就等於別人幫你寫程式了,你不會有進一步的成長.

_________________
大家好,請多指教
回頂端
檢視會員個人資料 發送私人訊息
syntech



註冊時間: 2003-05-16
文章: 3932
來自: Taipei,Taiwan

第 13 樓

發表發表於: 星期三 四月 12, 2006 11:49 am    文章主題: 引言回覆

說的好像大家都是天生會VFP,天生會程式設計一樣........
_________________
如果公司有下列困擾:
1. 找不到便宜,快速,簡易的 生產排程軟體
2. 不知道如何快速排定 採購計劃
3. 成本抓不準,自己算比軟體算有用
4. 想學習系統規劃,想找系統架構的顧問

請聯絡我們,也許我們幫得上忙
回頂端
檢視會員個人資料 發送私人訊息 發送電子郵件 AIM Address
nelsonchuang



註冊時間: 2003-09-04
文章: 563
來自: 臺灣

第 14 樓

發表發表於: 星期三 四月 12, 2006 7:06 pm    文章主題: 引言回覆

syntech 寫到:
說的好像大家都是天生會VFP,天生會程式設計一樣........

那不好意思,小弟不才,不會表達(,說的好像大家都是天生會VFP,天生會程式設計一樣)有勞您大哥好心的以大家都不會vfp的方式詳細指導那位新學的朋友,感謝你!

_________________
大家好,請多指教
回頂端
檢視會員個人資料 發送私人訊息
jeff2004



註冊時間: 2005-10-30
文章: 27


第 15 樓

發表發表於: 星期四 四月 13, 2006 12:41 am    文章主題: 引言回覆

謝謝樓上的各位,問題已經解決了,尤其是感謝nelsonchuang,要不是他提點的 個十佰仟.... ,我也想不到把年份拆開成4份來處理,再次感謝各位
回頂端
檢視會員個人資料 發送私人訊息
從之前的文章開始顯示:   
發表新主題   回覆主題    VFP 愛用者社區 首頁 -> VFP 討論區 所有的時間均為 台北時間 (GMT + 8 小時)
前往頁面 1, 2  下一頁
1頁(共2頁)

 
前往:  
無法 在這個版面發表文章
無法 在這個版面回覆文章
無法 在這個版面編輯文章
無法 在這個版面刪除文章
無法 在這個版面進行投票
無法 在這個版面附加檔案
無法 在這個版面下載檔案


Powered by phpBB © 2001, 2005 phpBB Group
正體中文語系由 phpbb-tw 維護製作