BA EXCEL的窗體是程序面向?qū)ο缶幊痰木唧w體現(xiàn)，是提供給用戶的使用的“用戶界面”，窗體的設(shè)計(jì)類似于網(wǎng)頁的設(shè)計(jì)，簡單、實(shí)用、美觀等都是設(shè)計(jì)者要考慮的因素。

在VBE操作界面菜單中點(diǎn)擊【插入】，選擇【用戶窗體】插入窗體。用鼠標(biāo)點(diǎn)擊窗體彈出【工具箱】窗體，其中標(biāo)準(zhǔn)控件如下圖：

一、窗體間相互調(diào)用

1、窗體設(shè)計(jì)

首先，在VBA管理界面中插入3個窗體。

• 窗體1為歡迎窗體
• 主窗體2中添加1個命令按鈕
• 子窗體3中添加1個命令按鈕

窗體1-歡迎窗體屬性表如下：

注：按表設(shè)計(jì)窗體和標(biāo)簽屬性

窗體2-主窗體屬性表如下：

窗體3-子窗體屬性表如下：

2、窗體視圖

設(shè)計(jì)完成歡迎窗體本身和標(biāo)簽的屬性后，運(yùn)行窗體（點(diǎn)擊三角形按鈕或按F5鍵），效果圖如下：

注：標(biāo)簽字體、顏色等屬性需要修改。特別是標(biāo)簽的BoderStyle屬性需要設(shè)置為0（使得標(biāo)簽無背景）

主窗體視圖如下：

子窗體視圖如下：

3、窗體加載事件

鼠標(biāo)雙擊歡迎窗體打開【代碼】窗口，在窗體的Activate事件中編寫代碼如下：

注：窗體運(yùn)行激發(fā)Activate事件。事件中第2行代碼可動態(tài)加載窗體背景圖片，第3行代碼中窗體打開5秒后調(diào)用過程CloseSplash（關(guān)閉該窗體）

在工程中插入一個模塊，在模塊中編寫中過程CloseSplash代碼如下：

Private Sub CloseSplash()
Unload frmSplash
frmMain.Show
End Sub

注：過程中第2行代碼卸載歡迎窗體，第3行代碼顯示主窗體

主窗體的“調(diào)用子窗體”命令按鈕（名稱為cmdCallSub）的Click事件代碼如下：

Private Sub cmdCallSub_Click()
frmMain.Hide
frmSub.Show
End Sub

注：事件中第2行代碼隱藏主窗體，第3行代碼顯示子窗體

子窗體的“返回主窗體”命令按鈕（名稱為cmdCallMain）的Click事件代碼如下：

Private Sub cmdCallMain_Click()
Unload Me
frmMain.Show
End Sub

注：事件中第2行代碼卸載子窗體，第3行代碼顯示子窗體

最后，鼠標(biāo)雙擊【工程】中【ThisWorkbook】對象，選用【W(wǎng)orkBook】的Open事件，如圖：

【W(wǎng)orkBook】對象的Open事件代碼如下：

Private Sub Workbook_Open()
frmSplash.Show
End Sub

注：打開EXCEL文檔時顯示歡迎窗體

這樣，每次打開打開EXCEL文檔時顯示歡迎窗體時，首先顯示歡迎窗體，5秒后自動進(jìn)入主窗體；在主窗體中點(diǎn)擊“調(diào)用子窗體”命令按鈕，隱藏主窗體并顯示子窗體；在子窗體中點(diǎn)擊“返回主窗體”命令按鈕，卸載子窗體并顯示主窗體。從而實(shí)現(xiàn)了一個簡單的系統(tǒng)框架。

二、標(biāo)準(zhǔn)控件運(yùn)用

2、文字框設(shè)計(jì)

文字框主要用來接收用戶輸入信息，也可以用來顯示信息供用戶修改。文字框控件可接收用戶輸入的文本、數(shù)字、單元格引用或格式等數(shù)據(jù)。

I、文字框常用屬性

• EnterKeyBehavior：設(shè)置文字框中按下Enter鍵的效果，和MultiLine屬性同時設(shè)為True時，Enter鍵可以實(shí)現(xiàn)換行，否則將按Tab鍵功能順序跳轉(zhuǎn)到下一個對象；
• MaxLength：設(shè)置文字框中能夠輸入字符的最大數(shù)量。默認(rèn)為0，表示輸入字符沒有數(shù)量限制；
• MultiLine：設(shè)置文字框能否接受和顯示多行文本。屬性值為True顯示多行文本，F(xiàn)alse只容納單行文本；
• PasswordChar：文字框中字符顯示為“*”，用于密碼口令輸入；
• ScrollBars：設(shè)置文字框是否有垂直或水平滾動條；
• Text：設(shè)置或返回文字框中內(nèi)容，與Value屬性相同。

II、文字框常用方法

• Copy：將文本框中選中的文本復(fù)制到剪貼板；
• Cut：將文本框中選中的文本移動到剪貼板；
• Paste：把剪貼板上的文本粘貼到文本框中。

III、文字框常用事件

• AfterUpdate：更改文本框中數(shù)據(jù)后觸發(fā)該事件；
• BeforeUpdate：文本框中數(shù)據(jù)被改變之前觸發(fā)該事件。事件參數(shù)Cancel設(shè)置為True,焦點(diǎn)仍然停留在文字框上，并且AfterUpdate事件和Exit事件都不會發(fā)生；
• Change：文字框中數(shù)據(jù)發(fā)生變化后觸發(fā)該事件；
• Enter：通過鼠標(biāo)或Tab鍵進(jìn)入文字框（成為焦點(diǎn)）時觸發(fā)該事件；
• Exit：離開文字框（成為焦點(diǎn)）時觸發(fā)該事件。

IV、文字框運(yùn)用實(shí)例 - 信息注冊

文字框及窗體屬性表如下：

按屬性表設(shè)計(jì)的文字框窗體效果圖如下：

按面向?qū)ο蟪绦蛟O(shè)計(jì)思路，分布為不同文本框設(shè)計(jì)相應(yīng)代碼。

• 為【出生年月】文本框的BeforeUpdate事件編寫檢查代碼，用來檢查輸入的日期格式是否正確。代碼如下：

Private Sub txtBirthday_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
If Not IsDate(txtBirthday.Value) Then
  MsgBox "請輸入正確的出生日期！", , "提示"
  txtBirthday.SelStart=0
  txtBirthday.SelLength=Len(txtBirthday.Value)
  Cancel=True
End If
End Sub

注：如果在【出生年月】文本框中輸入錯誤的日期格式，將彈出錯誤提示窗口，文本框中錯誤文本被自動全選。正確的日期格式如，1997-12-24、1997/12/24、12、24、1997等

• 為【登記】命令按鈕的Click事件編寫代碼，將窗體中用戶輸入的文本框內(nèi)容添加到工作表中。代碼如下：

Private Sub cmdSave_Click()
If txtName.Value="" Then
  MsgBox "請輸入員工姓名！", , "提示"
  txtName.SetFocus
  Exit Sub
End If
  setData                 'setData為自定義過程
End Sub

• 在【模塊1】編寫setData自定義過程代碼如下：

Public Sub setData()
Dim intRow As Integer
intRow=Sheet1.Range("A1").CurrentRegion.Rows.Count  '獲取已有數(shù)據(jù)行
intRow=intRow + 1                                   '計(jì)算出新行（數(shù)據(jù)錄入行）
Sheet1.Cells(intRow, 1)=frmInput.txtName.Value
If frmInput.optMan Then
  Sheet1.Cells(intRow, 2)="男"
Else
  Sheet1.Cells(intRow, 2)="女"
