Dim lavParam(1, 2) As Variant
  Dim ls As String  ' Set parameters
  lavParam(0, 0) = "zipcode": lavParam(0, 1) = txtZipCode.Text<--这什么意思