在本章中，讓我們研究以下概念 :

在應(yīng)用程序中添加菜單和子菜單

在表單中添加剪切，復(fù)制和粘貼功能

錨定和對接控件表格

模態(tài)表格

添加菜單和子菜單應(yīng)用程序中的菜單

傳統(tǒng)上，菜單，MainMenu，ContextMenu和MenuItem類用于在Windows應(yīng)用程序中添加菜單，子菜單和上下文菜單.

現(xiàn)在，MenuStrip，ToolStripMenuItem，ToolStripDropDown和ToolStripDropDownMenu控件替換和添加以前版本的菜單相關(guān)控件的功能.但是，保留舊的控件類以便向后兼容和將來使用.

讓我們首先使用舊版本控件創(chuàng)建一個典型的Windows主菜單欄和子菜單，因為這些控件仍然是在舊應(yīng)用程序中使用很多.

以下是一個示例，它顯示了我們?nèi)绾问褂貌藛雾梽?chuàng)建菜單欄:文件，編輯，視圖和項目.文件菜單有子菜單新建，打開和保存.

讓我們雙擊表格并將以下代碼放在打開的窗口中.

Public?Class?Form1

Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?Handles?MyBase.Load

'defining?the?main?menu?bar

Dim?mnuBar?As?New?MainMenu()

'defining?the?menu?items?for?the?main?menu?bar

Dim?myMenuItemFile?As?New?MenuItem("&File")

Dim?myMenuItemEdit?As?New?MenuItem("&Edit")

Dim?myMenuItemView?As?New?MenuItem("&View")

Dim?myMenuItemProject?As?New?MenuItem("&Project")

'adding?the?menu?items?to?the?main?menu?bar

mnuBar.MenuItems.Add(myMenuItemFile)

mnuBar.MenuItems.Add(myMenuItemEdit)

mnuBar.MenuItems.Add(myMenuItemView)

mnuBar.MenuItems.Add(myMenuItemProject)

'?defining?some?sub?menus

Dim?myMenuItemNew?As?New?MenuItem("&New")

Dim?myMenuItemOpen?As?New?MenuItem("&Open")

Dim?myMenuItemSave?As?New?MenuItem("&Save")

'add?sub?menus?to?the?File?menu

myMenuItemFile.MenuItems.Add(myMenuItemNew)

myMenuItemFile.MenuItems.Add(myMenuItemOpen)

myMenuItemFile.MenuItems.Add(myMenuItemSave)

'add?the?main?menu?to?the?form

Me.Menu?=?mnuBar

'?Set?the?caption?bar?text?of?the?form.

Me.Text?=?"IT屋.com"

End?Sub

End?Class

執(zhí)行上述代碼時并使用Microsoft Visual Studio工具欄上的”開始”按鈕運行，它將顯示以下窗口 :

Windows窗體包含一組豐富的類，用于創(chuàng)建具有現(xiàn)代外觀，外觀和感覺的自定義菜單. MenuStrip，ToolStripMenuItem，ContextMenuStrip控件用于有效地創(chuàng)建菜單欄和上下文菜單.

點擊以下鏈接查看他們的詳細信息 :

Sr.No.

Control&說明

1

MenuStrip

它為表單提供了一個菜單系統(tǒng).

2

ToolStripMenuItem

它表示MenuStrip上顯示的可選選項或ContextMenuStrip. ToolStripMenuItem控件替換和添加以前版本的MenuItem控件的功能.

3

ContextMenuStrip

它代表一個快捷菜單.

添加剪切，復(fù)制和粘貼表單中的功能

ClipBoard類公開的方法用于在應(yīng)用程序中添加剪切，復(fù)制和粘貼功能. ClipBoard類提供了在系統(tǒng)剪貼板上放置數(shù)據(jù)和從中檢索數(shù)據(jù)的方法.

它有以下常用方法 :

Sr.No.

方法名稱&說明

1

Clear

從剪貼板中刪除所有數(shù)據(jù).

2

ContainsData

表示是否有剪貼板上指定格式的數(shù)據(jù)，或者可以轉(zhuǎn)換為該格式.

3

ContainsImage

表示是否有數(shù)據(jù)在剪貼板上的Bitmap格式或可以轉(zhuǎn)換為該格式.

4

ContainsText

表示是否有數(shù)據(jù)Text或UnicodeText格式的剪貼板，具體取決于操作系統(tǒng).

5

GetData

從指定的剪貼板中檢索數(shù)據(jù)格式.

6

GetDataObject

檢索系統(tǒng)剪貼板上當(dāng)前的數(shù)據(jù).

7

GetImage

從剪貼板中檢索圖像.

8

GetText

從文本中的剪貼板中檢索文本數(shù)據(jù)或UnicodeText格式，取決于操作系統(tǒng).

9

GetText(TextDataFormat)

以指示的格式從剪貼板中檢索文本數(shù)據(jù)指定的TextDataFormat值.

10

SetData

清除剪貼板，然后以指定的格式添加數(shù)據(jù).

11

SetText(String)

清除剪貼板，然后以Text或UnicodeText格式添加文本數(shù)據(jù)，具體取決于操作系統(tǒng).

以下是一個示例，顯示我們?nèi)绾渭羟?#xff0c;復(fù)制并使用Clipboard類的方法粘貼數(shù)據(jù).請執(zhí)行以下步驟 :

