表1:第一列 第二列
AAA 123
BBB 789
获得一个值:"AAA"(of string),用AAA去表1中查找其对应的值:"123",并把:"123" 赋值给一个变量(of string)
Dim dr As String
Dim lr As String
lr = "AAA"
For Each drs As DataRow In DataTables("表1”).DataRows
drs(“第二列") = DataTables("表1").find("第一列 = '(lr) '")
dr = drs(“第二列")
MsgBox(dr)
Next