vb中字符串函数的使用,请问该如何让编写代码?

课本内容,麻烦求解:
设计程序,在一个文本框中输入一串字符(长度大于2),单击“处理”按钮时,去掉该字符串的头、尾部分各一个字符,处理结果显示在第二个文本框中。如输入“ABCDEF”,输出“BCDE”.

'很简单一句就搞定了。
Private Sub Command1_Click()  '处理按钮
 Text2 = Mid(Text1, 2, Len(Text1) - 2)
End Sub
'请参考采纳!谢谢!

温馨提示:答案为网友推荐,仅供参考
第1个回答  2013-09-24
dim nLen&,sTemp$
sTemp = trim(text1.text)
nLen = len(sTemp)
text2.text = Mid$(sTemp,2,nLen-1)
第2个回答  2013-09-24
Private Sub Command1_Click()

Dim strTemp As String

strTemp = Mid$(Text1.Text, 2)
strTemp = Left$(strTemp, Len(strTemp) - 1)
Text2.Text = strTemp
End Sub本回答被提问者和网友采纳
相似回答