1

我正在尝试创建能够在输入输入框后识别多字符变量（xx.xx 格式的数字）的脚本。在输入框中输入 xx.xx 格式的变量后，该变量将仅显示为单个字符，使用第一个字符。例如，如果我在输入框中输入 10.80，则在脚本运行时重用变量时，只会显示为 1。

以下是使用该变量的部分脚本：

Dim $price
$price = InputBox("Offer Price", "Input Offer Price")

Send("{TAB}")

Send("{"& $price &"}") ; Enters variable

Send("{DOWN}{TAB}{TAB}{TAB}{ENTER}")
4

2 回答 2

2 
Send("{100000000000000000}")

发送字符 1。

Send("100000000000000000")

发送字符 100000000000000000。

很多人对何时在 Send 中使用 {花括号} 感到困惑。

更改您的脚本以执行此操作：

Send($price) ; enters variable
于 2011-05-12T21:59:05.730 回答
1

我觉得我可能完全误解了你的问题，但你似乎要求一个输入框来检查输入是否符合特定的输入模式，然后给你它最左边的字符。这将做到这一点。

While 1
    Local $responce = InputBox('Offer Price', 'Input offer price in XX.XX format.')
    If @error == 1 Then
        MsgBox(0, 'Cancel Pressed', 'You pressed cancel exiting loop.')
        ExitLoop
    EndIf

    If StringRegExp($responce, '\d{2}\.\d{2}') Then
        MsgBox(0, 'Success', 'The input fit the pattern XX.XX and the left most character of it = ' & StringLeft($responce, 1))
        ExitLoop
    Else
        MsgBox(0, 'Invalid Input', 'The input needs to be a number in XX.XX format.')
    EndIf
WEnd
于 2011-06-10T22:27:31.610 回答