メソッドを使用して、特定の文に含まれる文字か判断する方法を記載します。

IsNumberメソッドにて、文字が数字かどうか判断する

If Char.IsNumber("3"c) Then
    MessageBox.Show("数字です")
End If

'String型の場合は文字の位置を指定する
If Char.IsNumber("1234567890", 2) Then
    MessageBox.Show("数字です")
End If

'全角数字でも数字と見なす
If Char.IsNumber("１２３４５６７８９０", 2) Then
    MessageBox.Show("数字です")
End If

'以下の文字も数字と見なす
If Char.IsNumber("ⅠⅡⅢ①②③", 3) Then
    MessageBox.Show("数字です")
End If

 

IsDigitメソッドにて、文字が１０進数の数字かどうか判断する

'半角・全角の文字が１０進数の数字かどうか判断する		
If Char.IsDigit("3"c) Then
    MessageBox.Show("１０進数の数字です")
End If

'String型の場合は文字の位置を指定する
If Char.IsDigit("１２３４５６７８９０1234567890", 2) Then
    MessageBox.Show("１０進数の数字です")
End If

 

IsLetterメソッドにて、文字がアルファベット文字かどうか判断する

'半角・全角文字がアルファベット文字かどうか判断する
If Char.IsLetter("A"c) Then
    MessageBox.Show("アルファベットです")
End If

'String型の場合は文字の位置を指定する
If Char.IsLetter("ＡＢＺａｂｚABZabz", 2) Then
    MessageBox.Show("アルファベットです")
End If

 

IsLetterOrDigitメソッドにて、文字がアルファベット文字または１０進数の数字かどうか判断する

'半角・全角文字がアルファベット文字または１０進数の数字かどうか判断する
If Char.IsLetterOrDigit("A"c) Then
    MessageBox.Show("アルファベット文字または１０進数の数字です")
End If

'String型の場合は文字の位置を指定する
If Char.IsLetterOrDigit("ＡＢＣ１２３ABC123", 3) Then
    MessageBox.Show("アルファベット文字または１０進数の数字です")
End If

 

IsWhiteSpaceメソッドにて、空白文字かどうか判断する

'文字が空白文字かどうか判断する
If Char.IsWhiteSpace(" "c) Then
    MessageBox.Show("空白文字です")
End If

'全角文字でも判断可能
If Char.IsWhiteSpace("　", 0) Then
    MessageBox.Show("空白文字です")
End If

 

IsUpperメソッドにて、文字が大文字かどうか判断する

'半角・全角文字が大文字かどうか判断する
If Char.IsUpper("R"c) Then
    MessageBox.Show("大文字です")
End If

'String型の場合は文字の位置を指定する
If Char.IsUpper("ＡＢＣABC", 2) Then
    MessageBox.Show("大文字です")
End If

 

IsLowerメソッドにて、文字が小文字かどうか判断する

'半角・全角文字が小文字かどうか判断する
If Char.IsLower("r"c) Then
    MessageBox.Show("小文字です")
End If

'String型の場合は検査する文字の位置を指定する
If Char.IsLower("ａｂｃabc", 2) Then
    MessageBox.Show("小文字です")
End If

※数値はTryParseでの判断も可能です。

 

文字型（Char）から整数型（Integer）に変換する方法を記載します。

変換には、Asc()・Chr()かConvert()を使用して型変換をします。

Ascを使用して、文字型（Char）から整数型（Integer）に変換する

Dim c1 As Char = "a"c
Dim code1 As Integer = Asc(c1)

 

Convertクラスを使用して、文字型（Char）から整数型（Integer）に変換する

Dim c1 As Char = "あ"c
Dim code1 As Integer = Convert.ToInt32(c1)

※全角文字をAsc()で変換すると負の数値となる、またConvert()で変換すると整数値となる。

 

Chrを使用して、整数型（Integer）から文字型（Char）に変換する

Dim code1 As Integer = 97
Dim c1 As Char = Chr(code1)

 

Convertクラスを使用して、整数型（Integer）から文字型（Char）に変換する

Dim code1 As Integer = 12354
Dim c1 As Char = Convert.ToChar(code1)

※全角文字を変換する際は、Chrは負の数値で指定する、またConvert整数値での指定となる。

・Asc()とChr()のが対の変換となる、またConvert()はConvert()で行う