End If
Sheet1.Cells(intRow, 3)=frmInput.txtNation.Value
Sheet1.Cells(intRow, 4)=frmInput.txtBirthday.Value
Sheet1.Cells(intRow, 5).NumberFormatLocal="@"       '設(shè)置單元格為文本格式
Sheet1.Cells(intRow, 5)=frmInput.txtID.Value
Sheet1.Cells(intRow, 6).NumberFormatLocal="@"
Sheet1.Cells(intRow, 6)=frmInput.txtPhone.Value
Sheet1.Cells(intRow, 7)=frmInput.txtAddress.Value
Sheet1.Cells(intRow, 8)=frmInput.txtMemo.Value
End Sub

注：如果工作表記錄為空，第1次執(zhí)行過程從第2行起記錄用戶輸入數(shù)據(jù)，第1行為預(yù)留表頭

• 為【關(guān)閉】命令按鈕的Click事件編寫代碼如下：

Private Sub cmdClose_Click()
Unload Me   '卸載窗體
End Sub

按要求完成文字框設(shè)計(jì)與運(yùn)用步驟，運(yùn)行后可以按設(shè)計(jì)要求按行錄入數(shù)據(jù)，即完成了一個簡單的信息錄入系統(tǒng)。當(dāng)然，一個實(shí)用的信息錄入系統(tǒng)還需要更多、更嚴(yán)格的文本框數(shù)據(jù)校驗(yàn)、重復(fù)記錄校驗(yàn)等。

2、復(fù)選框設(shè)計(jì)

復(fù)選框用來表示一個特點(diǎn)的狀態(tài)是選定還是清除，在程序中為用戶提供從兩種方案中任選其一的操作。復(fù)選框可以彼此獨(dú)立工作，用戶可以同時選擇多個復(fù)選框（即多選選擇情況下使用復(fù)選框）

I、復(fù)選框常用屬性和事件

除了共有的屬性外，復(fù)選框有如下幾個特殊屬性。

• Picture：為復(fù)選框指定一個圖片；
• Value：設(shè)置或返回復(fù)選框的選擇狀態(tài)。當(dāng)選中復(fù)選框時，該屬性為True、反之為False；
• TripleState：決定用戶能否為復(fù)選框指定Null狀態(tài)。該屬性為True時可以在3個狀態(tài)（True、False、Null）中選擇,反之在2個狀態(tài)（True、False）中選擇。

復(fù)選框最常用的事件是Click（鼠標(biāo)點(diǎn)擊事件），用戶選中復(fù)選框時其屬性Value值變?yōu)門rue。程序運(yùn)行時，如果使用代碼改變復(fù)選框的Value屬性值也會發(fā)生Click事件。

II、復(fù)選框運(yùn)用實(shí)例 - 設(shè)置EXCEL選項(xiàng)

窗體及復(fù)選框?qū)傩员砣缦拢?/span>

按屬性表設(shè)計(jì)的復(fù)選框窗體效果圖如下：

鼠標(biāo)雙擊用戶窗體進(jìn)入【代碼】窗口，為窗體的Initialize（初始化）事件編寫代碼獲取EXCEL中的相關(guān)選項(xiàng)值，并使用該值初始化用戶窗體中的各復(fù)選框。代碼如下：

Private Sub UserForm_Initialize()
With ActiveWorkbook.Windows(1)
  chkDridLines.Value=.DisplayGridlines
  chkHeadings.Value=.DisplayHeadings
  chkRuler.Value=.DisplayRuler
  chkHScrollBar.Value=.DisplayHorizontalScrollBar
  chkVScrollBar.Value=.DisplayVerticalScrollBar
  chkTabs.Value=.DisplayWorkbookTabs
End With
End Sub

當(dāng)用戶設(shè)置不同復(fù)選框的值后，單擊【確定】按鈕，即可以根據(jù)復(fù)選框中的值來修改EXCEL中的相關(guān)選項(xiàng)。代碼如下：

Private Sub cmdOK_Click()
With ActiveWorkbook.Windows(1)
  .DisplayGridlines=chkDridLines.Value
  .DisplayHeadings=chkHeadings.Value
  .DisplayRuler=chkRuler.Value
  .DisplayHorizontalScrollBar=chkHScrollBar.Value
  .DisplayVerticalScrollBar=chkVScrollBar.Value
  .DisplayWorkbookTabs=chkTabs.Value
End With
End Sub

窗體中【放棄】按鈕代碼如下：

Private Sub cmdCancel_Click()
Unload Me   '卸載窗體
End Sub

3、選項(xiàng)按鈕設(shè)計(jì)

選項(xiàng)按鈕控件即網(wǎng)頁或其它編程語言中的單選按鈕。通常選項(xiàng)按鈕是分組的，在一組選項(xiàng)按鈕中只有一個處于選中或按下狀態(tài)。

I、選項(xiàng)按鈕常用屬性和事件

除了共有的屬性外，選項(xiàng)按鈕有如下幾個特殊屬性。

• GroupName：創(chuàng)建一個互相排斥的選項(xiàng)按鈕控件組；
• Picture：為選項(xiàng)按鈕指定一個圖片；
• Value：設(shè)置或返回選項(xiàng)按鈕的選擇狀態(tài)。當(dāng)選中選項(xiàng)按鈕時，該屬性為True、反之為False；
• TripleState：決定用戶能否為選項(xiàng)按鈕指定Null狀態(tài)。該屬性為True時可以在3個狀態(tài)（True、False、Null）中選擇,反之在2個狀態(tài)（True、False）中選擇。

和復(fù)選框相同，選項(xiàng)按鈕最常用的事件也是Click（鼠標(biāo)點(diǎn)擊事件），用戶選中選項(xiàng)按鈕時其屬性Value值變?yōu)門rue。程序運(yùn)行時，如果使用代碼改變選項(xiàng)按鈕的Value屬性值也會發(fā)生Click事件。

II、選項(xiàng)按鈕運(yùn)用實(shí)例 - 設(shè)置窗體字號和顏色

向用戶窗體添加1個標(biāo)簽控件、1個多行文字控件、2個框架控件和8個選項(xiàng)按鈕控件，并設(shè)置各控件的屬性值如下表：

按屬性表設(shè)計(jì)的選項(xiàng)按鈕窗體效果圖如下：

為【確定】命令按鈕Click事件編寫處理代碼如下：

Private Sub cmdSetStyle_Click()
Dim cc As Control
For Each cc In Me.Controls    '遍歷窗體控件
  'If UCase(TypeName(cc))="TEXTBOX" Then cc.Text="如果為文本框"
  If UCase(TypeName(cc))="OPTIONBUTTON" Then     '如果為選項(xiàng)按鈕   
    If cc.Value And cc.GroupName="gName1" Then frmFontsize.txtFont.Font.Size=CInt(cc.Caption)
    If cc.Value And cc.GroupName="gName2" Then    '按鈕選中且為第2組
      If cc.Caption="黑色" Then frmFontsize.txtFont.ForeColor=vbBlack
      If cc.Caption="紅色" Then frmFontsize.txtFont.ForeColor=vbRed
      If cc.Caption="綠色" Then frmFontsize.txtFont.ForeColor=vbGreen
      If cc.Caption="黃色" Then frmFontsize.txtFont.ForeColor=vbYellow
    End If
  End If
Next
End Sub

注：代碼遍歷窗體所有控件，并通過判斷屬性值設(shè)置文本框中字體和顏色

4、列表框設(shè)計(jì)

列表框主要用來顯示項(xiàng)目列表。當(dāng)項(xiàng)目總數(shù)超過列表框控件高度時，列表框會自動添加垂直滾動條，用戶可以從列表框中選擇一項(xiàng)或多項(xiàng)數(shù)據(jù)選項(xiàng)。

