VB实验标准件库的建立.docVIP

实验 标准件库的建立 实验步骤 1．在前面的实验中，通过编程实现了键槽特征的自动绘制。但是在机械设计中，键槽特征实际上是规格成系列化的图形，只要轴径确定了，其余的参数均可从设计手册中查询得到，而不是由用户任意输入。除此之外，在工程设计中经常要用到一些标准件，对于这些类型的零件图形，最好的解决办法是与标准数据库相连接。本实验以键槽特征的绘制为例，先将键槽的相关数据存放在数据库中，通过用户输入关键参数，然后利用VB程序访问数据库获得相关参数数据，计算关键点坐标并绘制出图形。 2．建立零件标准数据库 运行Microsoft Office Access应用程序，新建一个数据库，取名为“标准零件库”。在打开的数据库窗口中双击“使用设计器创建表”，依次添加如下字段。 表5-2 键槽表结构 字段名称 数据类型 字段大小 radius 数字 单精度型 width 数字 单精度型 height 数字 单精度型 通过右键点击radius字段，将radius字段设置为该表的主键，并将该表命名为“键槽”。返回数据库窗口后，会发现当前数据库中增加了一个新的表，其名为“键槽”。双击该表，将会进入记录输入界面，依次输入键槽的有关标准数据，如图5-16所示。 图5-16 键槽标准数据 保存所作工作并退出。 3．设计VB应用程序界面 运行Visual Basic，新建一个“标准EXE”工程，在工程中的Form1表单中，按照设计键槽特征所需的参数，设计如下界面： 图5-17 键槽特征绘制圆心坐标输入 其中，圆心坐标的三个分量X、Y、Z由用户从文本框输入。并且设置其默认值为（100.0，100.0，0.0） 4．建立与数据库的连接 在上面的步骤中，实现了圆心坐标三个分量的用户输入，而其他的三个参数则没有让用户输入。原因在于轴径等参数是标准化的参数，在设计手册中有详细规定，不应由用户任意输入。我们可以从标准数据库中读出相应的数据，再由用户交互式选择。要做到这一点，先要建立与数据库的连接。在VB中访问数据库有多种方式，这里介绍其中简单易行的一种：通过ADO Data控件来实现。 使用ADO Data控件之前，请选择“工程”菜单的“部件”菜单项，然后选中“部件”对话框的Microsoft ADO Data Control 6.0(OLE DB)复选框，再单击“确定”按钮，将其加到工具箱后拖放至应用程序的窗体中，并按下面的步骤设置其相关属性。 在属性窗口中选择ConnectionString属性，然后单击右侧的“…”按钮，打开“属性页”对话框。 图5-18 ADO Data控件ConnectionString属性页 接着选中“生成”按钮，弹出“数据链接属性”对话框，并在“提供者”选项卡中选择“Microsoft Jet 4.0 OLE DB Provider” 图5-19 数据链接属性对话框1 接下来点击“下一步”按钮，转到“连接”选项卡，通过“…”按钮选择前面建立的“标准零件库”。 图5-20 数据链接属性对话框2 可以点击“测试连接”按钮测试数据库设置是否成功。然后点击“确定”按钮关闭对话框。 接下来决定从数据库中检索的信息，即设置ADO Data控件的“RecordSource”属性。在记录源属性页中选择记录源的命令类型为表，表的名称指定为前面建立好的“键槽”表。 图5-21 ADO Data控件的记录源属性页 由于ADO Data控件仅用于链接数据库，不需要用户操作，故将其“Visible”属性设为“False”。 5．将数据库中的记录显示在界面的相应控件中。 只要轴径确定，键槽特征的宽度与深度均可从标准数据中查询得到，故可提供一个下拉列表供用户选择标准轴径，根据该轴径的值，检索出键槽特征的宽度与深度数据并显示在界面中即可。在VB中提供了DataCombo控件，可以实现与数据库中特定的字段绑定而自动填充下拉列表，极大地简化了程序设计。DataCombo不是VB默认工具箱中的控件，需要用户手工添加进来。选择“工程”菜单的“部件”菜单项，然后在“部件”对话框中选中“Microsoft DataList Control 6.0(OLEDB)”复选框，单击“确定”按钮将其添加到工具箱中。 将DataCombo控件拖放到窗体的适当位置后设置其属性如下： 表5-3 DataCombo控件属性设置 属性名称 值 DataSource Adodc1 RowSource Adodc1 ListField radius BoundColumn radius Text 清空 添加两个文本框用于显示键槽特征的宽度与深度值，由于这两个值均从数据库中检索得到，故不允许用户输入，需要将其“Enabled”属性设为“False”。最后添加“确定”与“取消”按钮完