下面我们将介绍Excel VBA中可以反转字符串的程序。
情况：
在您的工作表上放置一个命令按钮，并添加以下代码行：
1.首先，我们声明四个变量。一个变量称为String类型的文本，一个变量也称为String类型的一个reversedText，一个变量称为Integer类型的length，一个变量称为Integer类型的i。
昏暗的文本作为字符串，reversedText 作为 字符串，长度作为 整数，i 作为 整数
2.我们初始化两个变量。我们使用InputBox函数从用户那里获取文本字符串。我们在Excel VBA中使用Len函数来获取字符串的长度。
文字= InputBox（“输入要反转的文字”）
长度= Len（文字）
长度= Len（文字）
3.我们开始一个For Next循环。
对于 i = 0 到长度-1
4.现在来个简单的把戏。我们从文本中获取最后一个字符，并将其放置在ReversedText的前面。我们可以在Excel VBA中使用Mid函数从字符串中提取字符。我们使用＆运算符来连接（连接）两个字符串。
reversedText = reversedText＆Mid（text，（length-i），1）
5.不要忘记闭环。
接下来我
示例：text =“ Car”。文本的长度为3。对于i = 0到2，我们提取从位置长度-i开始的文本子字符串，长度为1。因此，对于i = 0，Mid（text，3，1）等于r。我们将r放在reversedText的第一个位置。对于i = 1，Mid（text，2，1）等于a。我们在reversedText上添加一个成为ra的文本。对于i = 2，Mid（text，1，1）等于C。我们将C添加到reversedText，成为raC。
6.最后，我们使用MsgBox显示reversedText。
msgbox reversedText
7.测试程序。
结果：
