AutoCAD Inventor :: Different Textstyles In One Sketch (Drawing)

I'm a student and a beginner in VBA. I'm writing a macro to automatically draw text and lines in a drawing and it goes pretty well. But now I have encountered a problem. When I add text like this:

Dim FreqBox As TextBox
Set FreqBox = oSketch.TextBoxes.AddFitted(oTG.CreatePoint2d(1.9, 1.95), GegevensForm.FrequentieVak.Value)

This is like I want it, but not the right font or size, so I add this:

FreqBox.Style.Font = "Arial"
FreqBox.Style.FontSize = 0.2

This goes well too, but then I want to add another TextBox, in another style, like this:

Dim VermogenBox As TextBox
Set VermogenBox = oSketch.TextBoxes.AddFitted(oTG.CreatePoint2d(3.7, 3.2), GegevensForm.VermogenVak.Value)
VermogenBox.Style.Font = "Arial"
VermogenBox.Style.FontSize = 0.5
VermogenBox.HorizontalJustification = kAlignTextRight
VermogenBox.Style.Bold = True

And suddenly when I run this, the other text is changing to these settings... (exept for the alignment).Is it possible to do this without the FormattedText option