一、 简介
Visio是一款强大的图表和流程图绘制工具，Visio 2010中增加了科学图形包，用于创建并定制科学图表。科学图形包为绘制化学结构、分子轨道、生命科学与工程学等提供了大量的模板和工具。
二、 Visio科学图形包中的主要功能
1. 提供多种模板：科学图形包提供了非常多的模板，用于创建流程图、实验室仪器、化学结构等，这些模板涵盖了通用和专业的科学图形。
2. 绘制具有关联的实验室图像：Visio支持创建与实验室相关的流程图，例如仪器、化学反应方程式和生物分子结构等。这些实验室图像是可关联的。用户只需鼠标单击，即可切换到相应页面。
3. 创建可将数据导入和导出的图表：Visio 支持创建可将数据导入和导出的图表。用户可以通过外部数据源创建 Visio 图表、更新数据和分享信息。
4. 可自定义图像：Visio 支持用户自定义模板、图表元素和形状。用户可以根据自己的需要，实现更好地可视化效果。
5. 支持多种格式的文件：Visio 支持多种格式的文件，包括 XML、PDF、XPS 和 HTML 等。用户可以将 Visio 图表转换为其他格式，以便更好地与其他应用程序共享。
三、 Visio科学图形包的应用场景
应用于多种不同类型的科学图表，如化学结构、分子轨道、生命科学与工程学等。
1. 化学结构：Visio 可以用于绘制化学结构图、化合物名称图、还原电位图等。支持多种颜色、形状，同时支持导入和导出数据，以便更好地与其他应用程序共享。
2. 分子轨道：Visio 还可用于绘制分子轨道图和化学键。有许多模板可供选择，基础的原子、离子、共价键和离子键等等，可以与实验室的信息相结合。
3. 生命科学与工程学：Visio 还提供了生命科学和工程学的模板，如蛋白质分析、生物反应器设计和生物气候箱等。这些模板支持任何形式、任何颜色，可以达到更好的可视化效果。
四、 Visio科学图形包代码示例
创建化学结构图
Sub CreateChemicalStructure()
Dim shp As Visio.Shape
Set shp = Application.ActivePage.ImportEx("C:\Chemical_Molecule.vsd", _
visImportDefault)
shp.Cells("PinX").FormulaU = "4.25 in"
shp.Cells("PinY").FormulaU = "5.5 in"
End Sub
创建分子轨道图
Sub CreateMolecularOrbital()
Dim shp As Visio.Shape
Set shp = Application.ActiveWindow.Page.DrawOval(2, 2, 6, 6)
shp.DrawNURBS False, 3
shp.Cells("FillForegnd").FormulaU = "RGB(255, 192, 0)"
shp.Cells("FillBkgndTrans").FormulaU = "0.3"
shp.Cells("EventDblClick").FormulaU = "GotoNamedView(" _
"0, ""Orbital"")"
shp.Cells("User.molecule").FormulaU = _
"""C2H6O - ethanol, molecular orbital"""
End Sub
创建生命科学模板
Sub CreateBiologicalTemplate()
Dim shp As Visio.Shape
Set shp = Application.ActivePage.ImportEx("C:\Life_Sciences.vsd", _
visImportDefault)
shp.Cells("PinX").FormulaU = "4.25 in"
shp.Cells("PinY").FormulaU = "5.5 in"
End Sub
总结
Visio 科学图形包是一款用于创建并定制科学图表的强大工具，提供多种模板和工具，包括化学结构、分子轨道、生命科学与工程学等，支持多种格式的文件和自定义图像，适用于多种不同类型的科学图表，具有更好的可视化效果和灵活性。
