vb如何用文本框输出数组 求具体例子 比如我定义dim a(100) a(j)=j
dima(100),jasintegerforj=1to100a(j)=jifjmod3=0then问一下then后面要怎么写才能输出到text1文本框里啊...
dim a(100),j as integer
for j=1 to 100
a(j)=j
if j mod 3=0 then
问一下then后面要怎么写才能输出到text1文本框里啊 展开
for j=1 to 100
a(j)=j
if j mod 3=0 then
问一下then后面要怎么写才能输出到text1文本框里啊 展开
1个回答
展开全部
是每三个一行输出到文本框吗？
Private Sub Form_Click() '点击窗体运行
Dim a(100) As Integer, j As Integer
Text1.Text = ""
For j = 1 To 100
a(j) = j
Text1.Text = Text1.Text & a(j) & " "
If j Mod 3 = 0 Then Text1.Text = Text1.Text & vbCrLf
Next j
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
