StringBuilder

2.3.44 StringBuilder クラス

Remarks

文字列連結クラス このクラスは Staticクラス(Attribute VB_PredeclaredId = True) です。

Implements

• なし

History

Date	Version	Note
2019-01-01	Ver.1.0.0	新規作成

Sample

Dim SB As IStringBuilder
Set SB = StringBuilder.NewInstance

SB.Append "A"
SB.Append "B"
SB.Append "C"

Debug.Print SB.ToString

---

2.3.44.1 コンストラクタ

Syntax

Set SB = StringBuilder.NewInstance(Number)

Parameters

Name	Required/Optional	Data type	Description
Number	省略可	Long	初期配列サイズを指定。デフォルト25

Return Value

Name	Data type	Description
SB	Object	新しいインスタンス(StringBuilder)

Remarks

コンストラクタ
初期の配列数を指定。大量データの場合に事前に指定すると効率が良い

Example

Dim SB As IStringBuilder

Set SB = StringBuilder.NewInstance(3000)

For i = 1 To 3000

    SB.Append i

Next

See also

• None

---

2.3.44.2 Clear(IStringBuilder I/F)

Syntax

expression.Clear()

Parameters

Name	Required/Optional	Data type	Description
expression	必須	StringBulder	StringBuilderオブジェクトを指定します。

Return Value

• None

Remarks

クリアメソッド
文字列バッファをクリアします。

Example

• None

See also

• None

---

2.3.44.3 Append(IStringBuilder I/F)

Syntax

expression.Append(strBuf, [quotation = False])

Parameters

Name	Required/Optional	Data type	Description
expression	必須	StringBulder	StringBuilderオブジェクトを指定します。
strBuf	必須	String	連結を行う文字列を指定します。
quotation	省略可	Boolean	Trueの場合、ダブルコーテーションを付加する。デフォルトFalse

Return Value

• None

Remarks

文字列を追加するメソッドです。
第２引数をTrueにするとダブルコーテーションで囲みます。

Example

半角0～9以外の文字列だったらダブルコーテーションで囲みます。

Dim SB As StringBuilder
Dim strBuf As String

Set SB = StringBuilder.NewInstance

strBuf = "A"

SB.Append strBuf, Not RegExp.Test(strBuf, "[0-9]+")
Debug.Print SB.ToString

結果

"A"

See also

• None

---

2.3.44.4 ToString(IStringBuilder I/F)

Syntax

var = expression.ToString([Delimiter = "", Header = "", Footer= ""])

Parameters

Name	Required/Optional	Data type	Description
expression	必須	StringBulder	StringBuilderオブジェクトを指定します。
Delimiter	省略可	String	連結を行う際のデリミタを指定しますデフォルト""
Header	省略可	String	最初に連結する文字列を指定しますデフォルト""
Footer	省略可	String	連最後に連結する文字列を指定しますデフォルト""

Return Value

Name	Data type	Description
var	String	連結後の文字列

Remarks

文字列変換メソッドです。
デリミタ、ヘッダ、フッタを指定可能です。

Example

Dim SB As StringBuilder
Set SB = StringBuilder.NewInstance

SB.Append "A"
SB.Append "B"
SB.Append "C"

Debug.Print SB.ToString

結果

ABC

Dim SB As StringBuilder
Set SB = StringBuilder.NewInstance

SB.Append "A"
SB.Append "B"
SB.Append "C"

Debug.Print SB.ToString(",","[","]")

結果

[A,B,C]

See also

• None

---

2.3.44.5 ToArray(IStringBuilder I/F)

Syntax

var = expression.ToArray()

Parameters

• None

Return Value

Name	Data type	Description
expression	必須	StringBulder
var	String	変換後の配列

Remarks

配列変換メソッド

Example

Dim SB As StringBuilder
Set SB = StringBuilder.NewInstance

SB.Append "A"
SB.Append "B"
SB.Append "C"

Debug.Print SB.ToArray(1)

結果

B

See also

• None

---

2.3.44.6 Length(IStringBuilder I/F)

Syntax

var = expression.Length()

Parameters

• None

Return Value

Name	Data type	Description
expression	必須	StringBulder
var	Long	文字数を返却

Remarks

文字数取得プロパティ

Example

Dim SB As StringBuilder
Set SB = StringBuilder.NewInstance

SB.Append "A"
SB.Append "B"
SB.Append "C"

Debug.Print SB.Length

結果

3

See also

• None

---

2.3.44.7 Replace(IStringBuilder I/F)

Syntax

expression.Replace(strFind, strReplace)

Parameters

Name	Required/Optional	Data type	Description
expression	必須	StringBulder	StringBuilderオブジェクトを指定します。
strFind	必須	String	置換前の文字列
strReplace	必須	String	置換後の文字列

Return Value

• None

Remarks

置換メソッド

Example

Dim SB As StringBuilder
Set SB = StringBuilder.NewInstance

SB.Append "A"
SB.Append "B"
SB.Replace "B", "C"

Debug.Print SB.ToString

結果

AC

See also

• None