I、列表框常用屬性

列表框顯示多行文本，并且每行文本是一個可以獨(dú)立處理的項(xiàng)。其特有屬性如下：

• ColumnCount：設(shè)置列表框顯示的列數(shù)；
• ColumnHeads：設(shè)置是否顯示列表框的列標(biāo)題；
• ColumnWidths：指定列表框各列的寬度；
• List：獲取或設(shè)置列表框中列表項(xiàng)的內(nèi)容（通過List(下標(biāo)值)）；
• ListCount：表示列表框中的列表項(xiàng)數(shù)量；
• ListIndex：返回列表框中選中選項(xiàng)的序號；
• MultiSelect：是否允許列表框進(jìn)行多項(xiàng)；
• Selected：表示列表框中各個列表項(xiàng)是否被選中，為數(shù)組。

注：當(dāng)MultiSelect屬性設(shè)置為Extended或Simple，必須用列表框的Selected屬性確定選定條目

II、列表框常用方法

• AddItem：增加列表項(xiàng)。一般格式，
  [對象名].AddItem[項(xiàng)字符串][.索引值]
  其中，項(xiàng)字符串用雙引號""界定，索引值從0開始；
• RemoveItem：移除列表項(xiàng)。一般格式，
  [對象名].RemoveItem[索引值]
  其中，索引值是必須的，表示欲刪除哪一項(xiàng)；
• Clear：清除列表中所有內(nèi)容。

III、列表框運(yùn)用實(shí)例 - 列表框間移動數(shù)據(jù)

• 向用戶窗體添加2個列表框控件、8個命令按鈕和2個標(biāo)簽控件。設(shè)置各控件的屬性值如下表：

• 用戶窗體顯示效果如下：

• 在戶窗體的Initialize事件中編寫代碼用于從工作表添加數(shù)據(jù)到列表框。

Private Sub UserForm_Initialize()
Dim r As Range, i As Integer
With ActiveWorkbook.Worksheets("sheet1")
  i=.Range("A1").End(xlDown).Row            '已有數(shù)據(jù)行數(shù)
  Set r=.Range(Cells(2, 1), Cells(i, 1))    '獲取已有數(shù)據(jù)引用
End With
For i=1 To r.Rows.Count                     '添加數(shù)據(jù)到列表框
  lstLeft.AddItem r(i)
Next i
If lstLeft.ListCount >=1 Then
  cmdToRight.Enabled=True
  cmdToRightAll.Enabled=True
Else
  cmdToLeft.Enabled=False
  cmdToLeftAll.Enabled=False
End If
cmdToLeft.Enabled=False
cmdToLeftAll.Enabled=False
End Sub

在運(yùn)行這段代碼前，先在工作表sheet1中錄入數(shù)據(jù)，如圖：

并運(yùn)行代碼后效果如下圖：

• 點(diǎn)擊命令按鈕 >>（cmdToRightAll），將左側(cè)數(shù)據(jù)項(xiàng)全部移至右側(cè)列表框中。

Private Sub cmdToRightAll_Click()
Do While lstLeft.ListCount > 0        '循環(huán)處理所有數(shù)據(jù)項(xiàng)
  lstRight.AddItem lstLeft.List(0)    '添加列表框中的第1項(xiàng)
  lstLeft.RemoveItem 0                '刪除左側(cè)列表框第1項(xiàng)
Loop
If lstRight.ListCount > 0 Then
  cmdToLeft.Enabled=True
  cmdToLeftAll.Enabled=True
End If
cmdToRight.Enabled=False
cmdToRightAll.Enabled=False
End Sub

• 點(diǎn)擊命令按鈕 <<（cmdToLeftAll），將右側(cè)數(shù)據(jù)項(xiàng)全部移至左側(cè)列表框中。

Private Sub cmdToLeftAll_Click()
Do While lstRight.ListCount > 0
  lstLeft.AddItem lstRight.List(0)
  lstRight.RemoveItem 0
Loop
If lstLeft.ListCount > 0 Then
  cmdToRight.Enabled=True
  cmdToRightAll.Enabled=True
End If
cmdToLeft.Enabled=False
cmdToLeftAll.Enabled=False
End Sub

• 點(diǎn)擊命令按鈕 >（cmdToRight），將左側(cè)選中數(shù)據(jù)項(xiàng)移至右側(cè)列表框中。

Private Sub cmdToRight_Click()
If lstLeft.ListIndex >=0 Then
  lstRight.AddItem lstLeft.Text          '右側(cè)列表框增加新數(shù)據(jù)項(xiàng)
  lstLeft.RemoveItem lstLeft.ListIndex   '刪除左側(cè)列表框選中項(xiàng)
End If
If lstRight.ListCount > 0 Then
  cmdToLeft.Enabled=True
  cmdToLeftAll.Enabled=True
End If
If lstLeft.ListCount > 0 Then
  cmdToRight.Enabled=True
  cmdToRightAll.Enabled=True
Else
  cmdToRight.Enabled=False
  cmdToRightAll.Enabled=False
End If
End Sub

注：應(yīng)先選中左側(cè)某數(shù)據(jù)項(xiàng)，然后再點(diǎn)擊單項(xiàng)右移按鈕

• 點(diǎn)擊命令按鈕 <（cmdToLeft），將右側(cè)選中數(shù)據(jù)項(xiàng)移至左側(cè)列表框中。

Private Sub cmdToLeft_Click()
If lstRight.ListIndex >=0 Then
  lstLeft.AddItem lstRight.Text            '左側(cè)列表框增加新數(shù)據(jù)項(xiàng)
  lstRight.RemoveItem lstRight.ListIndex   '刪除右側(cè)列表框選中項(xiàng)
End If
If lstLeft.ListCount > 0 Then
  cmdToRight.Enabled=True
  cmdToRightAll.Enabled=True
End If
If lstRight.ListCount > 0 Then
  cmdToLeft.Enabled=True
  cmdToLeftAll.Enabled=True
Else
  cmdToLeft.Enabled=False
  cmdToLeftAll.Enabled=False
End If
End Sub

注：應(yīng)先選中右側(cè)某數(shù)據(jù)項(xiàng)，然后再點(diǎn)擊單項(xiàng)左移按鈕

• 點(diǎn)擊命令按鈕【添加圖書】，將用戶通過對話框輸入的書名添加到左側(cè)列表框中。

Private Sub cmdAdd_Click()
Dim str As String
str=InputBox("請輸入向列表框添加的新書名：")
If Trim(str) <> "" Then lstLeft.AddItem str
End Sub

Private Sub cmdDel_Click()
If lstLeft.ListIndex >=0 Then
 lstLeft.RemoveItem lstLeft.ListIndex
End If
End Sub

Private Sub cmdDel_Click()
If lstLeft.ListIndex >=0 Then
 lstLeft.RemoveItem lstLeft.ListIndex
End If
End Sub

Private Sub cmdClose_Click()
Unload frmList
End Sub

5、復(fù)合框設(shè)計(jì)

復(fù)合框?qū)⑽谋究蚝土斜砜虻奶匦越Y(jié)合在一起，即可以在該控件中的文本框部分輸入文字信息，也可以在控件的列表框部分選擇某項(xiàng)信息。

I、復(fù)合框常用屬性

