tagCANDY CGI VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
VBレスキュー(花ちゃん)の Visual Basic 6.0用 掲示板
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re: テキストボックス文字追加
投稿日: 2008/12/26(Fri) 18:31
投稿者魔界の仮面弁士
> 数が膨大のためできれば&の関数を使わずに

“& の演算子を使いたくない”というのは、もしかして、
「Text1.Text = Text1.Text & strNewText」の方法だと、
データ量が多いと処理時間がかかってしまうから、でしょうか?

もしそうならば、Text プロパティの代わりに、SelText プロパティを
使ってみては如何でしょう。


Public Sub AppendText(ByVal target As TextBox, ByVal newText As String, _
  Optional addNewLine As Boolean = False)
    target.SelStart = Len(target.Text)
    If addNewLine Then
        target.SelText = vbNewLine & newText
    Else
        target.SelText = newText
    End If
End Sub


あるいは、“数が膨大”というのは、コントロールの数が多いということを
指しているのでしょうか? であれば、コントロールの Index プロパティを設定して、
「コントロール配列」としてループ処理すれば良いかと思います。

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。