hur.cn - 华软网

 热门搜索

为什么保存到Excel文件的字符串都少零(如:00001 -> 1)???

  作者:未知    来源:网络    更新时间:2018/6/13
for iflagrow = 1 to ll_row
    for iflag = 1 to ll_colnum
        ls_colname = dw_1.describe('#' + string(iflag) + ".name")
        ls_value = dw_1.Describe("Evaluate('LookupDisplay("+ &ls_colname +")',"
                   +string(iflagrow)+")")
        ole_workbooks.cells(iflagrow + 2,iflag).value=string(ls_value)
        ole_workbooks.cells(iflagrow + 2,iflag).HorizontalAlignment =2
    next
    ole_workbooks.cells(iflagrow + 2,ll_colnum+ 1).value=' '
next

程序如上,保存到Excel中的字符串前面的0都不见了,例如,0001就会变为1,各位高手有什么解决的方法吗? 急需你的援助啊!!!
------华软网友回答------
其实这是excel的格式显示问题吧,
------华软网友回复------
0001就会变为1

你在excel中的编辑栏(显示栏)看看是不是0001。
------华软网友回复------
saiche05(赛车):
谢谢你的帮忙,在excel文件中看到的是1, 所有很郁闷
------华软网友回复------
可能要把单元格设为文本格式,而不是常规格式
------华软网友回复------
在字符前加"'"就可以了
例:       ole_workbooks.cells(iflagrow + 2,iflag).value=string(ls_value)
改为:     ole_workbooks.cells(iflagrow + 2,iflag).value="'"+string(ls_value)

------华软网友回复------
看来,只有这个了,
ole_workbooks.cells(iflagrow + 2,iflag).value="'"+string(ls_value)

其实我在excel里输入0001,它也是显示成1,

除非把它的格式设成文本格式或是'0001,它才显示0001,否则显示成1。
------华软网友回复------
谢谢各位的提示,结帖了!!      
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。