如何简单地我的代码?

时间:2013-11-25 19:12:16

标签: vb.net

我有一点问题。我是visual basic.i的初学者。我想用这个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。我必须在这个项目中添加什么代码?请帮助我:))

4 个答案:

答案 0 :(得分:0)

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

基本上将2.5转换为整数。

答案 1 :(得分:0)

查看Math.Round方法。这将使您可以控制是否要朝向或远离零。

Math.Round method documentation

答案 2 :(得分:0)

使用this function

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

答案 3 :(得分:0)

如果您为每个部件执行小步骤操作,它可能有助于您的编程。它可能是更多的行,但它可以更具描述性,因此如果您将来回到代码,则更容易理解。

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()来将计算得到的数字转换为字符串(文本)。

您可以使用Option Strict On让Visual Studio在VB中指出哪些类型的变量不匹配(字符串到字符串,数字到数字)。