Question

我有这样的代码：

Dim mincatval As String
     Dim strarr() As String = dr1(0).ToString().Split(New Char() {"-"c})
                                Dim i As String
                          i = (Integer.Parse(strarr(0)) + 1)
                                mincatval = i

我的dr（1）值是L1我想加1，所以我想要输出 L2 ，但我得到这样的错误：输入字符串不正确格式。

Answer 1

假设strarr（0）是word＆＃34; L1＆＃34;你希望它成为＆＃34; L2＆＃34;然后你需要将数字部分与文本部分隔离，然后重建字符串，使用strarr的第一部分和递增的值

 Dim mincatval As String
 Dim strarr() As String = dr1(0).ToString().Split(New Char() {"-"c})
 Dim i As String
 Dim itShouldBeAnumber = strarr(0).Substring(1)
 if Int32.TryParse(itShouldBeAnumber, i) Then
     mincatval = strarr(0).Substring(0,1) & (i + 1)
 else
     MessageBox.Show("Not a valid number from position 1 of " & strarr(0))
 End if

当然这个解决方案假设你的字符串总是由一个首字母后跟一个可以解释为整数的数值组成

将字符串添加到整数时，输入字符串的格式不正确

1 个答案: