Word实用操作技巧拾遗.pdfVIP

T 7 SILICON VALLEY 羹懿 【科技创新论坛】 End If ／／定义一个文件流 is，让它指 向工业生产 日报Excel报表 其次检查业务发生 日期的格式 ，如果不为yyyymmdd，要给 DC IN D PRODUCE．XLS — — — 出提示 ： lnPutStream is neW FileInPutStream IF 单元格 (3，2)．格式 “yyyymmdd” Then (“DC IN D— PRODUCE．XLS”)： 消息提示 (业务发生 日期的格式为yyyymmdd，请重 ／／在文件流 的基础上定义工作工作薄rwb 新填写 ! ) jx1．Workbookrwb：Workbook．getWorkbook(is)： End If ／／获取第…张Sheet表 ，EXCEL$~表 的内容都在Sheet1中 其次检查卷烟编码的长度 ，超过3O位 的要提示： Sheetrs=rwb．getSheet(0)： IF 当前行 号 4AND单元格 (当前 行，1)．长度 30 ／／读取单元格 (2，2)的值，即上保单位编码 ，其他单元格 的 rhen 值也将通过这种方法读取 消息提示 (卷烟编码长度不能超过3O位 ! ) Cellc22：rs．getCe1l(2，2)： End If Stringstrc22=c22．getContents0 ： 其次检查生产类型的值，如果不是字符值01~Jto8中的一个 其他EXCEL~表 的读取都将按照这种方法实现 至此整个 要给 出提示： Excel表样 自动导入数据的实现介绍完毕 。 IF 当前行号 4AND单元格 (当前行，2)．值 notin( 4展望 ’01’，’O2’，’03’，’04’，’O5’，’06’，’07’，’08’)Then 现在整个系统 已经设计完成 ，纵观整个程序 ，其难 点在于 消息提示 (生产类型不对 ，请重新填写 ! ) 数据 的抽取 。为 了解决数据的重复存储 ，程序设计时 已经将各 End If 个报表的数据表设计成虚表 了，将八个报表数据统一存放到一 最后对于生产数量 的小树位数 的问题 ，只需设置单元格 的 个数据表 中，然后在这个综合表上建立各个报表 的视图。 数据格式为小数点后4位即可 。 数据抽取的另一个难点在于程序需要根据用户提供的数据 IF 当前行号 4 源信息建立到用户数据 的JDBC连接 ，如果用户数据户 比较分 单元格 (当前行，3)．NumberFormatLocal= 0．0000一 散 ，而