spreadsheet显示个身份证,显示不正确....

Question

.Cells(1, 3) = text1.text
这个显示身份证,因为身份证数据太长,最右边三位直接被舍为0了.....
此控间也没有文本格式...
这个咋搞?

Answer 1

.Cells(1, 3) = "'"(单引号) & text1.text或.Cells(1, 3) = " "(空格) & text1.text 试试

Answer 2

传递过来以后就变成科学记数法的数字了.是不是问题出在spreadsheet的格式是数字格式?能不能把那个单元格弄成文本格式?

Answer 3

.Cells(1, 3) = "'"(单引号) & format(text1.text,"##################")这样试试.

Answer 4

'我调试了,这样一点问题都没有.
Option ExplicitPrivate Sub Form_Load()Text1.Text = "1234567890123456789"
Spreadsheet1.Cells(1, 3) = "'" & Text1.TextEnd Sub