摘要: 以下是我用treeview控件按部门和员工显示设备领用情况代码. Option Compare Database Dim rec As New ADODB.Recordset Dim recPlant As New ADODB.Recordset Dim nodindex As Node Dim k 阅读全文
posted @ 2018-05-02 23:48 黑旗君 阅读(830) 评论(0) 推荐(0)
摘要: 目的:将数据库中的数据与树控件绑定背景:我们想在树控件中显示销售客户的层级列表,这个销售客户的分层是这样的,先按“大区”,再按“省份”,最后到“客户”我们在数据库中建立了三个表,字段如下:大区表:大区ID,大区名称省份表:省份ID,省份名称,所属大区客户表:客户ID,客户名称,所属省份这三个表互相建 阅读全文
posted @ 2018-05-02 23:17 黑旗君 阅读(380) 评论(0) 推荐(1)
摘要: Private Sub Form_Load()'引用C:\windows\system32\MSCOMCTL.OCX,否则提示出错。 Dim Rec As New ADODB.Recordset Dim stRecQL As String Dim Item As Integer Dim i As I 阅读全文
posted @ 2018-05-02 14:35 黑旗君 阅读(283) 评论(0) 推荐(0)