[求助]VB获取Excel数据的问题
Excel表内有一内容为01.00,通过VB进行读取,但独到的数值为1,VB使用字符型对Excel读到的数据进行存储。
有什么方法能保证读取前后内容的一致性呢?求教啦!
先谢过!
单独读取数据是不行的.还需要读取该CELL的格式.
而且要看你储存的是什么格式,除了char/nchar等字符型栏位,其他的就要看本身在数据库里面定义的数据类型与格式.
比如虽然CELL中存的是01.00,但存入数据库中的栏位格式是Numeric(5,2),其就会变成 1.00
原来的读取方式:Ex_dh(i) = Excelsheet.Cells(i, 1)
更改后的读取方式:Ex_dh(i) = Excelsheet.Range("A" & i).Text
问题解决,呵呵,谢谢啦.
就是应该读取 .Text 。
恭喜楼主…………
使用Variant变量数组存取从excel中的得到数据。使用TypeName()判断类型即可。
例如:
dim a(5)
dim b as string
a(0)=Excelsheet.Cells(i, 1)
b=typename(a(0))'b为数据类型
呵呵,谢谢大家热心帮忙啦!
相关问答:
在下是vb的新手,想写段程序,在vb中,使用wscript调用一些外部的命令,但是程序执行一直有错误,请各位高手帮忙解答下,谢谢。
代码如下:
VB code:
Private Function getFile_CMD(filename, filepath) As Bo ......
初学,大胆提问,请高手不吝赐教
1、滚动条点击与绘图板(屏幕,Piceure1)的移动问题已经解决。
Picture1.Top = -VScroll1.Value + bcW '垂直移动
Picture1.Left = -HScroll1.Value + bcW ' ......
在vb中如何读取Word内容(包含表格,图片,等)
竟然不是zero。
不知道怎么实现的不要说话
这个只能读文本,
VB code:
Private Sub Command1_Click()
Dim WordApp As Object
Set WordApp = CreateObject(& ......
xmlDoc1.loadXML(h)总是返回false,为什么?谢谢帮忙回答一下
h是什么呢。。。。。。。。。
h是xml格式的字符串
你是想打开。XML格式的文件吧?
我是把h放在xmlDoc1里,用xmlDoc1.loadXML(h),然后取xmlDo ......