求用vb ，用雙重循環，打印一個等腰梯形，等腰三角形和正方形圖案，用“*”打印，謝謝！

Private?Sub?Command1_Click()?'等腰三角形

創新互聯專注于倉山企業網站建設,自適應網站建設,商城建設。倉山網站建設公司,為倉山等地區提供建站服務。全流程定制制作，專業設計，全程項目跟蹤，創新互聯專業和態度為您提供的服務

Dim?i?As?Integer,?n?As?Integer

n?=?5

For?i?=?1?To?n

Print?Space(n?-?i);?String(2?*?i?-?1,?"*")

Next

End?Sub

Private?Sub?Command2_Click()?'正方形

Dim?i?As?Integer,?n?As?Integer

n?=?5

For?i?=?1?To?n

For?j?=?1?To?n

Print?"*?";

Next

Print

Next

End?Sub

Private?Sub?Command3_Click()?'等腰梯形

Dim?i?As?Integer,?n?As?Integer,?m?As?Integer

n?=?5

m?=?5

For?i?=?1?To?n

Print?Space(n?-?i);?String(2?*?i?-?1?+?m,?"*")

Next

End?Sub

VB編程問題：在一個窗體上打印空正方形的程序，應該在一個文本框里輸入正方形的邊長

直接用me.line(x1,y1)-(x2,y2),LineColor,B就可以了

其中的LineColor是顏色代號，也可以省略不寫。

輸出一個正方形圖形，vb程序

方法有好幾種，最簡單一個

Line (200, 200)-(2000, 2000), , B '畫空心正方形

Line (200, 200)-(2000, 2000), vbRed, BF '-畫vbred(純紅顏色)實心正方形

Line (200, 200)-(2000, 2000), RGB(100, 32, 48), BF ‘畫自定顏色正方形

網站標題：vb.net打印正方形 vb打印直角三角形
網頁鏈接：http://www.yijiale78.com/article48/doddehp.html

成都網站建設公司_創新互聯，為您提供網站改版、App開發、網站策劃、靜態網站、電子商務、微信小程序

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