2018年11月30日
这个窗体的制作
摘要： Private Sub cmdOK_Click() '“查询”按钮 Dim strSQL As String, strTemp1 As String, strTemp2 As String, strTemp3 As String Dim rs As ADODB.Recordset' txtBarCo 阅读全文
posted @ 2018-11-30 07:49 金蝶实施二开学习 阅读(359) 评论(0) 推荐(0) 编辑
带部门id部门名称的修改窗体的制作
摘要： Private Sub Form_Load() Dim rs As Recordset Set rs = QueryExt("SELECT DepID,DepName FROM Depart") '获取部门数据 With cmbDepart .Clear '清空组合框 Do While Not rs 阅读全文
posted @ 2018-11-30 06:00 金蝶实施二开学习 阅读(325) 评论(0) 推荐(0) 编辑
2018年11月29日
设计报表
摘要： 添加报表命令 阅读全文
posted @ 2018-11-29 23:12 金蝶实施二开学习 阅读(280) 评论(0) 推荐(0) 编辑
业务员类别窗体的制作
摘要： 单击业务员类别制作 Private Sub mnuSalerType_Click() '业务员类别 frmSMType.strSQL = "SELECT * FROM jxc_SMType" frmSMType.Show '显示“业务员类别”窗体End Sub MSHFlexGrid控件设置列标题， 阅读全文
posted @ 2018-11-29 20:35 金蝶实施二开学习 阅读(178) 评论(0) 推荐(0) 编辑
做一个树形功能，修改密码
只有注册用户登录后才能阅读该文。 阅读全文
posted @ 2018-11-29 19:47 金蝶实施二开学习 阅读(5) 评论(0) 推荐(0) 编辑
2018年11月28日
查询窗体的制作
摘要： Private Sub Command1_Click() Adodc1.RecordSource = "select * from xsd where 日期 between # " & DT1.Value & " # and # " & DT2.Value & " #" Adodc1.Refresh 阅读全文
posted @ 2018-11-28 13:31 金蝶实施二开学习 阅读(377) 评论(0) 推荐(0) 编辑
ado 数据源
摘要： 阿斯蒂芬 阅读全文
posted @ 2018-11-28 13:14 金蝶实施二开学习 阅读(466) 评论(0) 推荐(0) 编辑