刚写完的东东 ［销售统计分析系统 V1.0 ］

cg1

对你的程序非常感兴趣，能否获得源码？

cg1sh@hotmail.com

winxp

能给我一份吗，我目前想做一个ACCESS+VB的程序，希望有帮助。谢谢。
ilovevb@elong.com

kevinch

good

fan0217

链接地址出现错误了

xjliyuehua

链接地址出现错误了

WGYE

KKB

safetyxu

咋下载啊

yy3625

链接地址出现错误了

hwhwenha01

Public Sub SetParentFormctrls(ByVal frm As Form)     '功能：将子窗体控件数据赋值给主窗体对应控件     Dim ctrls As Controls     Dim Ctrl As Control     On Error Resume Next     Set ctrls = frm.Parent.Controls     For Each Ctrl In frm.Controls         If Ctrl.ControlType <> acLabel Then             ctrls(Ctrl.Name).Value = Ctrl.Value         End If     Next End SubPublic Sub SetParentFormctrls(ByVal frm As Form)     '功能：将子窗体控件数据赋值给主窗体对应控件     Dim ctrls As Controls     Dim Ctrl As Control     On Error Resume Next     Set ctrls = frm.Parent.Controls     For Each Ctrl In frm.Controls         If Ctrl.ControlType <> acLabel Then             ctrls(Ctrl.Name).Value = Ctrl.Value         End If     Next End Sub