创建对话框

从 VBA IDE 中创建对话框的步骤

1. 在“插入”菜单中，单击“用户窗体”打开一个新窗体。将显示两个窗口、一个工具箱和一个空用户窗体。
2. 从工具箱中依次选择并拖动下列控件，将它们放到用户窗体中。如下面的窗体所示放置两个选项按钮 (

   

   )、三个标签 (

   

   )、三个文本框 (

   

   ) 和两个命令按钮 (

   

   )：

   

3. 关闭工具箱。

为单选按钮控件设置特性的步骤

1. 在用户窗体中，选择“OptionButton1”控件。在“视图”菜单中，单击“特性窗口”，为 OptionButton1 更改下列特性：

   (名称) = gp_poly

   Caption = Polygon

   ControlTipText = Polygon Tile Shape

   Accelerator = P

2. 在用户窗体中，选择“OptionButton2”控件。在“特性”窗口中，为 OptionButton2 更改下列特性：

   (名称) = gp_circ

   Caption = Circle

   ControlTipText = Circle Tile Shape

   Accelerator = I

为标签控件设置特性的步骤

1. 在用户窗体中，选择“Label1”控件。在“特性”窗口中，为 Label1 更改下列特性：

   (名称) = label_trad

   Caption = Radius of tiles

   TabStop = True

2. 在用户窗体中，选择“Label2”控件。在“特性”窗口中，为 Label2 更改下列特性：

   (名称) = label_tspac

   Caption = Space between tiles

   TabStop = True

3. 在用户窗体中，选择“Label3”控件。在“特性”窗口中，为 Label3 更改下列特性：

   (名称) = label_tsides

   Caption = Number of sides

   TabStop = True

为文本框控件设置特性的步骤

1. 在用户窗体中，选择“TextBox1”控件。在“特性”窗口中，为 TextBox1 更改下列特性：

   (名称) = gp_trad

2. 在用户窗体中，选择“TextBox2”控件。在“特性”窗口中，为 TextBox2 更改下列特性：

   (名称) = gp_tspac

3. 在用户窗体中，选择“TextBox3”控件。在“特性”窗口中，为 TextBox3 更改下列特性：

   (名称) = gp_tsides

为命令按钮控件和窗体窗口设置特性的步骤

1. 在用户窗体中，选择“CommandButton1”控件。在“特性”窗口中，更改 CommandButton1 的下列特性：

   (名称) = accept

   Caption = OK

   ControlTipText = Accept the options

   Accelerator = O

   Default = True

2. 在用户窗体中，选择“CommandButton2”控件。在“特性”窗口中，更改 CommandButton2 的下列特性：

   (名称) = cancel

   Caption = Cancel

   ControlTipText = Cancel the operation

   Accelerator = C

3. 在窗体背景中所有控件之外的位置单击以选择用户窗体。在“特性”窗口中，更改窗体的下列特性：

   (名称) = gpDialog

   Caption = Garden Path

   现在窗体应如下所示：

   

4. 保存所做的工作。