Fatal编程技术网
  • vbscript/
  • Vbscript HTA，从组合框中删除选定项

Vbscript HTA，从组合框中删除选定项

vbscript combobox

Vbscript HTA，从组合框中删除选定项,vbscript,combobox,hta,Vbscript,Combobox,Hta,因此，我有一个HTA，它根据SCCM客户端安装填充一个组合框，这些安装可用，但尚未运行。除了组合框之外，一切都可以正常工作。无论选择什么程序，都应该运行，然后从组合框中安装和删除。然而，无论我选择什么程序，每次都会删除第一项，我尝试了一些不同的变化，但似乎没有任何效果，任何帮助都是非常感谢的 Dim i strSelectedValues = "" ' Check all the Options of the ListBox For i = 0 To (objComboBox.Options.L

因此，我有一个HTA，它根据SCCM客户端安装填充一个组合框，这些安装可用，但尚未运行。除了组合框之外，一切都可以正常工作。无论选择什么程序，都应该运行，然后从组合框中安装和删除。然而，无论我选择什么程序，每次都会删除第一项，我尝试了一些不同的变化，但似乎没有任何效果，任何帮助都是非常感谢的

Dim i
strSelectedValues = ""
' Check all the Options of the ListBox
For i = 0 To (objComboBox.Options.Length - 1)
' Check if the Current Option is Selected
    If (objComboBox.Options(i).Selected) Then
     ' Collect only the Selected Values
        strSelectedValues = strSelectedValues & objComboBox.Options(i).Value
    End If
Next

'Remove selected program to install from the Combo box list
 ComboBox1.Remove(SelectedItem)
据此，.remove需要删除选项的编号/索引
SelectedItem
似乎未定义/为空/出于实际目的：代码中为零；那么，第一种选择消失似乎是合理的。所以试试看

ComboBox1.Remove ComboBox1.selectedIndex
（可能是通过检查是否有一个选中的选项来保护，或者是否应该进入循环？）