188宝金博页面版

  • 图案背景
  • 纯色背景
视图
标记
批注
批注本地保存成功,开通会员云端永久保存 去开通
331284914

上传于:2013-02-28

粉丝量:0

331284914


  • 相关
  • 目录
  • 笔记
  • 书签

188宝金博页面版:更多相关文档

  • VB与Excel二次开发

    星级: 3 页

  • VB与Excel二次开发_GAOQS

    星级: 3 页

  • VB与Excel二次开发_GAOQS

    星级: 7 页

  • VB与Excel二次开发_GAOQS

    星级: 3 页

  • VB与Excel二次开发_GAOQS_XIHA

    星级: 9 页

  • VB与Excel二次开发_GAOQS_XIHA

    星级: 5 页

  • 利用VBA对Excel软件进行二次开发

    星级: 4 页

  • excel的VB二次开发方法

    星级: 2 页

  • excel的VB二次开发方法

    星级: 18 页

  • 利用VBA对Excel软件进行二次开发

    星级: 4 页

  • excel的VB二次开发方法

    星级: 18 页

  • 利用VBA对Excel软件进行二次开发

    星级: 4 页

  • 基于VBA的Excel二次开发应用研究

    星级: 2 页

  • 基于GM(1,1)模型的EXCEL /VBA二次开发

    星级: 5 页

  • 基于VBA 的 Excel二次开发应用研究

    星级: 2 页

暂无目录

点击鼠标右键菜单,创建目录

暂无笔记

选择文本,点击鼠标右键菜单,添加笔记

暂无书签

在左侧文档中,点击鼠标右键,添加书签

188宝金博页面版: VB与Excel二次开发

下载积分: 100

内容提示: VB 与 Excel 二 次 开 发陈向荣(厦门职工大学 , 福建 厦门 361004)【摘   要】   本文分析探讨了 VB - Excel 配合实现二次开发的理论依据、主要方法、技术特点及操作技巧 , 介绍 VB- Excel 编程在学校教务管理中的应用实例 。【关键词】  VB ; Excel   前言 : Excel 是一个数据处理功能十分强大的电子表格和数据库 ,一些用户使用 Excel 宏录制或 Excel 宏编程的方法对其进行二次开发 ,取得一定成效。 但是 ,一般会存在代码冗余过多 、表达式太长等不足。 本文介绍直接使用 VB 对 Excel 进行二次开发的理论探索和应用实例 。一、在 VB环境下进入 ...

