VB中如何将字符串和数字相加? "A0001" + 1=A0002 ???

发布网友发布时间：2024-10-17 01:06

共1个回答

热心网友时间：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函数实现所需要的功能

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:11247931@qq.com