请针对autodesk公司出品的软件inventor中ilogic功能编写一段代码该段代码存储于c代码txt该文件被添加到inventor ilogic的外部规则列表中并且设置为保存前触发该代码代码功能执行时弹出一个输入框并且在输入框中显示当前文档中参数d4的数值

下面是在Inventor iLogic中编写的代码，实现了你描述的功能：

' 弹出一个输入框并显示参数 "d4" 的数值
Dim inputBoxValue As String
inputBoxValue = InputBox("当前参数 d4 的数值为：" & Parameters.Item("d4").Value, "显示参数 d4")

' 将输入框的值写入到文件 "C:\代码.txt"
Dim filePath As String = "C:\代码.txt"
Dim file As System.IO.StreamWriter
file = My.Computer.FileSystem.OpenTextFileWriter(filePath, False)
file.WriteLine(inputBoxValue)
file.Close()

要将该代码添加到Inventor iLogic的“外部规则”列表中，请按照以下步骤操作：

1. 打开 Inventor 并打开一个文档。
2. 单击 "工具" 菜单，然后选择 "iLogic 管理器"。
3. 在 iLogic 管理器窗口中，单击 "外部规则" 选项卡。
4. 单击 "添加规则" 按钮。
5. 在弹出的对话框中，输入规则的名称，并将 "保存前" 事件选择为触发该代码的事件。
6. 在 "规则编辑器" 窗口中，将上述代码复制到编辑器中。
7. 单击 "保存并关闭" 按钮。

现在，当你在该文档中进行保存操作时，将弹出一个输入框显示参数 "d4" 的数值，并将输入框的值写入到文件 "C:\代码.txt" 中