Question

是否有可能只有一部分变量？我有一个比例，每秒6次给我一个值。每当量表上的权重发生变化时，它会给我一个类似$r00000或4$00400的值。但如果值保持不变1秒，则返回$b01234。我的问题是我找不到在if语句中使用“$ b”的方法，因此在$ b之后我的值会发生变化。

Dim MyString, MyArray, i
Dim test
MyString = Scale_Value
If MyString="*$b**????***" Then
    MyArray = Split(MyString, "$b", -1, 1) 
    For i = 0 To UBound(MyArray)
        test =   (MyArray(i))
        tmpPWgt = (CStr(Mid(test, 1,1) & "." & Mid(test, 2)))
    Next
Else
    tmpPWgt="0.000"
End If

Answer 1

由于您似乎只对$ b值感兴趣，请使用Left（）和Mid（）来获取每个输入的部分：

>> a = Split("$r00000 $b01234 4$00400 $b54321 $r55555")
>> for each m in a
>>     WScript.Echo "----", m
>>     if "$b" = Left(m, 2) Then
>>        m = CLng(Mid(m, 3))
>>        WScript.Echo "1 sec w:", m
>>     end if
>> next
>>
---- $r00000
---- $b01234
1 sec w: 1234
---- 4$00400
---- $b54321
1 sec w: 54321
---- $r55555
>>

Answer 2

...
If Left(MyString, 2) = "$b" Then
...

如果变量部分在vbscript中发生变化

2 个答案: