Fit to Path in VSTA

Hello all, I have a bit of a brain racker, at least for myself.  Essentially, I have 2 circles, and then a circle in between them that acts as a guideline for the text. However, when I call  upon "Text.Text.FitToPath" my text alligns to the top portion of the text.

 I thought at first I had a setting that was incorrect, so I made a little test for myself with the following code

{

Private Sub CommandButton1_Click()
Dim circ As Shape
Set circ = ActiveShape
ActiveDocument.AddToSelection ActivePage.Shapes.All
ActiveDocument.RemoveFromSelection circ
Dim testtext As Shape
Set testtext = ActiveLayer.CreateArtisticText(0, 0, "Hello")
testtext.Text.FitToPath circ

End Sub

}

However, this produced the correct result, which is

There is no differences in the code that fits it to the path, but yet I still end up with these major differences.