特定の日付へ変更するには？
１５１５
2003-10-02 15:56:30
No:
108937
IP:
[192.*.*.*]
テキストに20031001と記述されたら2003/10/01 となり、2003/10/01と記述されても2003/10/01となる処理をつくりたいのですが解決法がわかりません。
どなたかご回答願います。
編集
削除
魔界の仮面弁士
2003-10-02 16:59:28
No:
108938
IP:
[192.*.*.*]
こんな感じかな。
Private Function aaa(ByVal S As String) As String
aaa = Format(Replace(S, "/", ""), "0000/00/00")
End Function
編集
削除