这题目也太含糊了吧?我写段程序你看看是不是这个要求:设三个文本框分别为Text1、Text2、Text3,命令按钮为Command1,复制以下代码:private sub Command1_Click() dim sTemp as string sTemp=Text1.text Text1.text=Text2.text