if文を使って型チェックするをしたいと思います。
調べてみるとありました。
構文
If TypeOf 変数名 Is データ型 Then
Else
End If
何だ簡単じゃあないか思いました。
しかし落し穴がありました。
結論から言うと変数名の所はObject型じゃあないといけないです。
そのままString型を判定しようとすると出来ない。
じゃあObject型にすればいいんだ。
ということでObject型を宣言してString型を代入しました。
ソース
Public Class Form1
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim str As String = 123
Dim obj As Object = str
If TypeOf obj Is String Then
MsgBox(“String型です”)
Else
MsgBox(“String型ではありません。”)
End If
End Sub
End Class
実行結果は
String型です
邪道かもしれませんが一応動くのでオッケーということで。