VB3.InputBox & MsgBox
喔!這個我想超久的ˊˋ我是過很多語法但是都行不通
一直出現怪怪的年份XD
最後以三行:這個程式是輸入你的年齡求出你出生的年份
Private Sub Command1_Click()
Dim a As Date 宣告A 的資料型態是date
a = InputBox("請輸入你的年紀") 用輸入視窗輸入a
MsgBox "您生於" & DateDiff("y", CDate(a), Year(Now)) & "年"
注意:"y"是取該年的年份!不能用"yyyy"喔!!
我用訊息方塊的原因是習題要求的= = ㄏㄏ自己可以改成print也ok!!
搞定了︿︿很煩阿!想了一天一夜了= =
我剩至試過把DATEdILL改成DATEPART以及DATEADD哈哈ˊˋ不過當然都失敗~
今天晚上中於是成功了︿︿開心
Today's Visitors: 0 Total Visitors: 2
歷史上的今天:

SoulxMY(-3)

Sealed (May 29)









Only members can post a comment, Login first