在VB6的編寫程式中，我們經常要用到迴圈結構，vb6提供了3種不同風格迴圈結構：計數迴圈，do迴圈，當迴圈。今天我們就以計數迴圈（for）迴圈為例項來製作一個簡單的小程式，下面我們就以1到100累加為例製作一個FOR迴圈小程式
方法/步驟
首先我們先啟動vb6程式設計軟體，到新建工程主介面，雙擊“標準exe”，得到一個新建工程FORML1 如圖
然後在forml1視窗上載入一個命令按鈕command1 如圖
通過命令按鈕的單擊事件我們先定義”i“變數為整型”Dim i As Integer“，接下來定義's'變數用來累加”I"的和，也是整型”s As Integer“如圖
然後給'I’和'S‘賦一個初值，”I“的初值為”1",因為's"現在還沒有開始累加，所以初值為“0”如圖
接下來我們用“for'迴圈變化”I“的值，它的初值應該等於1到100截止，然後每次它增長的量為”1“如圖
然後定義迴圈變數為”I"，在當前迴圈過程當中重複不斷的工作就是把“i"累加到“s"當中 如圖
最後我們再窗體上輸出”s"的值如圖
這樣程式就編寫完了，然後執行一下程式，看結果如何，當我單擊命令按鈕（command1）時，最後前100個數累加的結果就已經從當前的窗體中顯示出來了。
