文本框1中输入一系列字符 比如ABCDEF254124BCDEF254124 要求每次遇到c时回车换行，转换后的数据保存在文本框2中 我开始用的left函数，后来发现无法实现
求高人指点

怎么无法实现?

用mid试试

Text2.Text = Replace(Text1.Text, "c", "c" & vbCrLf)             '小写换行
Text2.Text = Replace(Text2.Text, "C", "C" & vbCrLf)             '大写换行