社区
数据库(包含打印,安装,报表)
帖子详情
使用VSFlexGrid 将数据保存成EXCEL文件,“0101”的数据成了“101”,怎么解决?
SYNFORM
2005-02-21 06:38:20
使用VSFlexGrid 将数据保存成EXCEL文件,“0101”的数据成了“101”,怎么解决?
其实就是导到EXCEL后,将数据单元格定义为字符型,怎么实现?我用的是VSFlexGrid 8.0
解决的话,100分送上!
...全文
288
9
打赏
收藏
使用VSFlexGrid 将数据保存成EXCEL文件,“0101”的数据成了“101”,怎么解决?
使用VSFlexGrid 将数据保存成EXCEL文件,“0101”的数据成了“101”,怎么解决? 其实就是导到EXCEL后,将数据单元格定义为字符型,怎么实现?我用的是VSFlexGrid 8.0 解决的话,100分送上!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
myhgyp
2005-02-24
打赏
举报
回复
1、写入Excel前将“0101”类的数据前加“'”
2、定义模板,将写“0101”的列设置为文本类型
程序员老干部
2005-02-24
打赏
举报
回复
学习,谢谢
haohaohappy
2005-02-22
打赏
举报
回复
有一个办法但不是很好,把“0101”导入EXCEL前在其前面加单引号"'",在看时和打印上没问题,如果要对生成的EXCEL表数据进行处理和编辑时,就不好了。
XKDS
2005-02-22
打赏
举报
回复
Private Sub Form_Load()
fg.ColDataType(1) = flexDTString
fg.Text = "0101"
fg.SaveGrid "c:\jj.xls", flexFileExcel
End Sub
关键是:fg.ColDataType(1) = flexDTString
另外:
本人觉得还是使用Excel对象手动转换好
SaveGrid方法保存的Excel文件是有限制嘀
yangao
2005-02-21
打赏
举报
回复
用Excel对象就好说了
不用的默认为数字
xiaohuasz
2005-02-21
打赏
举报
回复
如果将"0101"先转化为"'0101",那么保存在excel后将显示为0101
SYNFORM
2005-02-21
打赏
举报
回复
我这样写的
fg.SaveGrid "book1.xls", flexFileExcel, flexXLSaveFixedCells
没有使用'xsheet为Excel.Worksheet对象
xiaohuasz
2005-02-21
打赏
举报
回复
设置单元格的NumberFormatLocal 属性为 "@"
Andy__Huang
2005-02-21
打赏
举报
回复
你先設計好EXCEL文檔模板,把對應的單元格設置字符串數據類型,然後再把數據從SFlexGrid 發送過去。
VS
FLEX
GRID
数据
转出到
EXCEL
工程引用说明:本代码的
使用
是基于Microsoft
Excel
2003
使用
的,未在其它版本的Office上测试过,因此在VB中应当引用Microsoft
Excel
11.0代码其它内容说明:本代码中
使用
了
Vs
Flex
Grid
做为源
数据
;并且可以命名
EXCEL
...
数据
导出到
Excel
的6种方法(VB6)
在
数据
操作中,特别是与
数据
库相关的操作中,我们需要经常导出
数据
到
Excel
表格中,下面我们提供了六种方式来将
数据
导出到
Excel
表格中: 如果大家C币比较多的话,可以直接下载我整理好的源码:点击此处下载>>&...
Vs
flex
grid
控件
使用
方法点滴
1、ShowCell:显示指定位置的单元格比如一个有很多列的
Vs
flex
grid
,希望在显示
数据
时先显示第20列的
数据
,如果不对控件进行设置,则需要手工拖动鼠标,此时ShowCell就很有用了,
使用
方法为ShowCell 行,列2、在
Excel
中有一...
如何将MS
Flex
Grid
表格
数据
导出为
Excel
1.引用 2.在模块中编写代码 Public Function ExportTo
Excel
(ms
flex
grid
... Dim xlapp As
Excel
.Application '定义
excel
类 Dim xlbook As
Excel
.Workbook '定义工作簿类 Dim xlsheet As
Excel
.Worksheet '定义工...
vb6如何将MSH
Flex
Grid
控件中的内容导出为
Excel
需要引用 Microsoft
Excel
11.0 Object Library 需要添加控件Mircrosoft Hierarchical
Flex
Grid
Control 6.0(SP4) (OLEDB) 我们来看一下代码 Private Sub cmdOut_Click() Dim xlApp As Object Dim xlB
数据库(包含打印,安装,报表)
1,216
社区成员
55,954
社区内容
发帖
与我相关
我的任务
数据库(包含打印,安装,报表)
VB 数据库(包含打印,安装,报表)
复制链接
扫一扫
分享
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章