Winforms 转换日期格式/加密日期

我不熟悉VB.NET编码。我有一个问题，请回答

---

我制作了一个将当前日期插入数据库的程序。但当它显示日期时，其格式为

dd/MM/yyyy

ie.

01/01/2018

。我希望日期显示为

A/A/BJAH

其中1=a2=b3=c4=D等。

正如我在评论中所说，您必须将

数字

转换为

字母表

。这是一个简单的函数，可以实现您想要的功能：

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