VB.NET 2002 対応 VB.NET 2003 対応 VB2005 対応

 

Visual Basic 中学校 > VB.NET サンプル >

文字列の一部を抜き出す

 

1.左から何文字か抜き出す例

VB.NET2002対応 VB.NET2003対応 VB2005対応 


MsgBox(Strings.Left("いろはにほへと", 3))
 

この例では "いろは" と表示される。

メモ:フォーム以外のほとんどの場所ではStrings.は省略可能です。

 

VB.NET2002対応 VB.NET2003対応 VB2005対応 


MsgBox("いろはにほへと".Substring(0, 3))
 

この例でも "いろは" と表示される。

 

2.右から何文字か抜き出す例

VB.NET2002対応 VB.NET2003対応 VB2005対応 


MsgBox(Strings.Right("いろはにほへと", 2))
 

この例では "へと" と表示される。

メモ:フォーム以外のほとんどの場所ではStrings.は省略可能です。

 

3.中ほどから何文字か抜き出す例

以下の例では、2文字目から3文字分抜き出す。

VB.NET2002対応 VB.NET2003対応 VB2005対応 


MsgBox(Mid("いろはにほへと", 2, 3))
 

この例では "ろはに" と表示される。

 

VB.NET2002対応 VB.NET2003対応 VB2005対応 


MsgBox("いろはにほへと".Substring(1, 3))
 

この例でも "ろはに " と表示される。Substringメソッドでは先頭の文字を0文字目と数えることに注意。

 

3.何文字か除いたすべてを抜き出す例

左の2文字を除いたすべてを抜き出す例

VB.NET2002対応 VB.NET2003対応 VB2005対応 

Dim St As String

St = "いろはにほへと"

MsgBox(Mid(St, 3))

この例では "はにほへと" と表示される。

 

同じく左の2文字を除いたすべてを抜き出す例

VB.NET2002対応 VB.NET2003対応 VB2005対応 

Dim St As String

St = "いろはにほへと"

MsgBox(St.Substring(2))

この例でも "はにほへと " と表示される。Substringメソッドでは先頭の文字を0文字目と数えることに注意。

 

右の2文字を除いたすべてを抜き出す例

VB.NET2002対応 VB.NET2003対応 VB2005対応 

Dim St As String

St = "いろはにほへと"

MsgBox(Strings.Left(St, Len(St) - 2))

この例では "いろはにほ" と表示される。

メモ:フォーム以外のほとんどの場所ではStrings.は省略可能です。

 


VB6対応 VB6 文字列の一部を抜き出す 参照