使用 Visual Studio 显示对话框的步骤

Visual Basic 2008 快速入门

如果您的计算机上还没有安装 Visual Basic 2008 Express，请从 Microsoft® 网站下载并进行安装。该下载是免费的。
打开 Visual Basic 2008 Express，然后创建类库类型的项目。
将该项目命名为 ClassLibrary1（默认名称），然后单击“确定”。将您键入的名称准确地记在一张纸上。以后此名称在这些指令中十分重要。
系统将显示一个新窗口，“方案资源管理器”位于该窗口的右上角。
在“方案资源管理器”中，在该项目名称上单击鼠标右键并选择“添加”，然后从子菜单中选择“新建项”。系统将显示“添加新项”对话框。
选择“对话框”模板，然后单击“添加”。
系统将在 Windows Form Designer 中显示对话框的图形视图。您可以使用此界面将控件添加至对话框。

屏幕左侧的“工具箱”列出了您可以添加至对话框的控件。对于此项目，请添加文本框以显示 Inventor 参数的值，并且可让您编辑该参数。
从“工具箱”面板的“常用控件”组中单击“文本框”并将其拖放至对话框中的灰色区域。您可以根据需要重新调整对话框的大小。
为该文本框添加标签，以显示参数名称。
小心避开标签和文本框，双击对话框的背景以显示代码编辑器。系统将显示以下代码。
立即将光标移动至以下行下方 -
```
Public Class Dialog1
```
添加此行 -
```
Public d0 As Double
```
将光标放在子例程 OK_Button_Click 的顶部，Me.DialogResult... 语句的前面，然后按 Enter 键以添加新行。
在新行上，添加 -
```
d0 = TextBox1.Text
```
您的代码显示如下 -
使用“文件”“保存”或者“文件”“全部保存”保存您的工作。
现在，您基本可以构建项目了。当您执行构建操作时，Visual Basic 会创建 DLL 文件。您可以通过修改构建操作的输出路径指定 Visual Basic 创建此文件的位置。
单击项目标题所在的选项卡，然后再次单击“编译”选项卡。输出路径为 -
Program Files\Autodesk\Inventor {版本号}\Bin\iLogicAdd\
若要构建项目，请在顶部的菜单中单击“构建”选项卡。如果构建过程成功完成，则会在屏幕左下角的状态栏中显示“构建成功”消息。
使用“全部保存”再次保存您的工作，并打开 Inventor。
使用“添加规则”创建名为 Form Rule 的规则，该规则由以下代码组成 -
```
AddReference "ClassLibrary1"
Sub Main()
dim dlg as new ClassLibrary1.Dialog1
dlg.d0 = d0
i = dlg.ShowDialog()
if (i = vbOK)then
d0 = dlg.d0
end if
End Sub
```
注：也可以使用“编辑规则”对话框的“向导”选项卡上的“为对话框创建规则”创建此代码。

此规则会将 Inventor 参数 d0 的当前值发送给对话框，然后显示该对话框。使用对话框的用户可以在对话框中编辑该值。如果该用户单击“确定”，则会将对话框中的值重新指定给该参数。

创建对话框以显示和修改参数值

打开 Visual Studio。
创建类库类型的项目。
在“方案资源管理器”中，在该项目名称上单击鼠标右键，然后依次选择“添加”“新建项”“对话框”。
系统将在 Windows Form Designer 中显示对话框的图形视图。您可以使用此界面将控件添加至对话框。
单击“视图”“工具箱”以预览可用的控件。
如果您需要有显示 Inventor 参数值并进行编辑的功能，请添加文本框控件。为每个文本框添加标签，以显示参数名称。
双击对话框的背景。
代码编辑器将显示在名为 Dialog1_Load 的新子例程中。
在此子例程中，在子例程结尾前面添加此行 -
```
TextBox1.Text = d0
```
将光标移动至以下行下方 -
```
Public Class Dialog1
```
添加此行 -
```
Public d0 As Double
```

在名为 OK_Button_Click 的子例程顶部添加此行 -

d0 = TextBox1.Text

现在您的代码显示如下 -

Imports System.Windows.Forms
Public Class Dialog1
Public d0 As Double 
Private Sub OK_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OK_Button.Click  
  d0 = TextBox1.Text
  Me.DialogResult = System.Windows.Forms.DialogResult.OK
  Me.Close()
End Sub
Private Sub Cancel_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Cancel_Button.Click
  Me.DialogResult = System.Windows.Forms.DialogResult.Cancel  
  Me.Close()
End Sub
Private Sub Dialog1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
   TextBox1.Text = d0
End Sub
End Class

构建项目，并使用“文件”“全部保存”保存项目。

构建项目的同时会创建一个 DLL。您可以：

将该 DLL 复制到 iLogicAdd 目录中，该目录位于 Autodesk Inventor 程序的 Bin 目录下（通常位于 C:\Program Files\Autodesk\Inventor {版本号}\Bin\iLogicAdd）。
更改项目设置，以将该 DLL 自动发送至该目录。使用 “iLogic 配置”命令可更改 iLogic 查找 DLL 的目录。请参见“展开 iLogic 功能”，以获取有关在规则中使用 DLL 文件的详细信息。

以下示例规则使用对话框：

AddReference "ClassLibrary1"
Sub Main()
dim dlg as new ClassLibrary1.Dialog1
dlg.d0 = d0
i = dlg.ShowDialog()
if (i = vbOK) then
d0= dlg.d0
end if
End Sub

此规则会将 Inventor 参数 d0 的当前值发送给对话框，然后显示该对话框。使用对话框的用户可以在对话框中编辑该值。如果该用户单击“确定”，则会将对话框中的值重新指定给该参数。

可以自动生成类似的对话框代码。在“编辑规则”对话框中，选择“向导”选项卡，然后选择“为对话框创建规则”。