文档格式:PDF | 页数:3 | 浏览次数:48 | 上传日期:2013-02-28 10:52:58 | 文档星级:
VB 与 Excel 二 次 开 发陈向荣(厦门职工大学 , 福建 厦门 361004)【摘   要】   本文分析探讨了 VB - Excel 配合实现二次开发的理论依据、主要方法、技术特点及操作技巧 , 介绍 VB- Excel 编程在学校教务管理中的应用实例 。【关键词】  VB ; Excel   前言 : Excel 是一个数据处理功能十分强大的电子表格和数据库 ,一些用户使用 Excel 宏录制或 Excel 宏编程的方法对其进行二次开发 ,取得一定成效。 但是 ,一般会存在代码冗余过多 、表达式太长等不足。 本文介绍直接使用 VB 对 Excel 进行二次开发的理论探索和应用实例 。一、在 VB环境下进入 Excel 平台在 VB 环境下访问 Excel 文件 ,可以有多种方法 ,如 :使用Data 控件、使用 OLE控件及引用 Excel 9. 0 Object Library 等 ,本文使用 Excel 9. 0 Object Library 对象库的方法。1. 在 VB 环境中引用 Excel 对象库进入 VB ,新建一个工程 ,内含标准窗体及模块。 选择 [工程] / [打开 ]命令 ,打开外部引用对话框 ,勾选 Microsoft Excel9. 0 Object Library 选项 ,Excel 对象库即被添加到当前 VB 环境中以供调用 。Excel 对象具有一定的层次和隶属关系 。 最上面一层为Excel 应用程序对象 (Application) 它是对象模型的基础 ,以下依次为 Excel 工作簿对象 (Workbook) ; Excel 工作表对象 (Work2sheet) 。 在此基础上 ,才有可能访问 Excel 单元格 Cells (i , j) ,Excel 行 Rows(i) ,列 Cols(j) 等。 VB 与 EXCEL 可以比拟作数据库主辅平台 ,两个平台各模块之间的关系可用方框图表示如下 :(图 1)2. 声明 Excel 对象变量 ,为了让多个窗体均能使用该变量 ,则必须在全局模块 Module1 中声明通用变量 :(代码 code1)’在全局模块通用段声明变量为 EXCEL 对象’声明变量为 EXCEL 应用程序对象Public oldxls As excel. Application’声明变量为 EXCEL 工作簿对象Public oldbook As excel. Workbook’声明变量为 EXCEL 工作表对象Public oldsheet As excel. Worksheet’定义其他相关变量Public rs % , re % , cs % , ce % , i % , j % , p % , a % , b %End SubOldxls 即为 Excel 应用程序对象变量 ,本文的实例均使用此变量作为 Excel 引用 。 通过该变量 ,可以逐级访问 Excel 的下级对象 ,如 :oldbook 为 Excel 工作簿对象变量 ;oldsheet 为 Excel 工作表对象变量。3. 在 VB 连接 Excel如上所述 ,在全局模块 Module1 编写子程序连接 EXCEL的子程序 (名为 joinExcel) ,以供需要创建 Excel 对象的窗体调用 。 窗体加载时 ,就可以启动并进入 Excel 平台 。(代码 code2)’编写连接 EXCEL 的子程序 (名为 joinExcel)Public Sub joinExcel()On Error Resume NextSet oldxls = GetObject (App. Path ,“Excel. Application”)If Err Then Err. ClearSet oldxls = CreateObject ( “excel. Application”)  If Err Then   Exit Sub  End IfEnd Ifoldxls. Visible = TrueSet oldbook = oldxls. Workbooks. AddSet oldsheet = oldbook. Worksheets(1)如上程序 (代码 code2) : Set 语句将 Excel 各层对象的引用分别赋给变量 oldxls、oldbook、oldsheet ,创建 Excel 应用程序对象、工作簿及工作表 ,进入 Excel 平台 ,此时用户可以看到一个新建的 Excel 文件 (Book1) ,表明 VB - Excel 连接成功 ,可以进行下一步操作了 。 注意本程序段使用了 On Error Resume Next等错误处理语句 ,从而避免了重复创建 Excel 对象。二、在 VB环境下打开或保存 Excel 文件。打开或保存 Excel 文件是利用对话框进行的 ,如 (图 2) ,在主控窗体上添加一个对话框控件 (CommonDialog1) ,在该窗体代码窗口编写打开或保存 Excel 文件的程序 ,为了 让多个窗体都能调用该程序 ,子程序的作用范围设为全局级的 。 另外添加命令按钮若干 ,以便切换到其它功能窗体及退出系统。(图 2)1. 打开已有的 Excel 文件(代码 code3)’编写打开 EXCEL 文件的子程序 openExcelPublic Sub openExcel()’设置对话框属性 ,用于指定 EXCEL 文件CommonDialog1. Filter =“Excel 文件| 3 . xls”CommonDialog1. Action = 1If CommonDialog1. FileName < >“” Thenexpath = CommonDialog1. FileName’打开对话框指定的 EXCEL 工作簿Workbooks. Open FileName : = expatholdbook. CloseElseEnd IfEnd Sub上列程序 (代码 code3) 中 ,关键语句是使用 Open 方法打开Excel 文件 ,以及使用 Close 方法关闭先前已经创建的空白 Excel27福   建   电   脑                 2005 年第 3 期

188宝金博页面版:关注我们

  • 新浪微博

关注188宝金博页面版公众号

188宝金博页面版
阅读
APP
阅读
返回
顶部
188宝金博页面版官网登录在线平台入口(2026已更新)—江苏协昌电子科技股份有限公司