Can For Loop做的工作？

我有一個控件數組文本框和一個包含數字（升序）通過輸入框的列表框。我需要選擇最低的數字，並將其放在我的第一個控制文本框中，然後將處理後的數字放到我的文本框的每個第二個控制數組中。Can For Loop做的工作？

因此，List1.List（0）應放置在文本1（0）的.text和List1.List（1）應該被放置在文本1（2）

.text區段

我不能想象有編碼它，所以我試圖做一個類似的方案，其中列表框中的每個數字將被放置在每個文本框中。這裏是我創建的場景的代碼：

For i = 0 to list1.listcount - 1 
For j = 0 to text1.count -1 
text1(j).text = list1.list(i) 
next j 
next i

但是這段代碼總是給我的文本框列表框中的最後一個數字。經過幾個小時在互聯網上的研究，我發現爲什麼這段代碼不起作用。但是我仍然無法找到如何回答我原來的問題。

我應該使用什麼技術？使用For循環不正確嗎？我一直花太多時間思考和尋找答案。有人請幫忙。我正在使用VB6，因爲它是所需的使用程序（儘管它很舊，許多程序都比這更好）

來源

2015-07-18 nicy12

Dim i As Integer 
For i = 0 To List1.ListCount - 1 
    Text1(i).Text = List1.List(i) 
Next i

J不是必需的。

來源

2015-07-19 12:53:54 Stavm

這隻會解決我自己生成的情況。我真正的問題是List1.List（0）應該放在Text1（0）.text中並且List1.List（1）應該放在Text1（2）.text中，然後List.List（2）應該放在Text1 （4）等等，直到Listbox中的最後一個項目 – nicy12

我不太瞭解你想要什麼，但我會去你的下面的註釋

我真正的問題是List1.List（0）應放置在文本1（0）的.text和應將List1.List（1）放置在Text1（2）.text中，然後將List.List（2）放置在Text1（4）上，直到列表框中的最後一項爲止

我知道它是不是最好的解決方案，但它會做你想做的事，至少從我的理解你的評論。這裏我們去：

Dim i As Integer 
Dim j As Integer 
j = 0 
For i = 0 To List1.ListCount - 1 
    Text1(j).Text = List1.List(i) 
    if j = 0 then j = j + 1 
    j = j + 2 
Next i

來源

2015-07-21 12:09:33 SuperDre

Can For Loop做的工作？

回答

相關問題