vb6.0中,如何把一个个数不固定的数值数组全部或分段显示到textbox里

原问题:vb6.0中,如何把一个个数不固定的数值数组全部或分段显示到textbox里
分类:编程开发 > 最后更新时间:【2017-07-26 21:35:34】

最佳答案

'例:添加Text1,手动将MultiLine设为True、ScrollBars设为2

Private Sub Form_Load()

Dim a(1 To 100) As Integer

Dim i, s As String

For i = 1 To 100

a(i) = 1000 * Rnd

s = s & Right(String(5, 32) & a(i), 5) '格式化数据字符串

If i Mod 10 = 0 Then '分段显示。这里设为10个数值一行。

's = s & vbCrLf '如果不执行此行,则全部显示。

End If

Next

Text1.Text = s

End Sub

最佳答案由网友  .旧巷.  提供
公告: 为响应国家净网行动,部分内容已经删除,感谢网友理解。
20

分享到:

其他回答

其它网友回答:
分段显示是什么意思


追问:
分段显示就是显示其中连续的一部分,或前半截,或后半截

其它网友回答:
用U盘拷起嘛