VB中如何将字符串和数字相加? "A0001" + 1=A0002 ???
发布网友
发布时间：2024-10-17 01:06
共3个回答
热心网友
时间：2024-10-17 01:43
Private Function AddStr(str1, str2)
AddStr = Left(str1, 1) & Format(Mid(str1, 2, Len(str1) - 1) + Val(str2), "0000")
End Function
Private Sub Form_Click()
a = "A0001"
b = 1
MsgBox AddStr(a, b)
End Sub
经过验证通过，可直接调用addstr函数实现所需要的功能
热心网友
时间：2024-10-17 01:43
把字副串用Right函数分开！再用Val函数把数值一部分转换成数值型再和后面相加！再与字符窜连接
热心网友
时间：2024-10-17 01:44
把里面的数字提取出来,再和1加最后再处理结果
Format(结果, "A0000")
应该可以吧