在表單上添加一個富文本框控件和三個按鈕控件.

分別將按鈕的文本屬性更改為剪切，復(fù)制和粘貼.

雙擊在按鈕上添加以下代碼在代碼編輯器中 :

Public?Class?Form1

Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?_

Handles?MyBase.Load

'?Set?the?caption?bar?text?of?the?form.

Me.Text?=?"IT屋.com"

End?Sub

Private?Sub?Button1_Click(sender?As?Object,?e?As?EventArgs)?_

Handles?Button1.Click

Clipboard.SetDataObject(RichTextBox1.SelectedText)

RichTextBox1.SelectedText?=?""

End?Sub

Private?Sub?Button2_Click(sender?As?Object,?e?As?EventArgs)?_

Handles?Button2.Click

Clipboard.SetDataObject(RichTextBox1.SelectedText)

End?Sub

Private?Sub?Button3_Click(sender?As?Object,?e?As?EventArgs)?_

Handles?Button3.Click

Dim?iData?As?IDataObject

iData?=?Clipboard.GetDataObject()

If?(iData.GetDataPresent(DataFormats.Text))?Then

RichTextBox1.SelectedText?=?iData.GetData(DataFormats.Text)

Else

RichTextBox1.SelectedText?=?"?"

End?If

End?Sub

End?Class

執(zhí)行上述代碼并使用開始按鈕avai運行在Microsoft Visual Studio工具欄中，它將顯示以下窗口 :

輸入一些文本并檢查按鈕的工作方式.

在表單中錨定和停靠控件

錨定允許您將控件的錨位置設(shè)置為其容器控件的邊緣，例如表單. Control類的Anchor屬性允許您設(shè)置此屬性的值. Anchor屬性獲取或設(shè)置控件綁定到的容器的邊緣，并確定如何使用其父控件調(diào)整控件的大小.

將控件錨定到窗體時，控件在調(diào)整窗體大小時，它會保持與窗體邊緣及其固定位置的距離.

您可以從”屬性”窗口中設(shè)置控件的Anchor屬性值 :

例如，讓我們在窗體上添加一個Button控件，并將其anchor屬性設(shè)置為Bottom，Right.運行此表單以查看Button控件相對于表單的原始位置.

現(xiàn)在，當(dāng)您拉伸表單時，Button與表單右下角之間的距離保持不變.

控件的停靠意味著停靠它到其容器的一個邊緣.在對接中，控件完全填充容器的某個區(qū)域.

Control類的Dock屬性執(zhí)行此操作. Dock屬性獲取或設(shè)置哪些控件邊框停靠在其父控件上，并確定如何使用其父控件調(diào)整控件的大小.

您可以從Properties設(shè)置控件的Dock屬性值window :

例如，讓我們在窗體上添加一個Button控件，并將其Dock屬性設(shè)置為Bottom.運行此表單以查看Button控件相對于表單的原始位置.

現(xiàn)在，當(dāng)您拉伸表單時，Button會使用表單調(diào)整自身大小.

模態(tài)表格

模態(tài)表格是那些需要關(guān)閉或隱藏的表單，然后才能繼續(xù)使用應(yīng)用程序的其余部分.所有對話框都是模態(tài)形式. MessageBox也是一種模態(tài)形式.

您可以通過兩種方式調(diào)用模態(tài)形式 :

調(diào)用ShowDialog方法

調(diào)用顯示方法

讓我們舉一個例子，我們將創(chuàng)建一個模態(tài)表單，一個對話框.請執(zhí)行以下步驟 :

將表單Form1添加到應(yīng)用程序中，并添加兩個標簽和一個按鈕控件Form1

分別將第一個標簽和按鈕的文本屬性更改為”歡迎使用教程點”和”輸入您的姓名”.將第二個標簽的文本屬性保留為空白.

添加新的Windows窗體，Form2，并添加兩個按鈕，一個標簽，以及Form2的文本框.

分別將按鈕的文本屬性更改為”確定”和”取消”.將標簽的文本屬性更改為”輸入您的姓名:”.

將Form2的FormBorderStyle屬性設(shè)置為FixedDialog，用于給它一個對話框邊框.

將Form2的ControlBox屬性設(shè)置為False.

將Form2的ShowInTaskbar屬性設(shè)置為False.

將OK按鈕的DialogResult屬性設(shè)置為OK，將Cancel按鈕設(shè)置為Cancel.

在Form2的Form2_Load方法中添加以下代碼片段&減號;

Private?Sub?Form2_Load(sender?As?Object，e?As?EventArgs)_

Handles?MyBase.Load

AcceptButton?=?Button1

CancelButton?=?Button2

End?Sub

在Form1的Button1_Click方法中添加以下代碼片段 :

Private?Sub?Form2_Load(sender?As?Object,?e?As?EventArgs)?_

Handles?MyBase.Load

AcceptButton?=?Button1

CancelButton?=?Button2

End?Sub

當(dāng)使用Microsoft Visual Studio工具欄上的開始按鈕執(zhí)行并運行上述代碼時，它將顯示以下窗口 :

點擊”輸入您的姓名”按鈕顯示第二種形式 :

單擊”確定”按鈕將控件和信息從模態(tài)窗體返回到上一個窗體 :

總結(jié)

以上是生活随笔為你收集整理的vb 窗体html表格,VB.Net – 高级表格的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。