|
|
|||||||
| 論壇說明 |
|
歡迎您來到『史萊姆論壇』 ^___^ 您目前正以訪客的身份瀏覽本論壇，訪客所擁有的權限將受到限制，您可以瀏覽本論壇大部份的版區與文章，但您將無法參與任何討論或是使用私人訊息與其他會員交流。若您希望擁有完整的使用權限，請註冊成為我們的一份子，註冊的程序十分簡單、快速，而且最重要的是－－註冊是完全免費的！ 請點擊這裡：『註冊成為我們的一份子！』 |
|
|
主題工具 | 顯示模式 |
2005-03-23, 07:28 AM
|
#4 (permalink) |
|
版區管理員
 
|
If nYear.Text = "" Then
nYear.Text = Year(Now) End If For I = 0 To 41 Command1(I).Caption = "" Next I nMdays = getMMdays(CInt(nYear.Text), CInt(nMonth.Text)) nWday = getWeekday(CInt(nYear.Text), CInt(nMonth.Text)) 當使用者沒輸入年時,程式便讀取系統時間 (然而系統讀取的是年月日的,不知您是否有試過直接輸入年會不會有誤?或不輸入呢?因為Now傳回的是年月日,而在以CInt將日期轉換成數值!可以嗎?) |
|
__________________ 『唸金母心咒：嗡。金母。悉地。吽。』 持此咒者，可免一切瘟疫，一切瘟神抱頭四散。 魔術就是欣賞神奇的效果 如果魔術的秘密被破解了 那魔術就失去欣賞的價值 |
|
|
送花文章: 1542,
|
樹形模式