Office中国论坛/Access中国论坛

标题: 刚写完的东东 [销售统计分析系统 V1.0 ] [打印本页]

作者: harsonliao    时间: 2002-8-25 00:50
提示: 作者被禁止或删除 内容自动屏蔽
作者: 竹笛    时间: 2002-8-25 01:02
very good.界面一流、思想一流,难得一见的网上好作品。
作者: sdlhlsd    时间: 2002-8-25 01:54
标题: 不错,有创意!
不错,有创意!
作者: huanghai    时间: 2002-8-25 06:06
非常好。
作者: AlexLiu    时间: 2002-8-25 07:12
总体说来相当不错,提几个小问题:
(我用的是WIN2000+OFFICE2000SP1)
1.数据分析进入后,直接点右侧按钮出错
2.出货单据查询中,选右键打印预览窗体遮住报表
3.预览后没有打印按钮
4.建议在图表中用不同颜色表示不同数据
作者: harsonliao    时间: 2002-8-25 10:17
提示: 作者被禁止或删除 内容自动屏蔽
作者: 竹笛    时间: 2002-8-25 17:51
我想应该可以吧:
1、用“页面设置”按钮,让用户自已设置打印格式,一劳永逸;
2、用代码编程设置打印格式,第1条可实现,第2条也应该可以,不过我从来没有此想法(说白了,我不会)


[此贴子已经被竹笛于2002-8-25 9:50:59编辑过]


作者: gnoy    时间: 2002-8-25 20:52
底下那个SBAR1(SBarCtrl)很不错!我发现你的程序中使用了很多ACTIVEX类比如:listView1,cmdPreview,cmdSave,cmdCancel,cmdClose,imgList等等(这些都是你程序中的名称)
作者: harsonliao    时间: 2002-8-26 03:34
提示: 作者被禁止或删除 内容自动屏蔽
作者: winnersn    时间: 2002-10-24 05:22
怎样才能得到原代码
作者: cg1    时间: 2002-10-28 03:48
对你的程序非常感兴趣,能否获得源码?

cg1sh@hotmail.com
作者: harsonliao    时间: 2002-11-4 02:16
提示: 作者被禁止或删除 内容自动屏蔽
作者: winxp    时间: 2002-11-9 00:35
能给我一份吗,我目前想做一个ACCESS+VB的程序,希望有帮助。谢谢。
ilovevb@elong.com
作者: kevinch    时间: 2005-12-19 19:20
good
作者: fan0217    时间: 2005-12-25 06:02
链接地址出现错误了
作者: xjliyuehua    时间: 2006-3-2 16:49
链接地址出现错误了
作者: WGYE    时间: 2006-3-12 23:24
KKB
作者: safetyxu    时间: 2010-7-6 17:59
咋下载啊
作者: yy3625    时间: 2013-11-15 12:19
链接地址出现错误了
作者: hwhwenha01    时间: 2014-4-28 16:26
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
作者: hwhwenha01    时间: 2014-4-28 16:26
没有看到啊

作者: 灰太郎    时间: 2021-5-15 19:26
444444747
作者: 灰太郎    时间: 2024-2-19 20:09
123456




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3