型？ (ID:123212)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 うーにゅ。そこは Try〜Catch で取るようなエラーではないので [VB.NET] With Me.TextBox1 If IsNumeric(.Text) Then Me.TextBox2.Text = CStr(CInt(.Text)) Else Me.TextBox2.Text = "0" End If End With つか、サンプルプログラムとして分かり難くなってる気も…。 こっちで想像するより質問者がコード出してくれるのを待った 方が早いと思います。 型が分からない(or 曖昧な)人はファイルの先頭に [VB6.0] Option Explicit [VB.NET] Option Strict On …って書いて下さい。って気もしますが。 話は変わりますが、最初、マグさんの TextBox2.Text = CInt(TextBox1.Text) のコードの意味が分からなかったけど『数値として有効なら 整数に修正する』って意味ならアリなんですね。