• ListRows：指定復(fù)合框的下拉列表中顯示的最大行數(shù)。如果列表中的題目數(shù)超出了ListRows屬性的值，則在復(fù)合框的列表框部分的右邊出現(xiàn)滾動條；
• Style：該屬性設(shè)置復(fù)合框的兩種形式。FmStyleDropDownCombo下拉式復(fù)合框、值為0，它可可輸入編輯區(qū)和下拉式列表組成，用戶即可由編輯區(qū)輸入內(nèi)容，也從下拉列表中選擇信息。FmStyleDropDownList下拉式列表框、值為2，用戶只能從列表中選擇信息；
• Text：用于返回在列表中選擇的文本或在編輯區(qū)中輸入的文本，也可在窗體設(shè)計(jì)時設(shè)定。

II、復(fù)合框常用事件和方法

和列表框類似，復(fù)合框也使用AddItem、RemoveItem等方法。根據(jù)復(fù)合框的類型不同，復(fù)合框所響應(yīng)的事件也有所不同。當(dāng)復(fù)合框的Style屬性值為0或2時，能夠響應(yīng)Click和Dropdown事件，當(dāng)tyle屬性值為0時還可以接收Change事件。

III、復(fù)合框運(yùn)用實(shí)例 - 電腦配置信息

• 向用戶窗體添加5個標(biāo)簽控件、1個文本框控件、4個復(fù)合框控件和2個命令按鈕控件。設(shè)置各控件的屬性值如下表：

• 用戶窗體顯示效果如下：

• 在戶窗體的Initialize事件中編寫代碼用于從工作表添加數(shù)據(jù)到列表框。

Private Sub UserForm_Initialize()
With cmbCPU
  .AddItem "QX6850 3.0GHz"
  .AddItem "QX6800 3.93GHz"
  .AddItem "QX6700 2.66GHz"
  .AddItem "X7800 2.6GHz"
  .AddItem "QX6450 2.6GHz"
  .AddItem "QX6250 3.4GHz"
  .AddItem "QX2850 3.6GHz"
  .AddItem "QX5870 3.8GHz"
  .AddItem "QX9150 3.23GHz"
  .AddItem "QX4250 3.13GHz"
  .Text=.List(0)
End With
With cmbMem
  .AddItem "512M"
  .AddItem "1G"
  .AddItem "2G"
  .AddItem "3G"
  .AddItem "4G"
  .Text=.List(0)
End With
With cmbHDD
  .AddItem "80G"
  .AddItem "120G"
  .AddItem "160G"
  .AddItem "250G"
  .Text=.List(0)
End With
With cmbDisp
  .AddItem "CTR 19寸"
  .AddItem "CTR 21寸"
  .AddItem "LCD 17寸"
  .AddItem "LCD 19寸"
  .AddItem "LCD 22寸"
  .Text=.List(0)
End With
End Sub

• 點(diǎn)擊【確定】按鈕，可在左側(cè)文本框中顯示計(jì)算機(jī)配置列表。該按鈕Click事件代碼如下：

Private Sub cmdAdd_Click()
Dim str As String
str="CPU: " & cmbCPU.Value & Chr(13)    'Chr(13)表示換行
str=str & "內(nèi)存: " & cmbMem.Value & Chr(13)
str=str & "硬盤: " & cmbHDD.Value & Chr(13)
str=str & "顯示器: " & cmbDisp.Value
txtComputer.Value=str
End Sub

6、滾動條設(shè)計(jì)

滾動條分為橫向和縱向滾動條，它是可以放在窗體中的獨(dú)立控件。通過將已放置在窗體中滾動條進(jìn)行水平或垂直拖動來調(diào)整其它對象的屬性值。

I、滾動條常用屬性

• LargeChange：當(dāng)用戶點(diǎn)擊滾動條區(qū)域時返回Value屬性值的改變量；
• SmallChange：當(dāng)用戶點(diǎn)擊滾動條箭頭時返回Value屬性值的改變量；
• Max：當(dāng)滾動框處于底部或最右位置時，返回滾動條Value屬性值的的最大設(shè)置值；
• Mim：當(dāng)滾動框處于頂部或最左位置時，返回滾動條Value屬性值的的最小設(shè)置值；
• Value：滾動條的當(dāng)前位置，其返回值介于Min和Max之間，包括這兩個值。Max為32767、Min為0。

注：Min和Max得屬性值范圍是?32768～32767?32768～32767，默認(rèn)值

II、滾動條常用事件

• Change：滾動滾動框或通過代碼改變Value值時觸發(fā)該事件；
• Scroll：滾動框被重新定位，或按水平或垂直方向滾動時發(fā)生該事件。

注：Change是滾動完成后觸發(fā)，Scroll是在滾動過程中觸發(fā)

III、滾動條運(yùn)用實(shí)例 - 顯示工作表比例

• 向用戶窗體添加2個框架框控件、3個滾動條控件、1個文本框控件和1個命令按鈕控件。設(shè)置各控件的屬性值如下表：

• 用戶窗體顯示效果如下：

• 在戶窗體的Initialize事件中編寫代碼設(shè)置滾動條的初始值。

Private Sub UserForm_Initialize()
txtZoom.Value=ActiveWindow.Zoom            '文本框顯示當(dāng)前比例
With scbZoom
  .Min=10
  .Max=400
  .SmallChange=1
  .LargeChange=10
  .Value=ActiveWindow.Zoom
End With
With scbH
  .Min=1
  .Max=ActiveSheet.Cells.Columns.Count     '最大列數(shù)
  .SmallChange=1
  .LargeChange=10
  .Value=ActiveWindow.ScrollColumn         '當(dāng)前列
End With
With scbV
  .Min=1
  .Max=ActiveSheet.Cells.Rows.Count        '最大行數(shù)
  .SmallChange=1
  .LargeChange=10
  .Value=ActiveWindow.ScrollRow            '當(dāng)前行
End With
End Sub

• 為縮放工作表框架中滾動條的Change事件編寫代碼對當(dāng)前窗口進(jìn)行縮放。

Private Sub scbZoom_Change()
With ActiveWindow
  .Zoom=scbZoom.Value       '用滾動條的值設(shè)置當(dāng)前窗口的縮放
  txtZoom.Text=.Zoom        '設(shè)置文本框的值
  .ScrollColumn=scbH.Value  '最左邊的列號
  .ScrollRow=scbV.Value     '最頂端的行號
End With
End Sub

• 為窗體右側(cè)滾動工作表框架中水平滾動條的Change事件編寫代碼。

Private Sub scbH_Change()
ActiveWindow.ScrollColumn=scbH.Value
End Sub

7、旋轉(zhuǎn)按鈕設(shè)計(jì)

旋轉(zhuǎn)按鈕控件主要用來輸入一定范圍內(nèi)的整數(shù)值，一般將旋轉(zhuǎn)按鈕和文本框結(jié)合起來使用。點(diǎn)擊旋轉(zhuǎn)按鈕只會更改旋轉(zhuǎn)按鈕的值，還需要編寫代碼修改與之結(jié)合的文本框的值。

I、旋轉(zhuǎn)按鈕常用屬性

• SmallChange：點(diǎn)擊旋轉(zhuǎn)按鈕箭頭時的改變量；
• Max：旋轉(zhuǎn)按鈕上限值；
• Mim：旋轉(zhuǎn)按鈕上限值；
• Value：旋轉(zhuǎn)按鈕當(dāng)前值。

II、旋轉(zhuǎn)按鈕常用事件

旋轉(zhuǎn)按鈕控件的Value屬性值改變時，將觸發(fā)Change事件，一般在該事件中編寫代碼來控制Value屬性值，并應(yīng)用的與之關(guān)聯(lián)的文本框中。另外，當(dāng)點(diǎn)擊旋轉(zhuǎn)按鈕的上箭頭（↑）和下箭頭（↓ ）時觸發(fā)SpinUp和SpinDown事件。

III、旋轉(zhuǎn)按鈕運(yùn)用 - 修改日期和時間

