Vb.Net MS Publisher 字符串数组到文本框问题

发布于 2024-11-07 21:13:55 字数 715 浏览 4 评论 0原文

我正在创建一个简单的发布应用程序，其中我需要从字符串数组中的不同文本框中插入文本。我已经像这样编码了。

    Dim texts(40) As String 'Array of strings to be inserted 

    shpTextBox = appPub.ActiveDocument.Pages(pageIndex).Shapes.AddTextbox _
          (Orientation:=PbTextOrientation.pbTextOrientationHorizontal, _
          Left:=pbShape.Left - 20, Top:=pbShape.Top, _
          Width:=72, Height:=18)


                'add text 
                shpTextBox.TextFrame.TextRange.Text = texts(Index)'Problem here , Only First array value is populating to very first text box , rest are empty strings.

                Index = Index + 1

现在，它仅使用数组中的第一个字符串（对于第 0 个索引）填充第一个文本框，其余文本框包含空字符串，尽管文本数组有值。

任何帮助将不胜感激。

谢谢。

原文

I am creating a Simple Publisher Application in which I need to insert texts in different textbox from an array of strings .I have coded it like this .

    Dim texts(40) As String 'Array of strings to be inserted 

    shpTextBox = appPub.ActiveDocument.Pages(pageIndex).Shapes.AddTextbox _
          (Orientation:=PbTextOrientation.pbTextOrientationHorizontal, _
          Left:=pbShape.Left - 20, Top:=pbShape.Top, _
          Width:=72, Height:=18)


                'add text 
                shpTextBox.TextFrame.TextRange.Text = texts(Index)'Problem here , Only First array value is populating to very first text box , rest are empty strings.

                Index = Index + 1

Now It only populates first text box with the first string in the array (For 0th index) and rest textboxes contains empty strings ,though texts array has values.

Any help would be highly appreciated .

Thanks.

分享到QQ

分享到微博