1樓：匿名使用者
for 迴圈變數=初值 to 終值［step 步長］《語句塊》
《語句塊》
next［迴圈變數］
例如 求n！
1，建立應用程式使用者介面並設定物件屬性
2，程式設計
private sub command1_click()dim fact as double,n as integer,i as integer
n = val(text1.text)
fact = 1
for i =1 to n
fact = fact *i
next
text2.text = fact
end sub
2樓：歸萱
『給你二種答案，自己選一種
private sub command1_click()dim i, j, n
n = 3
for i = 1 to n
print space(n - i);
for j = 1 to i
print "*" & space(1);
next
next
end sub
private sub command2_click()dim i, j, n
n = 3
for i = 1 to n
print space(n - i);
for j = 1 to 2 * i - 1print "*";
next
next
end sub
3樓：匿名使用者
在for迴圈中定義乙個字串變數，將此變數賦給顯示控制項就行了。當然，變數的定義最好是在該迴圈的過程中定義
4樓：蔡春保
private sub command1_click()dim i, j, n
n = 3
for i = 1 to n
print space(n - i);
for j = 1 to i
print "*" & space(1);
next j
print 』換行語句
next i
end sub
5樓：匿名使用者
function xx()
dim tt as string
for i = 1 to 3
for j = 1 to i
tt = tt & "*"
next j
tt = tt & " "
next i
xx = tt
end function
用vb怎麼求餘數，用VB怎麼求餘數
在vb中運用模運算 mod 進行求餘數。對於整型數a，b來說，取模運算或者求餘運算的方法都是 1 求 整數商 c a b 2 計算模或者餘數 r a c b。求模運算和求餘運算在第一步不同 取餘運算在取c的值時，向0 方向捨入 而取模運算在計算c的值時，向負無窮方向捨入。所謂向0方向捨入，就是以小數...
vb如何讀取檔案的內容，並且輸出
你好 1 對於txt檔案,用什麼語言都不能實現任意10條內容,只能從頭開始讀取 但可能有變通的辦法 先產生乙個隨機數，開啟txt檔案，從頭開始讀取資料，當已讀取的資料 隨機數時，開始將讀取的資料放到變數中，連續存放10個 2 用office的word文件控制項的dll鏈結到vb中，在vb中建立乙個w...
怎麼用vb6 0獲得文字的行號，怎麼用vb6 0獲得txt文字的行號
在vb中如何獲取textbox的行數？const em getlinecount 186 private declare function sendmessageaslong lib user32 alias sendmessagea byval hwnd as long,byval wmsg as...