需要帮助转换这些，我不明白为什么会发生错误.

问题描述：

嘿，我在转换和遇到多个错误时遇到了所有问题，我尝试了许多转换方法，但均无济于事.请看一下我是否做错了什么！

Hey all I am having a issue with converting and getting multiple errors i have tried numerous convert methods but to no avail. Please take a look and see if im doing something terribly wrong!

 Dim strInput As String = "" 'storing the input ID

        Dim fulltime As Integer ' storing values
        Dim parttime As Integer
        Dim newcar As Integer
        Dim usedcar As Integer

        strInput = txtid.Text.ToUpper() ' changes to uppercase
        ' sets the focus 
        txtid.Focus()




        If strInput Like "###NF" Then 'For new and fulltime
            newcar = CInt(txtnew.Text)
            txtnew.Text = Convert.ToString(newcar) + txtnumsold.Text 'stores value into newcar
            fulltime = Convert.ToInt32(txtfulltime.Text)
            txtfulltime.Text = Convert.ToString(fulltime) + txtnumsold.Text 'stores value into full time

        ElseIf strInput Like "###UF" Then
            usedcar = CInt(txtused.Text)
            txtused.Text = Convert.ToString(usedcar) + txtnumsold.Text
            fulltime = Convert.ToInt32(txtfulltime.Text)
            txtfulltime.Text = Convert.ToString(fulltime) + txtnumsold.Text
        ElseIf strInput Like "###NP" Then
            newcar = CInt(txtnew.Text)
            txtnew.Text = Convert.ToString(newcar) + txtnumsold.Text
            parttime = Convert.ToInt32(txtparttime.Text)
            txtparttime.Text = Convert.ToString(parttime) + txtnumsold.Text
        ElseIf strInput Like "###UP" Then
            usedcar = CInt(txtused.Text)
        txtused.Text = Convert.ToString(usedcar) + (txtnumsold.Text)
        parttime = Convert.ToInt32(txtparttime.Text)
        txtparttime.Text = Convert.ToString(parttime) + txtnumsold.Text
        End If

答

如果字符串仅包含数字字符，则需要首先进行测试.

if a string contains only numeric characters is something you've to test first.

但是，使用Select大小写来创建代码甚至比这种难以阅读的代码更加简单.

However, it is even more simple to create your code with Select case instead of this difficult to read code.

https://msdn.microsoft.com/en-us/library/cy37t14y.aspx

要检查数字是否为数字，可以使用VB IsNumeric函数

To check if something is numeric you can use the VB IsNumeric function

https://msdn.microsoft.com /en-us/library/6cd3f6w1(v=vs.90).aspx (未维护，它什么也没说，也位于其他地方)

https://msdn.microsoft.com/en-us/library/6cd3f6w1(v=vs.90).aspx (that it is not maintained says nothing, it is also somewhere else)

或者您可以使用在2.0中添加到.Net的trycast函数，因为C#中没有合适的方法

or you can use the trycast functions which was added to .Net in 2.0 because there was no decent way in C#

https://msdn.microsoft.com/en-us/library/zyy863x8.aspx

需要帮助转换这些，我不明白为什么会发生错误.

相关推荐