Question

vb怎么把计算出来的好几个结果都放在一个text1框里面

Answer 1

private sub command1_click() dim t as single , tem as single , ave as single , d as singlefor i = 1 to Ubound(x()) tem = tem + x(i) next iave = tem / (Ubound(x()))'均值tem = 0 for tx = 1 to Ubound(x()) tem = tem + (x(i) - ave)^2next txd = tem / Ubound(x())'标准差t = ave / (d / (Ubound(x()) - 1))'text1.text = t 这里的text1可以是您的文本框的名称 end sub得到的t即您所要的答案。
如果本次回答对您有帮助，请采纳以支持我们的发展，谢谢！！

追问

能弄个简单点，格式弄的好一点。要的就是一个迭代计算的结果。因为有好几个结果，想把他放在一个text1文本框中，你只要告诉我怎么把这些结果放在一个文体框中显示就可以了。