newbs用電卓

Question

私は円で数字を取得したい電卓を使っています。

現在のコードがあるが、私はあなたが親切に、私はそれを感謝します私を助けてよ場合..「数が無限大よりも小さくなければなりません」との問題が発生してい

Private Sub Button6_Click(
    ByVal sender As System.Object, 
    ByVal e As System.EventArgs) Handles Button6.Click 

    Dim radius As Integer = TextBox13.Text 
    Dim diameter As Integer = TextBox14.Text 
    Dim length As Integer = TextBox15.Text 

    TextBox13.Text = diameter/2 
    TextBox14.Text = radius * 2 
    TextBox15.Text = radius * 2 * Math.PI 
    TextBox15.Text = diameter * Math.PI 
End Sub 

... - 注：私は完全なnoobです。 ;-) -

Answer 1

これが動作するかどうかを参照してください：

Dim radius As Integer = Integer.Parse(TextBox13.Text) 
    Dim diameter As Integer = Integer.Parse(TextBox14.Text)  
    Dim length As Integer = Integer.Parse(TextBox15.Text) 

Answer 2

をエラーは、あなたが文字列型の整数値を代入しようとしたという事実にあります。 struct TryParse整数で提供されるメソッドを使用します。これは実行時例外のFormatExceptionExceptionでも実行され、アプリケーションを送信しません。

ここでは例です：このリンクでTryParseについて

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 
    Dim diameter As Integer = 0 
    Dim radius As Integer = 0 
    Dim lenght As Integer = 0 

    If Integer.TryParse(Me.TextBox13.Text, diameter) Then 
     'your code 
    End If 

    If Integer.TryParse(Me.TextBox14.Text, radius) Then 
     'your code 
    End If 

    If Integer.TryParse(Me.TextBox15.Text, lenght) Then 
     'your code 
    End If 
End Sub 

詳細情報： http://msdn.microsoft.com/it-it/library/f02979c7.aspx

さようなら