vb.net沙盒控件 vbnet shape控件

vb.net中如何實現(xiàn)vb中的shape功能

你用的是控件數(shù)組

創(chuàng)新互聯(lián)專注于寶豐網(wǎng)站建設(shè)服務(wù)及定制,我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗。 熱誠為您提供寶豐營銷型網(wǎng)站建設(shè),寶豐網(wǎng)站制作、寶豐網(wǎng)頁設(shè)計、寶豐網(wǎng)站官網(wǎng)定制、成都微信小程序服務(wù),打造寶豐網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供寶豐網(wǎng)站排名全網(wǎng)營銷落地服務(wù)。

光發(fā)了代碼不知道你用的是動態(tài)的還是靜態(tài)的數(shù)組

還有就是有沒有shape1(0)呢

動態(tài)的話你的用

load

shape1(i)

放到

for循環(huán)下面就可以了

VB.NET中的TextBox控件詳解

TextBox組件(文本框組件)是一種常用的 也是比較容易掌握的組件 應(yīng)用程序主要使用它來接收使用者于輸入文字信息 在前面內(nèi)容中已經(jīng)或多或少的接觸到TextBox組件 本節(jié)就來詳細(xì)探討一下Visual 中TextBox組件的使用方法 一 TextBox組件 TextBox類 當(dāng)我們使用Visual Basic Net集成開發(fā)環(huán)境開發(fā)應(yīng)用程序時 在從【工具箱】的【W(wǎng)indows窗體】選項卡中向Form 的設(shè)計窗體拖入一個TextBox組件的后 我們可能并沒有感覺到即使時這樣一個簡單的操作 Visual Basic Net都做了很多幕后工作 主要工作和步驟如下 首先實例化System Windows Forms TextBox類 并根據(jù)拖動到窗體的位置和形狀分別設(shè)定TextBox實例的各個屬性 我們看到的設(shè)計窗體 其實是Form 類的一個實例 而Form 類首先是從System Windows Forms Form類繼承而來 Form 類中的成員根據(jù)使用者往窗體中拖入的組件不同而不同 各個成員通過Add或AddRange方法加入到Form 中 這樣拖入的組件才能夠顯示在設(shè)計窗體上 以上這些都完全不同于以前Visual Basic 通過上述步驟 我們不難得到TextBox組件和TextBox類之間的關(guān)系 TextBox組件是命名空間System Windows Forms中的TextBox類的實例 在從【工具箱】的【W(wǎng)indows窗體】選項卡中拖入窗體的任一組件 都是 Net框架類庫—— Net Framework SDK中封裝的某一個類的實例 通過上述步驟也不難看出 Visual Basic Net的確才是真正的面向?qū)ο螅∣OP)的開發(fā)語言 二 TextBox類的成員 TextBox組件使用雖然比較簡單 但TextBox類的構(gòu)成成員卻是非常的豐富 在一般性的編程中 主要涉及到三類 屬性 方法和事件 表 表 和表 分別是TextBox類的常用屬性 方法和事件及其簡單說明 屬性 說明 AcceptsReturn 指示在多行TextBox組件中按ENTER鍵時 是在組件中創(chuàng)建一行新文本還是激活窗體的默認(rèn)按鈕 AcceptsTab 該值指示在多行文本框組件中按TAB鍵時 是否在組件中鍵入一個TAB字符 而不是按選項卡的順序?qū)⒔裹c移動到下一個組件 AllowDrop 獲取或設(shè)置一個值 該值指示組件是否可以接受用戶拖放到它上面的數(shù)據(jù) Anchor 獲取或設(shè)置組件的哪些邊緣錨定到其容器邊緣 BackColor 獲取或設(shè)置組件的背景色 BackgroundImage 獲取或設(shè)置在組件中顯示的背景圖像 BorderStyle 獲取或設(shè)置文本框組件的邊框類型 Bottom 獲取組件的下邊緣與其容器的工作區(qū)的上邊緣之間的距離 CanFocus 獲取一個值 該值指示組件是否可以接收焦點 CanSelect 獲取一個值 該值指示是否可以選中組件 CanUndo 獲取一個值 該值指示用戶在文本框組件中能否撤消前一操作 CharacterCasing 獲取或設(shè)置TextBox組件是否在字符鍵入時修改其大小寫格式 ContextMenu 獲取或設(shè)置與組件關(guān)聯(lián)的快捷菜單 Reated 獲取一個值 該值指示組件是否已經(jīng)創(chuàng)建 Cursor 獲取或設(shè)置當(dāng)鼠標(biāo)指針位于組件上時顯示的光標(biāo) DataBindings 為該組件獲取數(shù)據(jù)綁定 Dock 獲取或設(shè)置組件??康礁溉萜鞯哪囊粋€邊緣 Enabled 獲取或設(shè)置一個值 該值指示組件是否可以對用戶交互作出響應(yīng) Focused 獲取一個值 該值指示組件是否有輸入焦點 Font 獲取或設(shè)置組件顯示的文字的字體 ForeColor 獲取或設(shè)置組件的前景色 MaxLength 獲取或設(shè)置用戶可以在文本框組件中最多鍵入的字符數(shù) Multiline TRUE/FALSE 該值指示它是否為多行文本框組件 PasswordChar 獲取或設(shè)置字符 該字符用于屏蔽單行 ScrollBars 獲取或設(shè)置哪些滾動條應(yīng)出現(xiàn)在多行TextBox 組件中 Text 獲取或設(shè)置文本框中的當(dāng)前文本 TextAlign 設(shè)置文本框內(nèi)文本得對齊方式 TextLength 獲取組件中文本的長度  表 TextBox類的常用屬性及其說明 方法 說明 AppendText 向文本框的當(dāng)前文本追加文本 Clear 從文本框控件中清除所有文本 ClearUndo 從該文本框的撤消緩沖區(qū)中清除關(guān)于最近操作的信息 Copy 將文本框中的當(dāng)前選定內(nèi)容復(fù)制到剪貼板 Cut 將文本框中的當(dāng)前選定內(nèi)容移動到剪貼板中 DoDragDrop 開始拖放操作 Focus 為控件設(shè)置輸入焦點 GetChildAtPoint 檢索位于指定坐標(biāo)處的子控件 GetNextControl 按照子控件的Tab鍵順序向前或向后檢索下一個控件 Hide 對用戶隱藏控件 Paste 用剪貼板的內(nèi)容替換文本框中的當(dāng)前選定內(nèi)容 PointToClient 將指定屏幕點的位置計算成工作區(qū)坐標(biāo) PointToScreen 將指定工作區(qū)點的位置計算成屏幕坐標(biāo) ResetBindings 將DataBindings屬性重置為其默認(rèn)值 Select 選擇控件中的文本 SelectAll 選定文本框中的所有文本 SelectNextControl 激活下一個控件 Show 向用戶顯示控件 SuspendLayout 臨時掛起控件的布局邏輯 Undo 撤消文本框中的上一個編輯操作

表 TextBox類的常用方法及其說明

事件 說明 Click 在單擊文本框時發(fā)生 CursorChanged 當(dāng) Cursor 屬性的值更改時發(fā)生 DoubleClick 在雙擊控件時發(fā)生 DragDrop 在完成拖放操作時發(fā)生 DragEnter 在將對象拖入控件的邊界時發(fā)生 DragLeave 在將對象拖出控件的邊界時發(fā)生 DragOver 在將對象拖到控件的邊界上發(fā)生 EnabledChanged Enabled 屬性值更改后發(fā)生 Enter 進(jìn)入控件時發(fā)生 GiveFeedback 在執(zhí)行拖動操作期間發(fā)生 GotFocus 在控件接收焦點時發(fā)生 KeyDown 在控件有焦點的情況下按下鍵時發(fā)生 KeyPress 在控件有焦點的情況下按下鍵時發(fā)生 KeyUp 在控件有焦點的情況下釋放鍵時發(fā)生 Leave 在輸入焦點離開控件時發(fā)生 LostFocus 當(dāng)控件失去焦點時發(fā)生 MouseDown 當(dāng)鼠標(biāo)指針位于控件上并按下鼠標(biāo)鍵時發(fā)生 MouseEnter 在鼠標(biāo)指針進(jìn)入控件時發(fā)生 MouseHover 在鼠標(biāo)指針懸停在控件上時發(fā)生 MouseLeave 在鼠標(biāo)指針離開控件時發(fā)生 MouseMove 在鼠標(biāo)指針移到控件上時發(fā)生 MouseUp 在鼠標(biāo)指針在控件上并釋放鼠標(biāo)鍵時發(fā)生 MouseWheel 在移動鼠標(biāo)輪并且控件有焦點時發(fā)生 Move 在移動控件時發(fā)生 Paint 在重繪控件時發(fā)生 Resize 在調(diào)整控件大小時發(fā)生

