計算器爲newbs

-2

我正在計算器中至極我想獲得一些數字在一個圓圈。計算器爲newbs

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。 ;-) -

來源

2011-07-04 Jonas Krølle Nikolaj Jensen

什麼線你得到的錯誤？所有相關變量的值是什麼？你爲什麼要設置TextBox15的文本兩次？ –

使選項嚴格在程序的第一行。使用Integer.TryParse和.ToString來修復錯誤。這將幫助你http://msdn.microsoft.com/en-us/library/ff361664%28v=VS.100%29.aspx – dbasnett

見，如果這個工程：

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

來源

2011-07-04 19:54:32 Viv

昏暗的直徑作爲整數= Integer.Parse（TextBox14.Text）是錯誤accours ..但是，謝謝！ –

你對TextBox14.Text有什麼價值？整數需要是沒有分數的整數，即0，-100。如果您的數字帶有小數點，則不應使用整數。 – Viv

的錯誤之處在於，你想指定字符串類型的整數值的事實。使用struct TryParse integer提供的方法，這也將在任何運行時異常FormatException麩中運行，並且不會發送應用程序。

下面是一個例子：在這個鏈接有關的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

再見

來源

2011-07-04 20:57:35

回答

相關問題