例程

功能说明:该程序的主要功能是将Excel文件中的数据转换为XML格式并保存。程序通过读取用户选择的Excel文件，提取其中的数据表和字段信息，并将这些数据以XML格式写入一个新的文件中。此外，程序还提供了一个功能，可以将XML文件中的数据读取出来并显示在一个超级列表框中。

具体来说，程序包含以下几个主要部分：

1. **_按钮1_被单击**：当用户点击某个按钮时触发此子程序。首先，程序会弹出一个通用对话框让用户选择一个Excel文件。如果用户选择了文件，则程序会创建一个XML树结构，并从选定的Excel文件中获取第一个表格的名字及所有字段名。接着，程序遍历Excel表格中的每一行记录，将每条记录的数据按照字段顺序插入到XML树中，并最终将整个XML树的内容写入一个名为“测试数据.xml”的文件里。完成操作后，会弹出消息框通知用户Excel数据已成功写入XML文件。

2. **取excel表名**：这个子程序负责从给定的Excel文件中读取出所有的表名称，并将它们存储在一个数组中返回。它使用了ADODB连接来打开Excel文件，并通过查询模式获取表信息。

3. **取excel字段名**：此子程序用于从指定的Excel工作簿及其特定的工作表中抽取所有列（字段）的名字。同样地，它也是基于OLE DB连接来访问Excel文档，并通过执行SQL语句`SELECT * FROM [表名$]`来识别字段名。

4. **_按钮2_被单击**：与第一个按钮对应的功能相反，当按下第二个按钮时，程序允许用户选取一个XML文件。然后，程序加载这个XML文件，并解析其内容，将数据填充到界面上的一个超级列表框控件中展示出来。这里假设了每个XML节点代表一行数据，而每个属性值则对应于一列数据。

5. **__启动窗口_创建完毕**：在主窗口初始化完成后自动调用此子程序。如果当前目录下不存在名为"1.xls"的文件，则程序会创建这样一个空白的Excel文件作为示例或备用。

综上所述，这是一个用于处理Excel与XML之间数据转换的应用程序，特别适用于需要将Excel格式的数据转换成XML格式以便于进一步处理或存储的场景。

======窗口程序集1

           |  |

           |  |------ _按钮1_被单击

           |  |

           |  |------ 取excel表名

           |  |

           |  |------ 取excel字段名

           |  |

           |  |------ _按钮2_被单击

           |  |

           |  |------ __启动窗口_创建完毕