主题：[分享]参赛作品<<便利店收银系统>> 公开开源密码

双击酒类的时候，下面无论是白酒，红酒、黄酒、啤酒什么的都应出来，但现在没有。只有点击下面的小类，白酒什么的才有筛选。

  做的时候就只有分小类别,大类别就没有设置,所以筛选不到的.

按照你发现的问题已经修改!

呵呵，一个建议，不影响功能，但是涉及效率，特别是多用户网络环境下，影响会很大。

 

以会员资料的PrepareEdit事件为例，你的代码是：

 

If e.IsFocusCell Then

    If e.Col.Name = "等级" Then

        Dim cmd As New SQLCommand

        Dim dt As DataTable

        cmd.CommandText = "SELECT DISTINCT 等级名称 From {会员等级设置}"

        dt = cmd.ExecuteReader

        e.Col.Combolist = dt.GetComboListString("等级名称")

    End If

End If

 

上面的代码每次当进入等级单元格，就要执行一次ExecuteReader，从后台提取数据，这样是不恰当的，因为会员等级是固定的，没有必要不停地连接服务器来提取数据，白白消耗宝贵的服务器资源。

 

其实这样的代码设置在CurrentTaleChanged事件代码比较好：

 

if CurrenTable.Name = "会员资料" Then

    Dim cmd As New SQLCommand

    Dim dt As DataTable

    cmd.CommandText = "SELECT DISTINCT 等级名称 From {会员等级设置}"

    dt = cmd.ExecuteReader

    Tables(会员资料).Cols("等级").Combolist = dt.GetComboListString("等级名称")

End If

 

类似的代码有很多，此外对于那些没有打算直接在表中输入的列，就没有必要设置这样的代码了。

呵呵!     

      建议接受,其实你也发现了很多代码我都可以不要的,之所以这么做,为了以后可以用到表输入数据.解开就可以用了.

      另外我用SQL 是考虑到今后万一可以用到外部数据源的问题,万一用到,我可以直接加入数据源名字就可以用了.

      我今后会了解一下关于效率的问题,毕竟只是个小系统,对于效率不是很重要.

呵呵，因为是参赛，所以很多人会模仿你的做法，还是修改一下比较好。

如果这些代码确实用不着，索性删除算了，以免误导菜鸟。

OK,明白!

公开开发者密码了，顶一下。

开源也不通知一下~~真是~

为什么我打开后就直接进入数据表了？没有输入任何登陆信息呢