重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
方法一:
成都创新互联坚持“要么做到,要么别承诺”的工作理念,服务领域包括:做网站、网站建设、企业官网、英文网站、手机端网站、网站推广等服务,满足客户于互联网时代的丰润网站设计、移动媒体设计的需求,帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴!
保存为CSV格式文件,EXCEL可以识别并打开CSV格式文件.
方法二:
在装有EXCEL2003的机器,生成空文件,复制到你的计算机,打开使用.
ado.net读数据库进内存是DataTable,单元格内容是object类型,因此你必须自己转换,没有其他捷径。不过考虑到为null的情况以及大量的转换,是单调重复的工作,不妨针对每个类型写个转换函数,比如针对string的,bool的,等等。甚至还可以有泛型版本等。另外.net里面的可空类型就是用来解决数据库这种空值场景的,不妨试试。
试了好多次,设为科学计数时虽然可以最高设为30位小数,但Excel自动只保留15位有效数字.
下面的程序设置Excel中A列中的数位科学计数,小数保留30位
Set Exl = GetObject("", "Excel.Application")
Exl.ActiveSheet.Column("A:A").NumberFormatLocal= "0.000000000000000000000000000000E+00"
虽然在这里设置的是30位,但Excel只显示15位(不知道为什么)
有关其他的Excel语句怎么写,你可以利用Excel的宏.先用宏实现相应的功能,在用Excel中的VB宏编辑器看看VB代码,虽然和最终VB程序有些差别,但还是有一定联系的.
只能帮你这么多了,有什么问题再联系我吧.
1、新建一个标准的VB EXE工程,只有一个Form,Form上有两个按钮:Command1和Command2。
2、双击Command1添加如下代码
Private Sub Command1_Click()
Dim strFile As String
Dim intFile As Integer
Dim strData As String
strFile = "c:\学生成绩.txt"
intFile = FreeFile
Open strFile For Input As intFile
strData = StrConv(InputB(FileLen(strFile), intFile), vbUnicode)
Debug.Print strData
Close intFile
End Sub
3、按F8开始单步调试代码,点击Command1,进入单步调试功能,
4、多次按下F8或直接按下F5运行完成,就完成了读取文本文件内容并输出到立即窗口。