picture1新增形狀shape
1樓：可愛柴小胖
新增頃歷3個控制項後，複製以下**：
option explicit
private sub form_load()= 引數："
true 5= 圓形"
end sub
private sub text1_change()select case
case "矩形"
0case "正方形"
1case "橢圓形"羨乎咐。
2case "圓形"
3case "圓角矩形"
4case "圓角正方形"
5end select
end sub
說明：改變shape控制項的shape屬性，可以使得shape繪製不同圖形：
常數。shape屬性的常數與圖兄純形形狀對應如下：
常數 設定值 形狀描述。
vbshaperectangle 0（預設值） 矩形vbshapesquare 1 正方形。
vbshapeoval 2 橢圓形。
vbshapeoval 3 圓形。
vbshaperoundedrectangle 4 圓角矩形vbshaperoundedsquare 5 圓角正方形。
2樓：乙新煙
在名稱為form1的大手慎窗體上滾敬新增乙個名稱為shape1的形狀控制項，通過設定：新增3個控制項後，以下碼：option explicitprivate sub form_load() = 引數：
= = 圓形薯空＂end subprivate sub text1_change()select case
3樓：網友
話題：在名稱為form1的窗體上新增乙個名稱為shape1的形狀控制項，通過設定：新增3個控制項後，以下碼：
option explicitprivate sub form_load() = 引數：＂ = = = 圓形＂end subprivate sub text1_change()select case ＂矩形＂ = 0case ＂正方形＂ = 1case ＂橢圓形＂ = 2case ＂圓形＂ = 3case ＂圓角矩形＂ = 4case ＂圓角正方形＂ = 5end selectend sub說明：改變shape控制項的shape屬，可以使得shape繪製不同圖形：
常數shape屬的常數與圖形形狀對應如下：常數 設定值 形狀描述 vbshaperectangle 0(預設值) 矩形 vbshapesquare 1 正方形 vbshapeoval 2 橢圓形 vbshapeoval 3 圓形 vbshaperoundedrectangle 4 圓角矩形 vbshaperoundedsquare 5 圓角正方形。
話題：在窗體新增乙個shape控制項和定時控制項，每隔1秒鐘修改shape控制項的：private sub form_load() = = trueend subprivate sub timer1_timer() = int(rnd * 6) = int(rnd * 8)end sub
參考：設定 =1000在時鐘中用隨機函式生成屬值，關鍵是怎麼讓隨機函式返回屬的值域，計算公式是：int((最大值 - 最小值 + 1) *隨機數 + 最小值)。
別老惦記著給你段現成的碼，自己去編，有利於提高成績。話題：咐稿「在shape1中新增7個shape控制項，設定名稱為shape2的控制項陣列」是：
好久沒做過了，大概是你下畫乙個控制項shape1，再在1中話shape2，2，在，這個時候就會問你是否建立控制項陣列，點選是即可。一直到七個話題：vb中使用shape控制項畫圖形顯示在窗體上要怎麼做？：
在窗體上新增shape控山含件設定它的shape 屬，就可逗簡笑以了； '(預設值)矩形 '正方形 ' 橢圓形 '圓形 '圓角矩形 '圓角正方形。
在裡新增形狀，新增的文字沒有上下居中而且形狀看起來有描邊，怎麼辦呢
解決在word裡新增形狀，新增的文字沒有上下居中而且形狀看起來有描邊的步驟如下 1.開啟word，選中選單欄中的插入選項，找到形狀圖示。2.選中想要插入的形狀。3.選中繪製好的形狀。4.滑鼠右鍵選中新增文字。5.這樣就解決了在word裡新增形狀，新增的文字沒有上下居中而且形狀看起來有描邊的問題了。這...
flash中無法修改新增形狀提示
形狀補間才可以用形狀提示，動畫補棗念間不可以。.要在形狀補間開始的第一幀處新增開始點位置，最後一幀加結果凳備困點位置。不知滾茄道，你都符合麼？flash新增形狀提示的使用。我們用flash做形狀變形時有個非常好用的功能，通常讓人忘記。就是用新增形狀提示的功能。以下講解具體用法要點。要控制更加複雜或罕...
visio怎麼新增形狀,visio中如何畫帶有連線點的形狀？
能做到啊。方法1 自己做圖形在visio中選相關的圖形，再利用工具欄中，形狀 操作 層疊等工具完成。就可以填寫文字了。方法2，不管你做什麼圖形，不要雙擊，單擊第二行的大a 文字工具 可以任意圖形上增加文字。visio左邊這裡不是各種形狀選擇嗎？怎麼調出來？單擊檔案，然後選擇形狀，選擇用到的型別，就加...