Как запустить скрытый элемент, а затем показать его, когда я выбираю его из раскрывающегося списка, HTA? - PullRequest
0 голосов
/ 25 мая 2018

Несколько вопросов в одном посте.Я делаю сценарий HTA, в котором есть несколько раскрывающихся списков, но затем есть опция 'custom'.Когда я нажимаю «Пользовательский», я хотел бы, чтобы текстовое поле и некоторые слова предлагали пользователю ввести число в миллисекундах, чтобы отобразить его под ним, а затем скрыть, если я выберу другой вариант.

Мои вопросы: 1. Как запустить текстовое поле и слова над ним скрыты?2. Как сделать так, чтобы он отображался / исчезал в зависимости от выбора пользователя в раскрывающемся списке?

Я опубликую соответствующий код, который у меня есть на данный момент, когда я пытался, но он не работает.Обратите внимание, это мой первый раз, когда я возился с hta, поэтому некоторые вещи могут быть излишними, или я могу пропустить некоторые части, так как я просто извлек соответствующие части из своего скрипта.Также прямо сейчас текстовое поле и слова не скрыты при запуске, так как я не знаю, как это сделать.

<BODY>
<SCRIPT LANGUAGE="VBScript">
Set wshShell = CreateObject("WScript.Shell")

Sub btn01_OnClick
    Dim strProduct

    Dim Timerdelay

oElements = Window.Message.SelectedIndex
    strProduct = Window.Message.Options(oElements).Text

Select Case strProduct
        Case "1 Second"
            Timerdelay=1000
            CustomTime.style.visibility="hidden"
            ShowTime.style.visibility="hidden"
        Case "3 Seconds"
            Timerdelay=3000
            CustomTime.style.visibility="hidden"
            ShowTime.style.visibility="hidden"
        Case "5 Seconds"
            Timerdelay=5000
            CustomTime.style.visibility="hidden"
            ShowTime.style.visibility="hidden"
        Case "30 Seconds"
            Timerdelay=30000
            CustomTime.style.visibility="hidden"
            ShowTime.style.visibility="hidden"
        Case "0.5 Seconds"
            Timerdelay=500
            CustomTime.style.visibility="hidden"
            ShowTime.style.visibility="hidden"
        Case "Custom"
            CustomTime.style.visibility="visable"
            ShowTime.style.visibility="visable"
            Timerdelay= CustomTime.Value
    End Select
End Sub
</SCRIPT>

<span id=ShowTime><P>Enter Your Time Delay In Miliseconds<P>
<input type="text" name="CustomTime" size="30"></span>

<Input Type = "Button" Name = "btn01" VALUE = "START">

</BODY>

1 Ответ

0 голосов
/ 04 июня 2018

Вы можете использовать атрибут onchange='myfunctionName(possible_value)' в раскрывающемся списке.В связанной функции проверьте значение раскрывающегося списка, и ваш случай переключения должен работать.Кроме того, проверьте наличие синтаксической ошибки, например «видимый» вместо «видимый».

Если вы не знаете, как извлечь значение из раскрывающегося списка, вы можете обратиться по этой ссылке: Получить падениенижнее значение

...