• 向用戶窗體添加8個標(biāo)簽控件、3個滾動條控件、6個文本框控件、6個旋轉(zhuǎn)按鈕控件和2個命令按鈕控件。設(shè)置各控件的屬性值如下表：

• 用戶窗體顯示效果如下：

• 在戶窗體的Initialize事件中編寫代碼獲取系統(tǒng)當(dāng)前日期和時間，然后分別顯示在相應(yīng)文本框中，并根據(jù)當(dāng)前的值初始化各旋轉(zhuǎn)按鈕的值。

Private Sub UserForm_Initialize()
txtYear.Value=Year(Date)
txtMonth.Value=Month(Date)
txtDay.Value=Day(Date)
txtHour.Value=Hour(Time)
txtMinute.Value=Minute(Time)
txtSecond.Value=Second(Time)
End Sub

在日期設(shè)置過程中，需要為反映天數(shù)的文本框（txtDay）設(shè)置最大天數(shù)。

• 對文本框（txtDay）的Change事件編程設(shè)置最大天數(shù)。

Private Sub txtDay_Change()
Dim dTemp As Date
dTemp=DateSerial(txtYear.Value, txtMonth.Value + 1, 1)
spbDay.Max=Day(dTemp - 1)
MsgBox spbDay.Max
End Sub

• 點(diǎn)擊旋轉(zhuǎn)按鈕的上箭頭（↑）觸發(fā)SpinUp事件代碼。

Private Sub spbYear_SpinUp()
txtYear.Value=txtYear.Value + spbYear.SmallChange
End Sub

• 點(diǎn)擊旋轉(zhuǎn)按鈕的下箭頭（↓）觸發(fā)SpinDown事件代碼。

Private Sub spbYear_SpinDown()
txtYear.Value=txtYear.Value - spbYear.SmallChange
End Sub

注：窗體中其它旋轉(zhuǎn)按鈕處理代碼相同，這里不再一一列出

8、多頁設(shè)計(jì)

多頁控件可以中窗體中顯示一系列不同的頁面，在處理可以劃分為不同類別的大量信息時很有用。利用多頁控件能夠?qū)⑾嚓P(guān)數(shù)據(jù)組織在一起顯示出來。

I、多頁控件的常用屬性

多頁控件對象為MultiPage，在該控件中還有一個子對象Page。在窗體中點(diǎn)擊多頁控件對象時，將選中當(dāng)前的Page對象。Page對象類似一個獨(dú)立的窗體，每個Page對象都包括自己一套獨(dú)立的控件。

A. MultiPage對象屬性

• MultiRow：設(shè)置控件是否有多行標(biāo)簽，當(dāng)MultiRow屬性值為True時標(biāo)簽分行顯示，為False時，標(biāo)簽將在一行中顯示，右側(cè)將出現(xiàn)左右滾動箭頭；
• Value：標(biāo)識當(dāng)前激活頁，0表示第1頁。通過該屬性可獲得當(dāng)前激活頁，也可通過給Value屬性賦值來激活對應(yīng)頁。

B. Page對象屬性

• ScrollBars：設(shè)置頁面是否有垂直或水平滾動條（取值為FmScrollBarsNone：不顯示滾動條、FmScrollBarsHorizontal：顯示水平滾動條、FmScrollBarsVertical：顯示垂直滾動條、FmScrollBarsBoth：同時顯示垂直和水平滾動條）；
• TransitionEffect：設(shè)置從一頁轉(zhuǎn)換成另一頁時所用的可視效果；
• TransitionPeriod：以毫秒為單位定義一個頁面過渡效果的歷時長度。

II、多頁控件的常用事件

多頁控件支持Click等事件，其常用事件是Change事件。當(dāng)用戶選擇不同頁（改變Value屬性值）時觸發(fā)Change事件，此時Value屬值為新激活頁的序號。

III、多頁運(yùn)用 - 報(bào)名登記

向用戶窗體添加1個多頁控件和2個命令按鈕（這里命令按鈕屬性設(shè)置從略），將控件分為2頁，每頁屬性分別進(jìn)行設(shè)置。注意，如果需要2頁以上的多頁時，用鼠標(biāo)右鍵登記多頁控件上方（多頁標(biāo)簽右邊無標(biāo)簽部分）。

• 第1頁【基本信息】頁包括3個文本框和2個單選按鈕控件：

• 第2頁【家庭信息】頁包括4個文本框控件：

注：多頁控件不同頁面中控件不能同名

• 用戶窗體顯示效果如下：

• 點(diǎn)擊窗體【保存】按鈕，分別從多頁控件各個分頁中的控件獲得用戶數(shù)據(jù)，然后將數(shù)據(jù)保存在指定工作表中。

Private Sub cmdSave_Click()
Dim r As Integer
If txtName.Value="" Then
  MsgBox "請輸入學(xué)生姓名！", vbCritical + vbOKOnly
  Exit Sub
End If
With Worksheets("sheet2")
  r=.UsedRange.Rows.Count + 1 '定位添加數(shù)據(jù)的行
  .Cells(r, 1)=txtName.Value
  If optMan.Value Then
    .Cells(r, 2)="男"
  Else
    .Cells(r, 2)="女"
  End If
  .Cells(r, 3)=txtAge.Value
  .Cells(r, 4)=txtAddress.Value
  .Cells(r, 5)=txtFName.Value
  .Cells(r, 6)=txtFPhone.Value
  .Cells(r, 7)=txtFUnit.Value
  .Cells(r, 8)=txtFAddress.Value
End With
End Sub

注：在向工作表錄入數(shù)據(jù)前，可按分頁標(biāo)簽提示在sheet2第1行輸入標(biāo)題

創(chuàng)建自定義窗體對話框（用戶界面設(shè)計(jì)）是運(yùn)用VBA EXCEL設(shè)計(jì)數(shù)據(jù)管理系統(tǒng)的基礎(chǔ)，是用戶開發(fā)數(shù)據(jù)管理系統(tǒng)的入口和控制中樞。

介
HTML 是什么？
htyper text markup language 即超文本標(biāo)記語言。
超文本: 就是指頁面內(nèi)可以包含圖片、鏈接，甚至音樂、程序等非文字元素。
標(biāo)記語言: 標(biāo)記（標(biāo)簽）構(gòu)成的語言。
什么是標(biāo)簽:
是由一對尖括號包裹的單詞構(gòu)成 例如: <html> *所有標(biāo)簽中的單詞不可能以數(shù)字開頭.
標(biāo)簽不區(qū)分大小寫.<html> 和 <HTML>. 推薦使用小寫.
標(biāo)簽分為兩部分: 開始標(biāo)簽<a> 和 結(jié)束標(biāo)簽</a>. 兩個標(biāo)簽之間的部分 我們叫做標(biāo)簽體.
有些標(biāo)簽功能比較簡單.使用一個標(biāo)簽即可.這種標(biāo)簽叫做自閉和標(biāo)簽.例如: <br/><hr/><input/><img/>
標(biāo)簽可以嵌套.但是不能交叉嵌套. <a><b></a></b>
標(biāo)簽的屬性:
通常是以鍵值對形式出現(xiàn)的. 例如 name="nick"
屬性只能出現(xiàn)在開始標(biāo)簽 或 自閉和標(biāo)簽中.
屬性名字全部小寫. *屬性值必須使用雙引號或單引號包裹 例如 name="nick"
如果屬性值和屬性名完全一樣.直接寫屬性名即可. 例如 readonly
HTML5基本結(jié)構(gòu):
將HTML4中的DTD定義為如下結(jié)構(gòu)即可，其他不變。
<!DOCTYPE HTML>
HTML5支持的兩種指定頁面使用的字符集的方式:
使用Content-Type指定字符集
<meta http-equiv="Content-Type" content="text/html ;charset=UTF-8"/>
直接使用charset指定字符集
<meta charset="UTF-8">
<head> 標(biāo)簽
<title>
<title>Title</title>
<base/>
標(biāo)簽為頁面上的所有鏈接規(guī)定默認(rèn)地址或默認(rèn)目標(biāo)。
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8">
<title>Title</title>
<base href="http://p_w_picpaths.cnblogs.com/cnblogs_com/suoning/845162/"/>
<base target="_blank" />
</head>
<body>
<img src="o_s.png" alt="圖片加載失敗。。。"/>
<a href="http://cnblogs.com/suoning/">nick blogs</a>
</body>
</html>
# 上面這段代碼中，<img>標(biāo)簽的src屬性是一個相對路徑，因?yàn)?lt;head>中通過base標(biāo)簽設(shè)置了鏈接的默認(rèn)地址，
所以img的src實(shí)際的地址是“http://p_w_picpaths.cnblogs.com/cnblogs_com/suoning/845162/o_s.png”。
同樣的，<a>中只是指定了href，并未指定target屬性，所以也會使用base中設(shè)置的target屬性的值。
<link/>
引用外部文檔，常見于引用外部樣式。重要屬性有三個：rel、href、type。
rel 規(guī)定文檔與被鏈接文檔之間的關(guān)系。
rel="dns-prefetch" 預(yù)先解析緩存文檔中使用的域名，目的是為了提高網(wǎng)頁訪問速度。使用場景：在一個網(wǎng)頁頻繁使用其他域名資源時。
rel="shortcut icon"或rel="icon" 在收藏和標(biāo)題欄上用于顯示的圖標(biāo)。示例：<link rel="icon" href="http://p_w_picpaths.cnblogs.com/cnblogs_com/suoning/845162/o_s.png">。注意：IE瀏覽器只支持ico格式，為了兼容IE，圖片文件采用ico格式。
rel="stylesheet" 引用外部樣式表。
rel="nofollow" 用于指示搜索引擎不要追蹤（爬蟲抓取），減少垃圾鏈接。用于<a>標(biāo)簽，使用場景：網(wǎng)頁不被信任或是不希望唄搜索引擎錄入的網(wǎng)站。
href 資源的路徑（相對路徑/絕對路徑）。
type 規(guī)定被連接文檔的MIME類型，用于明確文件的打開方式。例如：.ico文件 p_w_picpath/x-icon。
<meta/>
定義關(guān)于HTML文檔的元數(shù)據(jù)。 重要的屬性有三個：http-equiv、name、content
http-equiv 把content屬性值關(guān)聯(lián)到http頭部。
Content-Type（瀏覽器接受的文檔類型，一般是text/html）
refresh（網(wǎng)頁刷新，以秒為單位）
expires（設(shè)定網(wǎng)頁到期時間，一旦過期，必須到服務(wù)器上重傳）
<meta http-equiv="Content-Type" content="text/html ;charset=UTF-8"/>
<meta http-equiv="Refresh" content="2">
<meta http-equiv="Refresh" content="2;URL=https://www.baidu.com">
<meta http-equiv="expires" content="6 Jun 2016"/>
name 把content屬性關(guān)聯(lián)到一個名稱。
keywords（搜索關(guān)鍵字，用于搜索引擎抓取信息的顯示）
description（搜索到網(wǎng)站后顯示的網(wǎng)頁內(nèi)容簡描述）
author（站點(diǎn)制作者信息）
generator（用以說明生成工具）
name也可以根據(jù)特定的功能自定義，在新浪網(wǎng)中有使用360認(rèn)證和搜狐認(rèn)證（<meta name="360-site-verification"content="63349**********"/>、<meta name="sogou_site_verification"content="BVI*******"/>）。
<meta name="keywords" content="搜索關(guān)鍵字">
<meta name="description" content="簡要描述">
<meta name="author" content="http://cnblogs.com/suoning">
<meta name="generator" content="用以說明生成工具">
content 定義與http-equiv或name屬性相關(guān)的元信息，是必要的屬性。
<body> 標(biāo)簽
1、塊級標(biāo)簽和內(nèi)聯(lián)標(biāo)簽
塊級標(biāo)簽：<p><h1><table><ol><ul><form><div>
內(nèi)聯(lián)標(biāo)簽：<a><input><img><sub><sup><textarea><span>
block（塊）元素的特點(diǎn)
① 總是在新行上開始；
② 高度，行高以及外邊距和內(nèi)邊距都可控制；
③ 寬度缺省是它的容器的100%，除非設(shè)定一個寬度。
④ 它可以容納內(nèi)聯(lián)元素和其他塊元素
inline（內(nèi)聯(lián)）元素的特點(diǎn)
① 和其他元素都在一行上；
② 高，行高及外邊距和內(nèi)邊距不可改變；
③ 寬度就是它的文字或圖片的寬度，不可改變
④ 內(nèi)聯(lián)元素只能容納文本或者其他內(nèi)聯(lián)元素
對行內(nèi)元素，需要注意如下
設(shè)置寬度width 無效。
設(shè)置高度height 無效，可以通過line-height來設(shè)置。
設(shè)置margin 只有左右margin有效，上下無效。
設(shè)置padding 只有左右padding有效，上下則無效。注意元素范圍是增大了，但是對元素周圍的內(nèi)容是沒影響的。
2、基本標(biāo)簽
<h1>~<h6> 標(biāo)題標(biāo)簽.
<p>: 段落標(biāo)簽. 包裹的內(nèi)容被換行.并且也上下內(nèi)容之間有一行空白.
　　　　style="text-indent: 2em"可以設(shè)置樣式為首行縮進(jìn)兩個字符。
　　　　<blockquote></blockquote>可以用來設(shè)置整個段落的縮進(jìn)。
<b> <strong>: 加粗標(biāo)簽.
<strike>: 為文字加上一條中線.
<u>: 文字下方加下劃線.
<em> <i>: 文字變成斜體.
<sup>和<sub>: 上角標(biāo) 和 下角標(biāo).
<br>:換行.
<hr>:水平線.
<div>
塊級標(biāo)簽。塊級標(biāo)簽常用于布局，行級標(biāo)簽常用語顯示內(nèi)容。
　　 div的顯示通常使用id或class來標(biāo)識。id為唯一的標(biāo)簽標(biāo)識，class為標(biāo)簽的類標(biāo)識。
　　 div的大小是由內(nèi)容來決定的，默認(rèn)情況下，高度由內(nèi)容的高度決定，寬度適應(yīng)屏幕。
　　 可以容納其他元素，是一個容器。
<span>
3、特殊符號
　　> >
　　< <
　　 空格
　 " 引號
　　© 版權(quán)符號
特殊符號 符號碼
" " ;
& & ;
< < ;
> > ;
© ;
® ;
± ± ;
× × ;
§ § ;
¢ ;
¥ ;
· · ;
&euro ;
£ ;
&trade ;

