转换日期 Format/Encrypt 日期

Question

我是 VB.NET 编码新手。我有一个问题，请回答这个问题。

我制作了一个将当前日期插入数据库的程序。但是当它显示日期时，它的格式是 dd/MM/yyyy 即。 01/01/2018。我希望日期显示为 A/A/BJAH where 1=A 2=B 3=C 4=D etc.

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

转换日期 Format/Encrypt 日期

Convert Date Format/Encrypt Date

winforms

vb.net-2010