配列内の文字列を確認する

Question

文字列が配列に格納されていて、各文字列の5番目の文字が数字かどうかを確認する必要があります。私が使用したコードは次のとおりです。

If Mid(arr(i), 5, 1) = IsNumeric(True) Then 
     MsgBox("Number") 
End If 

エラーを与えている：

An unhandled exception of type 'System.InvalidCastException' occurred in Microsoft.VisualBasic.dll

Additional information: Conversion from string "" to type 'Boolean' is not valid.

Answer 1

あなたの構文が正しくありません。それは次のようになります。

If IsNumeric(Mid(arr(i), 5, 1)) Then 

Answer 2

これを行うには、より正確な方法は、次のようになります。

If Char.IsDigit(arr(i)(4)) Then 

Answer 3

あなたはもともとvbaとして、あなたの質問にタグ付けされたが、VBAはSystem.InvalidCastException、またはそのための他の任意の例外をスローしません。問題。 vb.netです。

IsNumeric(True)Trueが数値の場合はTrueを返します。配列から検索された文字列が数値の場合は、を確認する必要があります。このために、

If IsNumeric(Mid(arr(i), 4, 1)) Then 
    MsgBox("Number") 
End If 

あなたのコードはいえVB6/VBAのように読み取ります：パラメータとして配列から取得した文字列をそれに与える

Imports Microsoft.VisualBasic 

名前空間は、VB6のようなものが含まれていることをそのあなたまったく使用する必要はありません。 .netの美しさはです。すべてがオブジェクトなので、配列がStringの配列であると仮定すると、VB6のMid関数の代わりに実際のStringインスタンスメソッドを呼び出すことができます。

Dim theFifthCharacter As String = arr(i).Substring(4, 1) 

それとも、あなたは1つの文字でのみ興味があり、String自体IEnumerable(Of Char)あるので、あなたはこれを行うことができます。

Dim theFifthCharacter As Char = arr(i)(4) 

お知らせオフ・バイ・1 - .NETでインデックスは0から始まりますので、あなたは第五項目をしたい場合、あなたはそれが数値だ場合、あなたは試すことができます参照したい場合は、今すぐインデックス4.

をフェッチします解析にそれ：

Dim digitValue As Integer 
If Int32.TryParse(theFifthCharacter, digitValue) Then 
    'numeric: digitValue contains the numeric value 
Else 
    'non-numeric: digitValue contains an Integer's default value (0) 
End If 

最後に、あなたがメッセージボックスをしたい場合は、WinFormsの使用の代わりにVB6のMsgBoxのMessageBoxを：文字列から

Dim digitValue As Integer 
If Int32.TryParse(theFifthCharacter, digitValue) Then 
    'numeric: digitValue contains the numeric value 
    MessageBox.Show(string.Format("Number: {0}", digitValue)) 
Else 
    'non-numeric: digitValue contains an Integer's default value (0) 
    MessageBox.Show("Not a number") 
End If