高校问答暖暖环游世界冬悦华年:vb中如何在文本框中加入文字？比如有若干个按钮，点击一个就向该文本框中加入一句话。该用什么样的语句呢
来源：百度文库 编辑：高校问答 时间：2024/05/01 15:48:16
如题。我现在只能做到，点按钮，文本框加入该按钮对应的句子，再点别的按钮时，刚才加的句子就没有了，被新的句子取代了，怎么才能避免这种情况呢？
假设你的文本框为TEXTBOX1
文本框内的内容为:"135"
你现在点击一个按钮,要使他变成"2135"
则
TEXTBOX1.text="2"&TEXTBOX1.text
变为"1352"
则
TEXTBOX1.text=TEXTBOX1.text&"2"
要在其他文字添加则可以用mid等函数先分割TEXTBOX1.text,然后再把几部分连接起来
其他一些函数也非常有用
如replace
TEXTBOX1.text=replace(TEXTBOX1.text,"1","2")
则文本框显示变为
"235"
___________________________________________________
新人加油
因为我对VB不是很擅长,到我可以告诉你一种思想,你可以在MSDN中找到正确的答案.
(1);用文本框大gettext()方法得到已有大文本后用一个变量存起来(比如:用i).再用文本框的settext()方法加入文本.
(2):可以用如下的语句:
texts = text1.text + text2.text
按钮的CLICK事件中用以下代码:
Text1 = Text1 & "ABC" '""引号内容依要求改写
你可以用这个程序试试！
private sub command1_click()
text1.text="文本"
end sub
private sub command2_click()
a$="文本2"
text1.text=text1.text & a$
end sub
.
.
.
依次内推，即可拉1
你可以这样做： Text1.Text = Text1.Text & ""
引号内为你要添加的内容。
同上