Question

vb如何用一个按钮控制文本框多次输出（既点击一下出来一句话，再点一

vb如何用一个按钮控制文本框多次输出（既点击一下出来一句话，再点一下又成了另外一句。以此类推）。求编码

Answer 1

Dim sx%, sote(100) As Variant'[整数]sx，[数组]sote(0到100之间)
Private Sub Form_Load()'[事件]窗体载入
sote(1) = "“第一句”": sote(2) = "第二句。"
sote(3) = "第三句": sote(4) = "第四句。"
sote(5) = "第五句": sote(6) = "第六句。"
sx = 0 '变量sx 初始值设为0
End Sub
Private Sub Command1_Click()'[事件]单击Command1
Dim Trxts As String '字符串变量 Trxts
sx = sx + 1'变量sx 每次多1。
Text1.Text = sote(sx)'文本框Text1 变为[数组]sote 中第【sx的值】个字符串
End Sub