我有一个表单，要求用户在文本框中输入一些信息，然后是一些操作这些值并将其输入表格的VBA代码。
其中一个文本框要求输入数字序列号。该序列号的长度可以是四位或五位，并且它可以包含一个或多个前导零。例如0001或00758或0463。
一旦VBA代码将这个值输入到表中，它就会遍历它，递增它，并进行另一个输入。重复此过程，直到将所有序列号添加到表中。我从我的代码中声明为字符串的文本框中获取序列号值，但它仍然删除了我的前导零。
答案 0 :(得分：1)
我遇到了类似的问题，使用CStr（）强制字符串为我修复它。所以，例如：sMyString = CStr（vUserValue）而不是sMyString = vUserValue。
此外，增加数字时可能会丢弃零。您可以使用以下内容重新添加它们：sMyString = String（5-len（sMyString），“0”）＆amp; sMyString其中5是原始的位数。
sMyString = String(5-len(sMyString),"0") & sMyString