VB分次换行输出

来源：百度知道 编辑：UC知道 时间：2024/06/11 20:19:34
有三个按钮 分别对应字符A B C

依次按按钮一按钮二按钮三
text输出

A
B
C
（注意换行！）

依次按按钮二按钮一按钮三
text输出
B
C
A

只按按钮一
就输出
A（输出相对的）

总之就是换顺序也跟着改变

建Text1,Command1,Command2,Command3。设置Text1得Multiline属性为True。
代码如下。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Command1_Click()
Text1.Text = Text1.Text & "A" & vbCrLf
End Sub

Private Sub Command2_Click()
Text1.Text = Text1.Text & "B" & vbCrLf
End Sub

Private Sub Command3_Click()
Text1.Text = Text1.Text & "C" & vbCrLf
End Sub

Private Sub Form_Load()
Text1.Text = ""
End Sub

/n