vb6 - Convert_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)