Question

在使用vbscript的HTA中，我试图从DropDown列表中读取一个选项，该列表将为每个选项运行特定代码。

我一直在寻找一些方法来使用DropDown列表的值来运行特定的VBSCRIPT subroutine，但在我的搜索中找不到任何有用的东西。下面的代码确实有效，但它只显示一个列出选项的消息框。任何指针都会非常感激!!

<select name="BuildStepChoice" size="1">
 <option selected="selected" value=" "></option>
 <option value="1">1</option>
 <option value="2">2</option>
</select> &nbsp;

VBSCRIPT

Sub Copychecklist()
Dim VMBuildStep
VMBuildStep = document.getElementById("BuildStepChoice").Value
 If VMBuildStep = 1 Then MsgBox "Picked #1" Else
 If VMBuildStep = 2 Then MsgBox "Picked #2" End If
End Sub

Answer 1

不知道我选择了哪一个，但这就是我最终的结果。

Sub Copychecklist()
 Dim VMBuildStep
 VMBuildStep = document.getElementById("BuildStepChoice").Value
  If (IsNumeric(VMBuildStep)) Then
  VMBuildStep = Int(VMBuildStep)
  If (VMBuildStep >= 1 And VMBuildStep <= 17) Then CreateFile(VMBuildStep)
 End If            
End Sub

HTA / VbScript - 如果从下拉列表中选择语句

1 个答案: