管理信息系统开发案例教程第5章设计类型管理模块.pptVIP

【图书类型管理】窗体成功启动后，展开TreeView控件中各层节点，然后单击选择节点“TP-自动化技术、计算机技术”，如图5-11所示。 图5-11　展开TreeView控件中各层节点 单击【新增下级类型】按钮，输入表5-27中所示的第1行的图书类型数据，如图5-12所示，单击【保存】按钮。 图5-12　新增三级节点的下级节点 （1）声明类的公有变量 （2）编写类TreeNodeData构造函数New的程序代码 5．业务处理类bookTypeClass各个成员的代码编写 双击类文件“bookTypeClass.vb”，打开代码编辑器窗口，在该窗口中编写程序代码。 （1）引入命名空间 （2）声明bookDB类库中bookDbClass类的对象 （3）编写方法getBookType的程序代码 （4）编写方法initTrvTree的程序代码 （5）编写方法saveForAdd的程序代码 （6）编写方法saveForEdit的程序代码 （7）编写方法deleteData的程序代码 5.5 设计【图书类型管理】  应用程序界面 1．添加Windows窗体 参照2.5节的方法在bookUI类库中添加一个新的Windows窗体。 2．设计窗体外观 在【图书类型管理】窗体中添加1个TreeView控件、1个Splitter控件、1个Panel控件、6个Label控件、6个TextBox控件和7个Button控件，调整各个控件的大小与位置，窗体的外观如图5-9所示。 图5-9　【图书类型管理】窗体的外观设计 3．设置窗体与控件的属性 5.6 编写【图书类型管理】 窗体程序代码 1．添加引用 参照2.4.2节的方法将类库bookAPP添加到类库bookUI的引用中。 2．声明窗体级变量 3．编写自定义过程clearTextBox的程序代码 4．编写自定义过程setTextBoxState的程序代码 5．编写自定义过程setButtonState的程序代码 自定义过程setButtonState的程序代码如表5-17所示。 表5-17 自定义过程setButtonState的程序代码 行号 代 码 01 02 03 04 05 06 07 08 Private Sub setButtonState(ByVal bState As Boolean) btnAddEql.Enabled = bState btnAddSub.Enabled = bState btnModify.Enabled = bState btnDelete.Enabled = bState btnSave.Enabled = Not bState btnCancel.Enabled = Not bState End Sub 6．编写自定义过程initializeTree的程序代码 自定义过程initializeTree的程序代码如表5-18所示。 表5-18 自定义过程initializeTree的程序代码 行号 代 码 01 02 03 04 05 Private Sub initializeTree() Dim dt As New DataTable Dim dvList As DataView dt = bookTypeObj.getBookType() dvList = dt.DefaultView 行号 代 码 07 08 09 10 11 ‘初始化TreeView控件的各个节点 trvList.Nodes(0).Tag = New bookAPP.treeNodeData(, _ 图书类型, , 0, ) bookTypeObj.initTrvTree(trvList.Nodes(0).Nodes, 0, dvList) End Sub 7．编写【图书类型管理】窗体的Load事件过程的程序代码 8．编写【图书类型管理】窗体Activated事件过程的程序代码 9．编写TreeView控件的AfterSelect事件过程的程序代码 10．编写【新增同级类型】按钮的Click事件过程的程序代码 11．编写【新增下级类型】按钮的Click事件过程的程序代码