vb6 - 将_This_statement 转换为vb6

Question

我遇到了一个问题来隐藏用 vb2010 编写的语句。我想将此语句转换为vb6，请任何人帮助我。代码是

str=Textbox1.Text.Chars(TextBox1.Text.Length - 1) 

Answer 1

字对字翻译将是

myStr = Mid(Textbox1.Text, Len(Textbox1.Text), 1)

但是你可以使用

myStr = Right(Textbox1.Text, 1)

编辑

是 Mid & Right 是变体类型 而 Mid$ 和 Right$ 是字符串

myStr = Mid$(Textbox1.Text, Len(Textbox1.Text), 1)

'OR

myStr = Right$(Textbox1.Text, 1)