如何簡單的我的代碼？

我有一個小問題。我是visual basic的初學者。我想用這個visual studio做一個項目。這是我的示例項目。如何簡單的我的代碼？

Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 

    MaskedTextBox3.Text = MaskedTextBox1.Text \ MaskedTextBox2.Text & "A" 
    MaskedTextBox4.Text = MaskedTextBox2.Text & "Ω"

- 例如，我想要寫5/2，並把它轉化爲2不2.5。什麼代碼我必須添加這個項目？請幫我:)

來源

2013-11-25 user3033657

MaskedTextBox3.Text = cint(MaskedTextBox1.Text \ MaskedTextBox2.Text).toString & "A"

基本上轉換2.5整數。

來源

2013-11-25 19:18:53 logixologist

但轉換爲整數總是下降。用戶沒有提及所需的舍入規則。我也會推薦msdn圓形頁面。 – ruedi

我正在用這個'而且它變成了2而不是2.5' – logixologist

檢查出Math.Round方法。這將使您可以控制是否要朝向或遠離零點。

Math.Round method documentation

來源

2013-11-25 19:21:28 Tim

使用this function：

If IsNumeric(txtFirst.Text) And IsNumeric(txtSecond.Text) Then 
    txtSum.Text = CStr(CDbl(txtFirst.Text) + CDbl(txtSecond.Text))

來源

2013-11-25 19:25:58 Progressdll

它可以幫助您的編程，如果你在每個部分小步驟做的事情。這可能是更多線條，但它可以更具描述性，因此如果您將來回到代碼中，則會更容易理解。

Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
    Dim voltage As Double = CDbl(MaskedTextBox1.Text) 
    Dim resistance As Double = CDbl(MaskedTextBox2.Text) 
    MaskedTextBox3.Text = Math.Floor(voltage/resistance).ToString() & "A" 
    MaskedTextBox4.Text = MaskedTextBox2.Text & "Ω"

請注意，我用CDbl到文本轉換成數，在這種情況下，號碼是Double類型，而且我用的ToString（）轉換爲數字從產生計算成一個String（文本）。

您可以通過使用Option Strict On來讓Visual Studio指出VB中變量的類型不匹配（字符串到字符串，數字到數字）。

來源

2013-11-25 22:05:36

如何簡單的我的代碼？

回答

相關問題