1樓:匿名使用者
private sub ***mand1_click()dim i
for i = 1 to 4
print tab(7 - i); string(i * 2 - 1, "*")
next
end sub
2樓:匿名使用者
for i = 1 to 4
for j = 1 to 2*i - 1
print "*";
next j
next i
3樓:匿名使用者
for i = 1 to 7 step 2
print string(i, "*")
next
4樓:匿名使用者
最基礎的演算法問題,你竟然不會。你應該得好好學習。
vb程式設計在螢幕上輸出如下圖形
5樓:匿名使用者
樓上的什麼啊……
private sub ***mand1_click()dim i as integer, n as integern = 3
for i = 1 to n
print space(n - i); string(2 * i - 1, "*")
next
for i = n - 1 to 1 step -1print space(n - i); string(2 * i - 1, "*")
next
end sub
6樓:匿名使用者
option explicit
private sub form_load()autoredraw = true
dim i as long, j as longfor i = 1 to 5
j = iif(i < 4, i, 6 - i)print space(4 - j); string(j * 2 - 1, 42)
next
end sub
'^-^
7樓:匿名使用者
用print來實
現private sub ***mand1_click()print "*"
print chr(10) & " ***"
print chr(10) & " ****"
print chr(10) & " ***"
print chr(10) & " *"
end sub
vb程式設計題:第一行輸出5個5,第二行輸出4個4,第三行輸出3個3,第四行輸出2個2,第五行輸出1個1 20
8樓:匿名使用者
你的程式不好實現,print語句只能輸出一行,如果一定是要這樣的話,那就只有硬來的了.
我的程式是一行一行的
private sub form_load()on error resume next
me.windowstate = 2
end sub
private sub form_click()on error resume next
dim lprow, lpcol, h, count as integer
for lprow = 1 to 6
for lpcol = 1 to h
count = lpcol
print count
next
h = lprow
print ""
next
end sub
9樓:…煙花飄飄
for i=5 to 1 step -1
print string(i,i)
next
10樓:匿名使用者
for i=5 to 1 step -1
println(i)
next
使用迴圈語句程式設計序在窗體中列印如下圖形: ** **** ****** ******** vb程式設計,急!
11樓:匿名使用者
大概就是這個思路:第一行3個空格,2個*,第二行2個空格4個*,第三行 1個空格版6個* 滴行 無空格8個*
自定義權 j=4
迴圈 for i=1 to 4 (迴圈4次,也就是4行)列印 j-i 個 「 」;(依次列印空格數)在列印 i*2個 「*」(在列印*的數量)next i (迴圈)end呵呵,我大概知道的意思,也就是這樣,具體vb的列印和迴圈功能你應該知道。
12樓:匿名使用者
直線是一條一條依次出現,佈滿窗體..程式要用到if語句和for next迴圈語句, set line1 = controls.add(
13樓:匿名使用者
private sub form_click()dim i as integer
dim j as integer
print vbcrlf
for i = 1 to 4
print tab(8 - i);
for j = 1 to 2 * i
print "*";
next j
next i
for i = 1 to 4
print tab(8 - i);
for j = 1 to 2 * i
print "*";
next j
next i
for i = 1 to 4
print " ** "
next
end sub
是一復顆制
樹哈,完整的**
14樓:匿名使用者
private sub form_click()for i = 1 to 4
print tab(8 - i);
for j = 1 to 2 * i
print "*";
next j
next i
end sub
15樓:匿名使用者
for i=2 to 8 step 2
print tab(10-i/2);
for j=1 to i
print "*";
next j
next i
16樓:
private sub ***mand1_click()dim i as integer, n as integern = 4
for i = 1 to n
print space(n - i); string(2 * i, "*")
next
end sub
vb程式設計5行「*」,第一行1個「*」,第二行3個「*」以此類推,第五行9個「*」,並使5行「*」呈等腰三角形排
17樓:匿名使用者
畫一個***mand控制元件,**版如下權
private sub ***mand1_click()dim a as string, i as integer, j as integer
dim st as string
a = "*"
st = ""
for i = 1 to 5
for j = 1 to 5 - i
st = st & " "
next j
for j = 1 to i * 2 - 1st = st & a & " "
next j
st = st & chr(13) & chr(10)next i
print st
end sub
求:c語言程式設計:共四行,第一行七個a,第二行五個b,第三行三個c,第四行一個d,成下三角排列。謝謝!
18樓:匿名使用者
//編譯環境:vc++6.0,如果是tc,改標頭檔案為stdio,改cout為printf函式即可
#define row 4
//row是列印的行專數,屬這裡是4行
#include
void main()
return;}
19樓:匿名使用者
#include
int print_line(int indent, int count, int c)
while (count -- > 0)
printf("\n");
return 0;
}int main(void)
return 0;}
急急急vb程式設計題目時間雙擊窗體
option explicit private sub form dblclick dim i as integer dim s as long for i 20 to 263 s s i next i print s s end sub print中 為標準格式一行輸出五個,為緊湊格式 糾結,前面...
C程輸出如下形式九九乘法表,急急急
include include void main while n 0 n 10 int erwei int malloc sizeof int n 1 int i,j,k erwei 0 int malloc sizeof int n 1 erwei 0 0 0 第一個元素沒用到 因為輸出 號 隨...
急急急急!!!!新大一開學前應準備什麼?
1 調整好心態準備迎接新的生活,面對新的同學,遇到各種各樣的將來可能會成為一輩子朋友的人 2 準備基本的生活物品,即使沒有也可以到學校買,一般準備換洗衣物,秋冬的帶齊,洗臉洗澡的毛巾,香皂,洗浴液,洗髮水,牙膏牙刷,喝水杯,還要看你們學校會發什麼,嗽口杯我大學的時候是發了的,還發了飯盆,到學校再買那...