VB6で開発中に「VB-6 オーバーフローしました。」が発生。
分ってしまえば簡単な理由だった。
●「VB-6 オーバーフローしました。」が発生する例
Dim wk_Plnk As String
wk_Plnk = "20130318"
wk_Plnk = Format(wk_Plnk,"YYYY/MM/DD")
●「VB-6 オーバーフローしました。」が発生しない例
Dim wk_Plnk As String
wk_Plnk = "3/18"
wk_Plnk =Format(wk_Plnk,"YYYY/MM/DD")
Format関数は日付型と認識できないとダメで、8桁の文字列は日付型とは認識できないということか。
IsDate関数でTrueになる文字列であればFormat関数が利用可能だと思われる。
COMMENT