轉換日期格式/加密日期

Question

我是VB.NET編碼新手。我有一個問題，請回答這個問題。

我做了一個程序，將當前日期插入到數據庫中。但是當它顯示日期時，其格式是dd/MM/yyyy即。 01/01/2018。我希望日期顯示爲A/A/BJAH其中1 = A 2 = B 3 = C 4 = D等。

Answer 1

正如我在評論中所說，你必須將numbers轉換爲alphabets。這是一個簡單的函數來實現你在找什麼：

Function EncryptDate(Datevalue As String) As String 
    Dim str As String = Datevalue 
    str = str.Replace(1, "A") 
    str = str.Replace(2, "B") 
    str = str.Replace(3, "C") 
    str = str.Replace(4, "D") 
    str = str.Replace(5, "E") 
    str = str.Replace(6, "F") 
    str = str.Replace(7, "G") 
    str = str.Replace(8, "H") 
    str = str.Replace(9, "I") 
    str = str.Replace(0, "J") 
    Return str 
End Function 

因此MessageBox.Show(EncryptDate(Now.ToString("dd/MM/yyyy")))會給

BI/JH/BJAG