vb listbox 行是怎样定义的 5
text1.Text每输入15个数字就换行，没写入一行，在listbox显示出来，当有10行时，就打印出来...
text1.Text 每输入15个数字就换行，没写入一行，在listbox显示出来，当有10行时，就打印出来
展开
1个回答
展开全部
Private Sub Text1_Change()
If Len(Text1.Text) >= 15 Then
List1.AddItem Text1.Text
If List1.ListCount = 10 Then
Dim i As Integer
For i = 1 To 10
Print List1.List(i)
Next i
End If
Text1.Text = ""
End If
End Sub
If Len(Text1.Text) >= 15 Then
List1.AddItem Text1.Text
If List1.ListCount = 10 Then
Dim i As Integer
For i = 1 To 10
Print List1.List(i)
Next i
End If
Text1.Text = ""
End If
End Sub
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
