title: How to call a function with function name reference to a string value in VB
body: <p>I have this algorithm that I want to implement on VB6.</p>
  
  <pre><code>Sub Main()
  dim stringVal1 as string, stringVal2 as string
  dim getOne as boolean
  
  stringVal1 = "FunctOne"
  stringVal2 = "FunctTwo"
  
  if getOne then
      'Call Function with function name assigned to stringVal1 ... how to call the function here?**
  else
      'Call Function with function name assigned to stringVal1 ... how to call the function here?**
  end if
  
  End Sub
  
  
  Function FunctOne()
     Msgbox "I'm function one"
  End Function
  
  Function FunctTwo()
     Msgbox "I'm function two"
  End Function
  </code></pre>
  
  <p>Can this be done in VB6?</p>