請vb專家幫忙翻譯壹個程序...在線等...

私有函數id YTS (yue1asinteger)為integer '函數定義，參數是月數，整數。

如果yue 1 & lt；& gt12然後'如果月份不同，則12。

iDYTS = CDate(" 1999/" & amp；粵1+1 & amp；"/1 ")-CDate(" 1999/" & amp；粵1 & amp；"/1 ")'月數的計算是計算下個月的第壹天CDATE(" 1999/" &；粵1+1 & amp；"/1")

減去本月第壹天，cdate(" 1999/" &；粵1 & amp；"/1 ")，兩個日期之差就是天數。

否則為31天。

iDYTS = 31

如果…就會結束

' End Function '函數數據結束。

這是壹個計算1999中任意壹個月的天數的函數。

上一篇:機械工程學院的工程力學專業用英語怎麽說？

下一篇:需要私人的日漢翻譯。