vb6.0中,如何把一个个数不固定的数值数组全部或分段显示到textbox里
最佳答案
'例:添加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
最佳答案由网友 .旧巷. 提供
其他回答
其它网友回答:
分段显示是什么意思
追问:
分段显示就是显示其中连续的一部分,或前半截,或后半截
其它网友回答:
用U盘拷起嘛