vb 和 MapBasic 变量的互相赋值

1。如何在VB中，对利用MapBasic语句定义的变量进行赋值？
 
     olemap.Do "dim a as string"
     olemap.Do "a = ""abd df  fsd c !!"""

 2。如何将VB程序中的变量 VBVar 的值赋给在 MapBasic 中定义的变量 MBVar?
  
 Dim b As String
 b = """addd kkll jjj !"""
        olemap.Do "dim a as string"
     olemap.Do "a = " & b

 3。如何将MapBasic程序中的变量 MBVar 的值赋给在 VB 中定义的变量 VBVar?
  Dim b As String
     olemap.Do "dim a as string"
     olemap.Do "a = ""abd df  fsd c !!"""
    b = olemap.Eval("a")