4、<a> 超鏈接標(biāo)簽(錨標(biāo)簽)
重要屬性有三個：href、target、name
href 超鏈接地址：可以是Web上任意資源，包括圖片，網(wǎng)頁，樣式，腳本文件等。href="#"時，表示被鏈接頁面就是當(dāng)前頁面。
target 文檔打開時要顯示的目標(biāo)位置，屬性值一般有：_blank（新窗口中打開）、_self（默認(rèn)，在超鏈接所在的容器中打開）、_parent（在超鏈接的父容器中打開）、_top（整個容器中打開）、name（框架名稱）。
name 錨記名稱。作用：跳轉(zhuǎn)到文檔的某個地方。返回首頁。
# 跳轉(zhuǎn)網(wǎng)頁
<a href="http://cnblogs.com/suoning" target="_blank">Nick Blogs</a>
# 跳轉(zhuǎn)錨記書簽名稱
<a name="top"><h3>Top！</h3></a>
<div style="height: 800px"></div>
<a href="#top">top</a>
1.標(biāo)簽最簡式
<a href="mailto:xxx@xx.com">郵件聯(lián)系</a>
2.標(biāo)簽幫你填抄送地址
<a href="mailto:xxx@xx.com?cc=xxxx@xx.com">郵件聯(lián)系</a>
3.標(biāo)簽幫你填暗送地址
<a href="mailto:xxx@xx.com?bcc=xxxx@xx.com">郵件聯(lián)系</a>
4.暗,抄
<a href="xxxxx@xx.com">郵件聯(lián)系</a>
5.標(biāo)簽幫你填主題
<a href="mailto:xxx@xx.com?subject=這是主題">郵件聯(lián)系</a>
6.填郵件內(nèi)容
<a href="mailto:xxx@xx.com?body=這是內(nèi)容">郵件聯(lián)系</a>
7.多址發(fā)送
<a href="mailto:xxx@xx.com,xxxx@xx.com">郵件聯(lián)系</a>
# http://shang.qq.com/v3/widget.html
<a target="_blank" href="http://wpa.qq.com/msgrd?v=3&uin=630571017&site=qq&menu=yes"><img border="0" src="http://wpa.qq.com/pa?p=2:630571017:51" alt="點(diǎn)擊這里給我發(fā)消息" title="點(diǎn)擊這里給我發(fā)消息"/></a>
<a href="tencent://message/?uin=630571017" target="_blank"><img style="border:0px;" src=http://wpa.qq.com/pa?p=1:707321921:13></a>
# 更多圖片地址如下：
# http://wpa.qq.com/pa?p=1:707321921:1
# http://wpa.qq.com/pa?p=1:707321921:2
# http://wpa.qq.com/pa?p=1:707321921:3
# http://wpa.qq.com/pa?p=1:707321921:4
# http://wpa.qq.com/pa?p=1:707321921:5
# http://wpa.qq.com/pa?p=1:707321921:6
# http://wpa.qq.com/pa?p=1:707321921:7
# http://wpa.qq.com/pa?p=1:707321921:8
# http://wpa.qq.com/pa?p=1:707321921:9
# http://wpa.qq.com/pa?p=1:707321921:10
# http://wpa.qq.com/pa?p=1:707321921:11
# http://wpa.qq.com/pa?p=1:707321921:12
# http://wpa.qq.com/pa?p=1:707321921:13
5、<img> 圖形標(biāo)簽
行級標(biāo)簽，用來顯示圖片。
重要屬性有：src、title、alt、width、height、align。
src 圖片地址。
title 鼠標(biāo)懸浮在圖片上的文字。
alt 圖片找不到時要替換的文字。如果圖片資源使用的是外網(wǎng)資源，則不會顯示要替換的文字。如果使用的是本網(wǎng)站的資源（相對路徑給出），則找不到圖片時會顯示替換的文字，并保留圖片設(shè)置的寬高結(jié)構(gòu)。
align 圖片周圍文字的垂直對齊情況。常用的屬性值有：top（與圖片的頂部對齊）、middle（與圖片的中部對齊）、bottom（默認(rèn)，與圖片的底部對齊）。
width 圖片的寬
height 圖片的高 (寬高兩個屬性只用一個會自動等比縮放.)
<img src="http://p_w_picpaths.cnblogs.com/cnblogs_com/suoning/845162/o_ns.png" alt="圖片加載失敗。。。" title="The knife girl, kiss"/>
6、列表標(biāo)簽　
<ul> :無序列表標(biāo)簽
<li>:列表中的每一項(xiàng).
<ol> :有序列表標(biāo)簽
<li>:列表中的每一項(xiàng).
<li>主要的屬性有：type、value兩個:
type指明項(xiàng)目的類型，屬性值有：A，a，I，i，1，disc（實(shí)心圓），square（實(shí)心正方形），circle（空心圓）。
value表示序號值從幾開始。
<dl> 定義列表
<dt> 列表標(biāo)題
<dd> 列表項(xiàng)
<ur>
<li type="circle">A</li>
<li type="1">B</li>
<li type="1">C</li>
</ur>
<ol>
<li value="3">3</li>
<li>4</li>
</ol>
<dl>
<dt><i>標(biāo)題</i></dt>
<dd>第一項(xiàng)</dd>
<dd>第二項(xiàng)</dd>
<dd>第三項(xiàng)</dd>
</dl>
　　
7、<table> 表格標(biāo)簽
<table border="1">
<thead>
<tr>
<th>序號</th>
<th>姓名</th>
</tr>
</thead>
<tbody>
<tr>
<th>1.</th>
<td>nick</td>
</tr>
<tr>
<th>2.</th>
<td>jenny</td>
</tr>
</tbody>
</table>
<table> 表格標(biāo)簽
border:（表格邊框）
align（水平對齊方式）
bgcolor（背景顏色）
cellpadding（內(nèi)邊距，單元格與內(nèi)容之間的距離）
cellspacing（外邊距，單元格的間距，設(shè)置為0時，表格變?yōu)閷?shí)線表格）
width（表格的寬度，可以用%或者像素，最好通過css來設(shè)置長寬）
<caption> 表格的標(biāo)題
<tr> 表格的數(shù)據(jù)行，table row
<th> 表格的表頭名稱，與<td>不同在于文字采用加粗居中的形式顯示，table head cell
<td> 單元格，用來顯示表格內(nèi)容，table data cell
<thead> 表格頭部，使結(jié)構(gòu)更加分明
<tbody> 表格主體部分，使結(jié)構(gòu)更加分明
rowspan 單元格豎跨多少行，作用在th或者td上
colspan 單元格橫跨多少列（即合并單元格），作用在th或者td上
<table>
<caption>xxxxxxxxxx</caption>
<thead>
<tr>
<th>序號</th>
<th>姓名</th>
<th>年齡</th>
<th>女神</th>
</tr>
</thead>
<tbody>
<tr>
<th>1.</th>
<td>nick</td>
<td>18</td>
<td>可可西</td>
</tr>
<tr>
<th>2.</th>
<td>jenny</td>
<td>21</td>
<td>nick!!!</td>
</tr>
</tbody>
</table>
8、<form>表單標(biāo)簽
表單屬性
HTML 表單用于接收不同類型的用戶輸入，用戶提交表單時向服務(wù)器傳輸數(shù)據(jù)，從而實(shí)現(xiàn)用戶與Web服務(wù)器的交互。表單標(biāo)簽, 要提交的所有內(nèi)容都應(yīng)該在該標(biāo)簽中。
屬性：action、method、enctype
action 表單要提交的地址，用于處理表單的內(nèi)容（一般是提交字典到后臺的一個接口，這個接口是java寫成的，提交到這個接口后后臺就知道如何處理這些數(shù)據(jù)了）。
method 提交的方法，默認(rèn)是get方式提交。
get: 1.提交的鍵值對.放在地址欄中url后面. 2.安全性相對較差. 3.對提交內(nèi)容的長度有限制.
post:1.提交的鍵值對不在地址欄. 2.安全性相對較高. 3.對提交內(nèi)容的長度理論上無限制.
enctype 對表單數(shù)據(jù)進(jìn)行編碼，默認(rèn)都是要編碼的。格式為：application/x-www-form-urlencoded（表單默認(rèn)的編碼格式，表單發(fā)送前對所有字符進(jìn)行編碼。編碼規(guī)則：空格轉(zhuǎn)換為“+”號，特殊符號轉(zhuǎn)換為ASC HEX值）。提交普通的文本內(nèi)容到服務(wù)器就可以采用這種默認(rèn)的編碼方式。當(dāng)你需要提交的是一個文件時，編碼就需要采用另一種格式：multipart/form-data（不對字符編碼，文件上傳時使用）。text/plain（是一種純文本編碼，空格轉(zhuǎn)換為“+”號，但是不對特殊字符進(jìn)行編碼）。
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8">
<title>Title</title>
</head>
<body>
<form action="https://www.baidu.com/s">
<input type="text" name="wd">
<input type="submit" value="百度一下">
</form>
</body>
</html>
<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="UTF-8">
<title>Title</title>
</head>
<body>
<form action="https://www.sogou.com/web">
<input type="text" name="query">
<input type="submit" value="搜狗搜索">
</form>
</body>
</html>
表單元素
<input> type 屬性：
text 文本框輸入（默認(rèn)text文本框類型）。
autocomplete（自動完成輸入的內(nèi)容，要求表單元素要有name屬性才有自動完成的效果，off表示自動完成不可用，on表示自動完成可用）
disabled（設(shè)置或者獲取控件的狀態(tài)，默認(rèn)是false即可用，等于true時不可用，不能輸入內(nèi)容）
　　　　password 密碼框。（以下屬性text和password共有）
size（指定表單元素的初始寬度。當(dāng)type為text或password時，表單元素的大小以字符為單位，對于其他元素，寬度以像素為單位）
maxlength（type為text或password時，表示輸入的最大字符數(shù)），有利于防止sql的注入攻擊
readonly 只讀.　
　　　　　　placeholder 框內(nèi)預(yù)置內(nèi)容(灰色)，寫上內(nèi)容時才消失
radio 單選按鈕。屬性：
name（將name的值設(shè)置為相同值，才表示一組數(shù)據(jù)，才能實(shí)現(xiàn)單選功能）
value（必須要寫，提交到服務(wù)器的key值，實(shí)際開發(fā)過程中value一般是編號）
checked（是否被選中的狀態(tài)）
checkbox 復(fù)選框。
name（名字一定要一樣一樣的，才表示是一組數(shù)據(jù)，添加到同一value值列表提交到服務(wù)器）
value（必須要寫，提交到服務(wù)器的key值，實(shí)際開發(fā)過程中value一般是編號）
checked（是否被選中的狀態(tài)）
file 文件域，上傳文件（不同的瀏覽器表現(xiàn)形式不同）
　　　　submit 提交按鈕。用于提交表單。
　　　　reset 重置按鈕。清空表單的輸入，恢復(fù)到表單默認(rèn)的狀態(tài)。
button 普通按鈕。一般結(jié)合javascript使用。
　　　　p_w_picpath 圖片按鈕，用來提交表單，與submit是一樣的效果。
src（圖片路徑）
　　　　hidden 隱藏字段。
value（隱藏的內(nèi)容）
　　　　color 顏色標(biāo)簽。value指定顏色值（采用#十六進(jìn)制數(shù)表示）。
　　　　date 日期。value值指定默認(rèn)的日期，格式為****-**-**（年月日）。
　　　　datetime-local 顯示本地時間，value值指定默認(rèn)的時間，格式為2016-05-20T11:10:10（年月日T時分秒）。
　　　　number 數(shù)字向上或者向下滑動。可以填數(shù)字然后向上或者向下選擇不同的值。
　　　　range 滑動標(biāo)簽。min（指定最小值）、max（指定最大值）、value（指定當(dāng)前默認(rèn)值）。
　　　　week 每年的周數(shù)。value指定哪一年第幾周，格式為2016-W25（2016年第25周）。
<textarea> 文本域標(biāo)簽。默認(rèn)表現(xiàn)形式是可以輸入很多行文本的文本框。
name （表單提交項(xiàng)的key）
　　　　cols（設(shè)置文本域?qū)挾龋?br> rows（設(shè)置文本域高度，即行數(shù)）
<select> 下拉框標(biāo)簽。使用時要結(jié)合<option>子標(biāo)簽一起使用。
name:表單提交項(xiàng)的key
size：選項(xiàng)個數(shù)
multiple：多選
<option> 下拉選中的每一項(xiàng)
value（表單提交項(xiàng)的值）
selected（selected下拉選默認(rèn)被選中）
<optgroup>為每一項(xiàng)加上分組
<label> 把元素與文本結(jié)合起來
友好設(shè)計(jì)：不只是選中復(fù)選框才能選中并打鉤，要求點(diǎn)擊對應(yīng)的文字也能選中該復(fù)選框。
這種情況下要用到<label>標(biāo)簽的for屬性（設(shè)置或獲取給定標(biāo)簽對象指定到的對象，值=另一個元素的id號即可）
<label for="name">姓名</label>
<input id="name" type="text">
<fieldset> 對表單中的相關(guān)元素進(jìn)行分組
<fieldset>
<legend>溫馨提示</legend>
<div align="middle">不要忘記點(diǎn)贊哦==</div>
</fieldset>
value: 表單提交項(xiàng)的值
對于不同的輸入類型，value 屬性的用法也不同：
type="button", "reset", "submit" - 定義按鈕上的顯示的文本
type="text", "password", "hidden" - 定義輸入字段的初始值
type="checkbox", "radio", "p_w_picpath" - 定義與輸入相關(guān)聯(lián)的值
框架
<frameset> 框架
用來劃分窗體，不能放在<body>中，否則沒有效果。
cols （縱向分割頁面。其數(shù)值表示方法有三種：“30%、30（或者30px）、*”；數(shù)值的個數(shù)代表分成的視窗數(shù)目且數(shù)值之間用“,”隔開。“30%”表示該框架區(qū)域占全部瀏覽器頁面區(qū)域的30%；“30”表示該區(qū)域橫向?qū)挾葹?0像素；“*”表示該區(qū)域占用余下頁面空間。例如：cols="25%,200,*" 表示將頁面分為三部分，左面部分占頁面30%，中間橫向?qū)挾葹?00像素，頁面余下的作為右面部分。）
rows（橫向分割頁面。屬性和cols一樣）
frameborder（設(shè)置是否顯示框架邊框。設(shè)定值只有0、1；0 表示不要邊框，1 表示要顯示邊框）
border（框架之間的距離，一般設(shè)置為0）
bordercolor（邊框的顏色）
framespacing（設(shè)置框架與框架間的保留的空白距離）
<frameset cols="40%,*,*"> 第一個框架占整個瀏覽器窗口的40%,剩下的空間平均分配給另外兩個框架。
<frameset cols="*,*,*,*"> 瀏覽器窗口等分為四部分。
<iframe> 框架
元素會創(chuàng)建包含另外一個文檔的內(nèi)聯(lián)框架（即行內(nèi)框架）
name （設(shè)置框架名稱。此為必須設(shè)置的屬性）
src （設(shè)置此框架要顯示的網(wǎng)頁名稱或路徑。此為必須設(shè)置的屬性）
scrolling （設(shè)置是否要顯示滾動條。設(shè)定值為auto, yes, no）
bordercolor （設(shè)置框架的邊框顏色）
frameborder （設(shè)置是否顯示框架邊框。設(shè)定值只有0、1；0 表示不要邊框，1 表示要顯示邊框）
noresize （設(shè)置框架大小是否能手動調(diào)節(jié)）
marginwidth （設(shè)置框架邊界和其中內(nèi)容之間的寬度）
marginhight （設(shè)置框架邊界和其中內(nèi)容之間的高度）
width（設(shè)置框架寬度）
height （設(shè)置框架高度）