TextBox類的常用事件及其說明當(dāng)然TextBox類除了上述的屬性 方法和事件 還有很多屬性 方法和事件 和很多受保護(hù)的方法和受保護(hù)的屬性 由于它們使用的幾率較少和篇幅所限 就不能一一介紹了 感興趣的朋友可以參閱相關(guān)資料

三.掌握TextBox組件的基本用法 由于TextBox類的成員實在太豐富 一個示例要想介紹上述所有的方法 屬性和事件是不可能 在下面介紹的示例中 將突出介紹在Visual 集成開發(fā)環(huán)境下通過對設(shè)定不同的屬性值實現(xiàn)三種常見的TextBox組件式樣 以及TextBox組件的方法的調(diào)用方法和在Visual Basic Net集成開發(fā)環(huán)境中如何加入TextBox組件不同事件對應(yīng)的處理代碼 讓各位更加熟悉TextBox類和Visual Basic Net開發(fā)環(huán)境 下面是TextBox示例的具體實現(xiàn)步驟 啟動Visual Studio Net 選擇菜單【文件】|【新建】|【項目】后 彈出【新建項目】對話框 將【項目類型】設(shè)置為【Visual Basic項目】 將【模板】設(shè)置為【W(wǎng)indows應(yīng)用程序】 在【名稱】文本框中輸入【TextBox組件】 在【位置】的文本框中輸入【E:\項目】 然后單擊【確定】按鈕 這樣在 E:\VS NET項目 目錄中就產(chǎn)生了名稱為 TextBox組件 的文件夾 并在里面創(chuàng)建了名稱為 TextBox組件 的項目文件 把Visual Studio Net的當(dāng)前窗口切換到【Form VB(設(shè)計)】窗口 并從【工具箱】中的【W(wǎng)indows窗體組件】選項卡中往Form 窗體中拖入下列組件 并執(zhí)行相應(yīng)操作 三個Label組件 三個TextBox組件 分別為TextBox TextBox 和TextBox 按照表 中數(shù)值來設(shè)定設(shè)定組件的主要屬性 請注意TextBox組件中的屬性設(shè)定值

表 【TextBox組件】項目窗體中各組件的主要屬性設(shè)定數(shù)值表

按照表 各值設(shè)定后的TextBox組件三種常用的式樣也就產(chǎn)生了 具體如圖 所示

圖 程序設(shè)計時TextBox組件三種常見使用方法

這三種式樣就是單行的TextBox組件 多行的TextBox組件和用以輸入類似密碼數(shù)據(jù)的TextBox組件 為TextBox 組件添加事件和事件的處理代碼 此次添加的事件的名稱是Leave 當(dāng)TextBox 組件失去焦點時觸發(fā)此事件 添加TextBox 組件的其他事件也可仿照下面的處理方法 下面是利用Visual Basic Net在【TextBox組件】項目中添加TextBox 組件的Leave事件和添加Leave事件的處理代碼的具體步驟 首先把Visual Basic Net的當(dāng)前窗口切換到Form vb的代碼編輯界面 然后在如圖 所示的選擇框中選擇TextBox

