三九宝宝网宝宝教育智力培养

请问如何在vs2010中用vb创建一个excel文件

03月22日 编辑 39baobao.com

[如何在windows下实现一个简单的文件管理系统]简单来说 你需要实现一个窗口。 这个窗口可以查看,删除,重命名,新建 然后…你实现窗口的时候就会实现 “如何显示指定那个文件夹的内容” 接下来你需要给窗口实现一个类似ID的...+阅读

VS 软件太大,我没有安装 ,VB6中是可以的,供参考

Dim objExcel As Excel.Application

Dim objWorkBook As Excel.Workbook

Set objExcel = CreateObject("Excel.Application")

Set objWorkBook = objExcel.Workbooks.Add()

objExcel.Visible = False

Dim objSheet As Excel.Worksheet

Set objSheet = objExcel.Worksheets("sheet1")

objSheet.Cells(1,1) = "姓名" '对单元格赋值

objSheet.Cells(1,2) = Date

objSheet.Cells(1,3) = Time

objWorkBook.SaveAs App.Path & "\a.xls" '保存

objWorkBook.Close

objExcel.Quit

Set objSheet = Nothing

Set objWorkBook = Nothing

Set objExcel = Nothing

用VS2010开发VB点击按钮选择EXCEL打开后的数据显示在

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 //选择路径,添加一个对话框 Dim path As String path="" OpenFileDialog file = new OpenFileDialog() file.ShowDialog path = file.FileName //查询数据库 Dim rs As ADODB.Recordset Dim cnn As ADODB.Connection Set rs=new ADODB.Recordset Set cnn=new ADODB.Connection cnn.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+path+";Extended" cnn.Open Dim sql As String sql = "Select * from [Sheet1$]" //你还需要选择表名 rs.Open(sql, cnn, 3, 1) Dim da As New System.Data.OleDb.OleDbDataAdapter Dim ds As New DataSet da.Fill(ds, rs, 1) DataGridView1.DataSource = ds.Tables(0) //当然你必须要选择表名,你怎么知道你的EXCEL都是Sheet1表,我写过C#代码来操作,VB.NET没写过,你看一下,大同小异 //获取EXCEL表名称 private void link(string lujing) { OleDbConnection cnn = new OleDbConnection(); cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+lujing+";Extended"; try { cnn.Open(); System.Data.DataTable schemaTable = cnn.GetOleDbSchemaTable(System.Data.OleDb.OleDbSchemaGuid.Tables, null); //把表名称加入LV #region //listview if (schemaTable.Rows.Count != 0) { #region//创建一个组,------------设置 Groups 属性 listView1.Groups.Clear(); for (int i = 0; i

以下为关联文档:

如何在 VB中播放声音文件楼主的要放的歌曲不知道是固定的一首歌还是可以选择性的播放,如果是固定的一首,楼上的可以达到你的要求,如是可以像QQ音乐或酷狗一样,可以选择歌曲的话,建议添加一个commondialog...

EXCEL2010如何自动统计1、只需在Sheet1中按Ctrl+F3键,打开自定义名称栏,选择“编辑”,将原名称颜色的引用位置改为 =CET.CELL(63,Sheet1!AD2) 确定; 2、在AD11单元格中输入=颜色,确定,然后向右向下填充...

如何用VBA创建打开填写关闭删除excel文件最后加上 xlbook.close set xlbook=nothing set xlapp =nothing 创建并打开的文件没有关闭,文件在第一次打开的时候会被锁定,以后再打开的时候只能以只读的方式打开。 你可以...

如何在Excel中用公式统计单列不重复的个数在B2单元格输入公式=SUMPRODUCT(1/COUNTIF(A2:A8,A2:A8)),即可统计出A列A2:A8单元格区域的不重复值的个数。如下图所示: 公式解释:COUNTIF(A2:A8,A2:A8)将对A2:A8单元格区域中...

怎么在excel2010中制作甘特图甘特图最实用的地方在于项目管理中,直观呈现任务步骤及所需的时。比如,在制作项目规划时,每个子项目所需要的时间及时间安排通过甘特图呈现出来清楚明白。下面说说,如何在Excel...

请问在EXCEL里如何统计字数呢EXLCEL没有word一样可以直接统计字数的工具,但是excel可以通过函数LEN统计字符数,LEN函数的功能为返回文本字符串中的字符数,方法如下:1)如果希望分类统计各个单元格中的字数,直接...

VB创建电脑计划任务是shutdown吧,你打少四个字母了 Dim mytime,myout1,myout2mytime=nullmytime=InputBox(“请输入定时时间(格式20:10:05)”&vblf&”如果想倒计时关机,请输入倒计时时间”&vblf&”(...

Excel2010简单扇形统计图如何制作1、首先在Excel中输入表的名称和数据。如下图所示: 2、鼠标选中数据表格,切换到【插入】选项卡,单击【图标】选项组,在下拉面板中选择【饼图】—【二维饼图】。 3、Excel系统...

学习使用VS2010开发一个VC对话框程序重写了OnClose函我试了一下,在调用OnClose后又调用了OnBnClickedCancel,所以是多次delete的问题,应该在delete时这么写 if(pstr != NULL) { delete pstr; pstr = NULL; } (1)点击IDOK按钮退出:...

推荐阅读
图文推荐