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")