請問這段程式的註解 關於年月日

拜託各位大大這段是什麼意思 >< Public Function getdate(ByVal format As String) As String Dim r As String = "" If format = "TAIWAN" Then r = "民國" + CStr(year - 1911) + "年" + CStr(month) + "月" + CStr(day) + "日" ... show more 拜託各位大大這段是什麼意思 ><


Public Function getdate(ByVal format As String) As String
Dim r As String = ""
If format = "TAIWAN" Then
r = "民國" + CStr(year - 1911) + "年" + CStr(month) + "月" + CStr(day) + "日"
Else
r = getdate()
End If
Return r
End Function
1 answer 1