具有多个条件的VBA Select Case

Question

我正在尝试从HTML input获取属性值，将其存储在变量中，然后使用此变量将值分配给另一个输入。它适用于一个条件，如Case LCase(elm.Type) Like "*text*": valueA = elm.Value，但当我尝试使用AND运算符设置多个条件时，它返回“未定义”。我做错了什么？

N.B。如果可能，我希望继续使用Select Case语法，而不是使用If... Then，因为稍后会添加更多Cases。

    Set elms = .Document.GetElementsByTagname("input")

    For Each elm In elms
       On Error Resume Next
       Select Case True
          Case LCase(elm.Type) Like "*text*" And LCase(elm.Name) Like "*a*": valueA = elm.Value
          Case LCase(elm.Name) Like "*b*": elm.Value = valueA
       End Select
    Next