圖 選擇TextBox組件

之后 在圖 所示的選擇框中選擇 Leave

圖 選取Leave事件

在選擇 Leave 之后 Visual Basic Net會自動在Form vb中產(chǎn)生TextBox 的Leave事件 在Leave事件的事件處理代碼區(qū)添加下列代碼 下面代碼調(diào)用了TextBox 組件的 Clear 方法并且顯示一個TextBox 組件失去焦點的提示框

TextBox Clear ( ) 清除TextBox 組件的顯示內(nèi)容MsgBox ( 失去焦點! ) 彈出提示框

至此【TextBox組件】項目的全部工作就完成了 圖 是程序編譯后運行界面

圖 【TextBox項目】的運行界面

lishixinzhi/Article/program/net/201311/12721

vb.net入門之分組控件:GroupBox控件

我們對控件進(jìn)行分組的原因不外乎三個

為了獲得清晰的用戶界面而將相關(guān)的窗體元素進(jìn)行可視化分組

編程分組 如對單選按鈕進(jìn)行分組

為了在設(shè)計時將多個控件作為一個單元來移動

在中 有GroupBox Panel TabControl這三個控件可以實現(xiàn)上面所提到的三個分組目的 所以我們稱它們?yōu)榉纸M控件

這三個控件在功用上十分的相似 特別是GroupBox和Panel控件 只存在一點細(xì)微的差別而已(這個差別是 只有GroupBox控件可以顯示標(biāo)題 而只有Panel控件可以有滾動條) 這里我們就先來了解GroupBox控件的使用

GroupBox(控件組)控件一般是作為其他控件的組的容器的形式存在的 這樣有利于用戶識別 使界面變得更加友好(GroupBox控件相當(dāng)于Visual Basic以前版本的Frame控件) 使用控件組控件可以將一個窗體中的各種功能進(jìn)一步進(jìn)行分類 例如 將各種選項按鈕控件分隔開

當(dāng)移動單個GroupBox控件時 它所包含的所有控件也將一起移動

在大多數(shù)情況下 對控件組控件沒有實際的操作 我們用它對控件進(jìn)行分組 通常沒有必要響應(yīng)它的事件 不過 它的Name Text和Font等屬性可能會經(jīng)常被修改 以適應(yīng)應(yīng)用程序在不同階段的要求

GroupBox控件在工具箱中的圖標(biāo)如圖所示

一 GroupBox控件的常用屬性

Anchor和Dock 這兩個屬性是所有有用戶界面的控件都有的定位屬性 這里就不啰嗦了

Name屬性 標(biāo)識控件的對象名稱

Text屬性 顯示在GroupBox控件右上方的標(biāo)題文字 可以用來標(biāo)識該控件組的描述

Font和ForeColor屬性 用于改變GroupBox控件的文字大小以及文字的顏色 需要注意的時候 它不單改變GroupBox控件的Text屬性的文字外觀 同時也改變其內(nèi)部控件的顯示的Text屬性的文字外觀

二 創(chuàng)建一組控件

在窗體上放置GroupBox控件 從工具箱中拖放一個GroupBox控件到窗體上的合適位置 調(diào)整大小

在屬性窗口中改變GroupBox控件的Text屬性 作為它的標(biāo)題

在GroupBox控件內(nèi)拖放其它需要的控件 例如RadioButton控件

設(shè)置示例 如圖一所示

圖一 用控件組控件對單選按鈕分組

我們在拖動單個GroupBox控件的時候 它內(nèi)部的控件也會隨著移動 以保持和GroupBox的相對位置不變 同理 刪除GroupBox控件時 它所包含的所有控件也會被刪除掉

當(dāng)我們調(diào)整GroupBox控件所包含的控件的Anchor和Dock屬性的時候 其參照物將不是Form窗體 而是GroupBox控件了

三 編程添加GroupBox控件以及它所包含的控件

雖然GroupBox控件是在設(shè)計時用視圖設(shè)計布局效果最好 但是無可避免地 很多特殊情況下也是需要在運行做添加控件到控件組中的 這里我們就用代碼來完成上圖一界面的繪制

動態(tài)添加控件一般需要經(jīng)過下面三個步驟

創(chuàng)建要添加的控件實例

設(shè)置新控件的屬性

將控件添加到父控件的 Controls 集合

在Form 代碼的任意位置增加初始化控件的過程InitializeControl() 代碼如下所示

Sub InitializeControl()

首先添加Label和TextBox控件

Dim Label As New System Windows Forms Label

Dim TextBox As New System Windows Forms TextBox

Label

Label Location = New System Drawing Point( )

Label Name = Label

Label Size = New System Drawing Size( )

Label TabIndex =

Label Text = 戶主姓名

TextBox

TextBox Location = New System Drawing Point( )

TextBox Name = TextBox

TextBox Size = New System Drawing Size( )

TextBox TabIndex =

TextBox Text =

把它們添加到父控件Form 的Controls集合中

Me Controls Add(TextBox )

Me Controls Add(Label )

添加三個GroupBox控件

Dim GroupBox As New System Windows Forms GroupBox

Dim GroupBox As New System Windows Forms GroupBox

Dim GroupBox As New System Windows Forms GroupBox

GroupBox

GroupBox BackColor = System Drawing SystemColors Control

GroupBox Location = New System Drawing Point( )

GroupBox Name = GroupBox

GroupBox Size = New System Drawing Size( )

GroupBox TabIndex =

GroupBox TabStop = False

GroupBox Text = 性別

GroupBox

GroupBox Location = New System Drawing Point( )

GroupBox Name = GroupBox

GroupBox Size = New System Drawing Size( )

GroupBox TabIndex =

GroupBox TabStop = False

GroupBox Text = 單元

GroupBox

GroupBox Location = New System Drawing Point( )

GroupBox Name = GroupBox

GroupBox Size = New System Drawing Size( )

GroupBox TabIndex =

GroupBox TabStop = False

GroupBox Text = 樓層

把它們添加到父控件Form 的Controls集合中

Me Controls Add(GroupBox )

Me Controls Add(GroupBox )

Me Controls Add(GroupBox )

添加RadioButton控件并分別繪制在GroupBox控件內(nèi)

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

Dim RadioButton As New System Windows Forms RadioButton

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 男性

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 女性

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 二單元

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 三單元

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 一單元

RadioButton

RadioButton BackColor = System Drawing SystemColors Control

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 四單元

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 二樓

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 三樓

RadioButton

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 一樓

RadioButton

RadioButton BackColor = System Drawing SystemColors Control

RadioButton Location = New System Drawing Point( )

RadioButton Name = RadioButton

RadioButton Size = New System Drawing Size( )

RadioButton TabIndex =

RadioButton Text = 四樓

分別把它們添加到父控件GroupBox的Controls集合中

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

GroupBox Controls Add(RadioButton )

End Sub

把上一頁的代碼復(fù)制添加后 把控件初始化過程InitializeControl()過程添加到Form 的New構(gòu)造函數(shù)中 如下圖二所示

圖二 在New構(gòu)造函數(shù)中添加過程InitializeControl()

現(xiàn)在按F 運行 Form 的窗體控件布局(如下圖三所示)是不是和我們手工布局的圖一的布局是一樣的呢?

lishixinzhi/Article/program/ASP/201311/21749

VB.net怎樣加第三方控件

工具箱右鍵單擊——選擇項……——選擇.net組件或com組件——點擊“瀏覽”選擇控件dll文件,然后工具箱中就會出現(xiàn)新加的控件

名稱欄目:vb.net沙盒控件 vbnet shape控件
鏈接URL:http://muchs.cn/article12/ddcidgc.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供微信小程序建站公司、全網(wǎng)營銷推廣、網(wǎng)站改版、網(wǎng)站制作、

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)

手機(jī)網(wǎng)站建設(shè)