窗口程序集名 | 保 留 | 保 留 | 备 注 |
窗口程序集_启动窗口 | | | |
通用对话框1.类型 = 0
如果真 (通用对话框1.
打开 ())

编辑框1.内容 = 通用对话框1.文件名

变量名 | 类 型 | 静态 | 数组 | 备 注 |
excel文件路劲 | 文本型 | | |
工作簿对象 | 对象 | | |
数据范围 | 对象 | | |
行对象 | 对象 | | |
列对象 | 对象 | | |
行数 | 整数型 | | |
列数 | 整数型 | | |
如果真 (Excel程序1.
创建 () =
假)
信息框 (“你的计算机上没有安装EXCEL程序”, 0, ,
)
返回 ()按钮2.禁止 = 真Excel程序1.显示 = 假
excel文件路劲 = 编辑框1.内容
Excel程序1.
创建 ()Excel工作簿1.
置程序 (Excel程序1
) Excel工作簿1.
打开 (excel文件路劲
)Excel工作簿1.表格序号 = 1
工作簿对象 = Excel工作簿1.
取表格对象 ()数据范围 = 工作簿对象.
读对象型属性 (“UsedRange”,
)行对象 = 数据范围.
读对象型属性 (“Rows”,
)行数 = 行对象.
读数值属性 (“Count”,
)列对象 = 数据范围.
读对象型属性 (“Columns”,
)列数 = 列对象.
读数值属性 (“Count”,
) 编辑框2.内容 =
到文本 (行数
)编辑框3.内容 =
到文本 (列数
)Excel工作簿1.
关闭 ()Excel工作簿1.
释放 ()Excel程序1.
释放 ()Excel程序1.
退出 ()按钮2.禁止 = 假