1. vb导出数据到excel
首先需要知道你要引用的数据在Excel中的位置，然后在VB里面引用Excel，然后打开Excel文件读数据Dim scxls As Excel.ApplicationDim scbook As Excel.WorkbookDim scsheet As Excel.Worksheet‘Set scxls = CreateObject("excel.application")‘Set scbook = scxls.Workbooks.AddSet scbook = scxls.Workbooks.open("c:\1.xls"
)Set scsheet = scbook.Worksheets(1)‘scsheet.Cells(1, 2) = "1111" ’写入数据a=scsheet.Cells(1, 2) '读取数据Set scbook = NothingSet scxls = Nothing‘scxls.Visible = True ’显示Excle数据较多，且有规律可循时，请使用循环语句
2. vb导入excel数据
这里有个方法可以把填充listview的datatable导出成csv文件，速度较快
publicstaticvoidsaveasexcel(datatabledt1)
{
savefiledialogsfd=newsavefiledialog();
sfd.filter="导出文件(*.csv)|*.csv";
sfd.filterindex=0;
sfd.restoredirectory=true;
sfd.title="导出文件保存路径";
sfd.showdialog();
stringstrfilepath=sfd.filename;
stringbuilderstrvalue=newstringbuilder();
streamwritersw=newstreamwriter(newfilestream(strfilepath,filemode.createnew),encoding.default);
//输出表头
busidetailbd=newbusidetail();这里的busidetail是你执行导出操作所在的busidetail.xaml
bd.writeheader(sw);
foreach(datarowdrindt1.rows)
{
strvalue.remove(0,strvalue.length);
for(inti=0;i<=dt1.columns.count-1;i++)
{
strvalue.append(dr[i].tostring());
strvalue.append(",");
}
strvalue.remove(strvalue.length-1,1);//移出掉最后一个,字符
sw.writeline(strvalue);
}
sw.close();
system.windows.messagebox.show("导出文件成功！","成功",messageboxbutton.ok,messageboximage.information);
}
//输出表头
privatevoidwriteheader(streamwritersw)
{
stringstrheader="时间,中文名称,英文名称,地市名称";
sw.writeline(strheader);
}
3. vb怎么保存数据到文本中
保存在frm中。frm是Vb程序中专门用于保存数据的。
4. vb如何输出结果数据
可以用tab（n）是定位从对象最左端算起的n列，spc（n）用于输出时插入几个空格。
5. vb如何导入数据库
基于Visual Basic编程语言,举例说明利用VB实现循环将本地Excel数据批量导入到远程的SQL Server数据库的方法。
6. vb怎么导出文件
Sub 数据导出()
'
' 数据导出 宏
Workbooks.Open Filename:="F:\复制数据表名.xls"
'表格名
Sheets("表格名").Select
Cells.Select
Selection.Clear
Windows("Sheet1.xlsm").Activate
Sheets("表格名").Select
Cells.Select
Selection.Copy
Windows("复制数据表名.xls").Activate
Cells.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Windows("Sheet1.xlsm").Activate
Application.CutCopyMode = False
Selection.Copy
Windows("复制数据表名.xls").Activate
Cells.Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
End Sub
7. vb从文件中读取数据
首先将文件显示做了区分：文件夹名称显示folderlist()，文件名称显示filelist():
Private Function folderlist(pathname As String, treeflag As Integer) 'treeflag:0列表 1树形 2树形展开
'文件夹数和名称
Dim sf As String
sf = Dir(pathname, vbDirectory) '获取第一个目录名
foldernum = 0
Do While sf <> ""
' 跳过当前的目录及上层目录
If sf <> "." And sf <> ".." Then
If (GetAttr(pathname + sf) And vbDirectory) = vbDirectory Then
If treeflag = 0 Then
Text2 = Text2 & sf & vbCrLf ' 如果它是一个目录，将其名称添加到列表
ElseIf treeflag = 1 Then
Text2 = Text2 & Treestr & sf & vbCrLf
ElseIf treeflag = 2 Then '树形展开的时候，需要了解子目录，所以还需进行递归调用
Text2 = Text2 & Treestr & sf & vbCrLf
folderlist pathname + sf, treeflag
filelist pathname + sf, treeflag
End If
foldernum = foldernum + 1 '统计文件夹数目
End If
End If
sf = Dir() ' 查找下一个目录
Loop
If treeflag = 0 Then
If foldernum <> 0 Then
Text2 = Text2 & vbCrLf & "======共有" & foldernum & "个文件夹======" & vbCrLf & vbCrLf
Else
Text2 = Text2 & "======无子目录======" & vbCrLf & vbCrLf
End If
ElseIf foldernum <> 0 Then
Text2 = Text2 & Nullstr & vbCrLf & Nullstr & vbCrLf
End If
End Function
Private Function filelist(pathname As String, treeflag As Integer) '0列表 1树形 2树形展开
'文件数和名称
Dim a As String
a = Dir(pathname & "/*.*")
filenum = 0
Do While a <> ""
If treeflag = 0 Then
Text2 = Text2 & a & vbCrLf
Else
Text2 = Text2 & Treestr & a & vbCrLf
End If
filenum = filenum + 1 '统计文件数目
a = Dir
Loop
If treeflag = 0 Then
If filenum <> 0 Then
Text2 = Text2 & "======共有" & filenum & "个文件======"
Else
Text2 = Text2 & "======无文件信息======"
End If
End If
End Function
8. vb如何导入数据
vb把数据写入vf数据库要采用了远程访问技术，确定接口和远程数据对象，是一种新建立的数据访问模式，具有数据模型简单的特点，对数据的访问更加灵活，能访问的数据类型也会更加丰富，利用ADO对象访问vf，数据库，添加控件属性，并访问数据库，用DIm函数导入数据，到vf数据库，获得数据源并打开数据连接，你数据QQ可以直接选择将数据写入数据库，也可以通过cyTXT文件进行中转。
9. vb数据库导出excel
将数据库里面的结果先读取出来，再通过写入指定EXCEL表格的方式，插入也是可以的！！
一般可以使用OLEDB连接数据库！也可以通过OLEDB插入EXCEL表格中的指定Sheet！
10. vb导出数据到excel出现科学计数法
浮点数是表示小数的一种方法。
所谓浮点就是小数点的位置不固定，与此相反有定点数，即小数点的位置固定。
整数可以看做是一种特殊的定点数，即小数点在末尾。
8086/8088中没有浮点数处理指令，不过从486起，CPU内置了浮点数处理器，可以执行浮点运算。
一般的浮点数有点象科学计数法，包括符号位、指数部分和尾数部分。
- 相关评论
- 我要评论
-
