Vb.net将a转换为Z.

Question

是否还有另一种方法可以改变一个＆＃39; a＆＃39;进入＆＃39; Z＆＃39;在输出文本框?? 因为我想制作一个加密软件。 我不想冻结我的申请。

在我的表单中，我有一个输入/输出文本框和1个按钮。

我知道你可以用这段代码完成：

Output.text = Input.text.Replace("a","Z")

但还有其他办法吗？

Answer 1

我认为没有更短的方法，只需像在代码中那样替换它。

如果要通过单击按钮或表单加载或显示来运行此代码。 然后它更聪明地把它放入私人子。或者将您的代码放入BackgroundWorker。

因此您无需将代码粘贴到您希望其运行的任何位置。

Private Sub Encrypt()
Dim Text as string = Input.text
Text = Text.replace("a","z")
Text = Text.replace("b","y")
Text = Text.replace("c","x")
Text = Text.replace("d","w")
'etc
end sub

使用后台工作者只需将其写入BackgroundWorkerAsync或类似内容：

Encrypt()

您可以将其写在您希望它运行代码的位置。