下記のコードにて文字記入をしているのですが、VerticalMode、HorizontalModeはコメントアウトしています。
コメントアウト時は問題ないのですが、有効にした場合、原点(0,0)に指定文字が展開されます。
位置合わせは、テキスト作成と同時にはできないのでしょうか?

Dim dbTxtTest As DBText = New DBText()

With dbTxtTest
    .Position = New Point3d(50, 260, 0)
    .Height = 2
    .TextString = "テスト"
    '.VerticalMode = TextVerticalMode.TextVerticalMid
    '.HorizontalMode = TextHorizontalMode.TextLeft
End With

modelBlkTblRec.AppendEntity(dbTxtTest)

trans.AddNewlyCreatedDBObject(dbTxtTest, True)