對於使用文本框的循環

Question

我正在嘗試創建一種特殊的打印對話框。 基本上，我在表單上有單選按鈕，有兩個選項：打印所有頁面或打印一系列頁面。 頁面范圍有2個文本框。 一個是開始，一個是結束。 我想同時使用這兩個框，並使用在按鈕中輸入的整數進行for循環。

ElseIf rbPageRange.Checked Then
    Dim startpage As Int32 : startpage = tbPageStart.Text
    Dim endpage As Int32 : endpage = tbPageEnd.Text
    For startpage To endpage
        'do something
    Next
End If

我在To上遇到語法錯誤，但是我想遍歷每個頁面並執行某些操作。 我該如何解決？

非常感謝你！

Answer 1

For ... Next語句的正確語法是

For counter As Integer = start To end
Next

因此，您應該將循環更改為

For page As Integer = startpage To endpage
    'do something with page
Next

---

注意，在VB中，您具有當前.NET類型的別名。 例如：

.NET type             VB type alias
---------------       -------------
System.Int16     -->  Short
System.Int32     -->  Integer
System.Int64     -->  Long
System.DateTime  -->  Date

通常用VB而不是Int32來編寫Integer 。

Answer 2

嘗試寫成

For i as Integer = startpage To endpage Step 1
     'Do Something
Next

它應該按預期工作。