以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]想做一个可视化员工一览表窗口  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=99071)

--  作者:富春居士
--  发布时间:2017/4/12 10:53:00
--  [求助]想做一个可视化员工一览表窗口
小白一枚,最近想做一个可视化员工一览表窗口,要求根据员工信息表中员工所在科室的改变,会自动在窗口中出现在不同科室标题后面,同时根据员工等级的不同用不同颜色标准,这个功能该如何实现,请教各个专业的大佬。谢谢
--  作者:有点色
--  发布时间:2017/4/12 10:56:00
--  

 参考 http://www.foxtable.com/webhelp/scr/0656.htm

 

 不会做上传实例说明。


--  作者:富春居士
--  发布时间:2017/4/13 9:18:00
--  
谢谢楼上老师的解释,不过这个貌似只解决了标示的问题,我这个想法最主要的是要显示不同成员所在不同科室的这样一个状态,而且要在表中更改科室,在窗口中能自动换到相应科室标题的后面。
比如:车间1:赵 钱  孙  李
              车间2:周  吴  郑 王
然后其中李换了车间,到车间2去了,那么他的名字就改出现在车间2后面,变成:
              车间1:赵 钱  孙  
              车间2:周  吴  郑 王   
不知道这个怎么实现?

--  作者:有点色
--  发布时间:2017/4/13 9:32:00
--  

 你本来是如何编写代码显示的?贴出代码。

 

 直接查表,就可以得到值的啊 http://www.foxtable.com/webhelp/scr/1435.htm

 


--  作者:富春居士
--  发布时间:2017/8/18 11:39:00
--  
我简单做了一下数据:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:可视化员工一览表.table


想做成这样一种效果:
图片点击可在新窗口打开查看此主题相关图片如下:一览表.jpg
图片点击可在新窗口打开查看


要求员工的“势力”改变时,在一览表中其能自动转换到新的“势力”后面;这个该如何实现?
至于标注颜色的问题已经学会了,谢谢 有点色 老师

--  作者:有点甜
--  发布时间:2017/8/18 12:09:00
--  

参考,自行扩充

 

Dim dt As DataTable = DataTables("员工信息表")
Dim pcount As Integer = 1
For Each sl As String In dt.GetValues("势力")
    Dim pnl As WinForm.panel
    pnl = e.Form.CreateControl("lable1", ControlTypeEnum.panel)
    pnl.Left = 100
    pnl.Top = 100 * pcount
    pnl.width = 500
    pnl.height = 100
    e.Form.AddControl(pnl)
    pcount += 1
    Dim lcount As Integer = 0
    For Each dr As DataRow In dt.Select("势力 = \'" & sl & "\'")
        Dim lbl As WinForm.label
        lbl = e.Form.CreateControl("lable" & dr("姓名"), ControlTypeEnum.Label)
        lbl.Text = dr("姓名")
        lbl.Left = 10 + lcount*100
        lbl.Top = 10
        If dr("类型") = "武将" Then
            lbl.backcolor = Color.red
        ElseIf dr("类型") = "文臣" Then
            lbl.backcolor = Color.yellow
        End If
        lcount += 1
        pnl.AddControl(lbl)
    Next
Next


--  作者:富春居士
--  发布时间:2017/8/18 14:18:00
--  
那个,不好意思老师,这代码应该输在哪里呢?需要单独做窗口吗?


--  作者:有点蓝
--  发布时间:2017/8/18 14:32:00
--  
单独做窗口