注册 登录
编程论坛 VB6论坛

控件显示与拖拽

素墨 发布于 2014-11-01 14:35, 364 次点击
只有本站会员才能查看附件,请 登录


如上图所示,功能是这样的,图中所表示的功能是一个排队软件。
下面两行红色的字代表排队的编号,编号与编号之间是无法改变位置的。编号是从数据库中读取并显示出来的。上面的“暂停”二字表示排队的通道,“暂”字位置表示正在执行的任务的编号,“停”字位置表示准备执行任务的编号,后面的那几个空格都是。其中下面处于排队状态的编号可以拖拽到“停”字位置,其他位置不可以拖拽。但是下面的排队顺序不变。另外,拖拽到“停”字位置的编号只能存在一个,若是重复出现,则以最近一次改变为准,以前其他排队通道相同的自动消失。

本人对VB不是很熟悉,请问各位大侠帮忙解决一下,给点示例或是提示。
1、从数据库读取到的编号怎么像上图那样显示 出来?(动态Label控件数组?)
2、显示出来的编号图标怎么实现拖拽。(用Label不会拖拽)
如上图所示,功能是这样的,图中所表示的功能是一个排队软件。
下面两行红色的字代表排队的编号,编号与编号之间是无法改变位置的。编号是从数据库中读取并显示出来的。上面的“暂停”二字表示排队的通道,“暂”字位置表示正在执行的任务的编号,“停”字位置表示准备执行任务的编号,后面的那几个空格都是。其中下面处于排队状态的编号可以拖拽到“停”字位置,其他位置不可以拖拽。但是下面的排队顺序不变。另外,拖拽到“停”字位置的编号只能存在一个,若是重复出现,则以最近一次改变为准,以前其他排队通道相同的自动消失。

本人对VB不是很熟悉,请问各位大侠帮忙解决一下,给点示例或是提示。
1、从数据库读取到的编号怎么像上图那样显示 出来?(动态Label控件数组?)
2、显示出来的编号图标怎么实现拖拽。(用Label不会拖拽)


如上图所示,功能是这样的,图中所表示的功能是一个排队软件。
下面两行红色的字代表排队的编号,编号与编号之间是无法改变位置的。编号是从数据库中读取并显示出来的。上面的“暂停”二字表示排队的通道,“暂”字位置表示正在执行的任务的编号,“停”字位置表示准备执行任务的编号,后面的那几个空格都是。其中下面处于排队状态的编号可以拖拽到“停”字位置,其他位置不可以拖拽。但是下面的排队顺序不变。另外,拖拽到“停”字位置的编号只能存在一个,若是重复出现,则以最近一次改变为准,以前其他排队通道相同的自动消失。

本人对VB不是很熟悉,请问各位大侠帮忙解决一下,给点示例或是提示。
1、从数据库读取到的编号怎么像上图那样显示 出来?(动态Label控件数组?)
2、显示出来的编号图标怎么实现拖拽。(用Label不会拖拽)
3 回复
#2
xzlxzlxzl2014-11-01 19:33
好拗口啊,要达到那种效果应该不难。
#3
风吹过b2014-11-01 23:22
看的很糊涂。

这个程序,如果做全来,代码量不会太少。
显示部分,自定义显示。
拖动部分,需要转换。
数据部分,读数据库,编顺序号,使用队列工作模式。
还要考虑优先级问题。
手动调整优先级,还取消调整后回退问题。

数据库部分,还要有录入程序。工作部分,还要有完成后删除部分。

整个就是一个小型项目了。
#4
素墨2014-11-14 11:31
回复 3 楼 风吹过 b
楼上的能说一下大概怎么实现吗?我想到的就是这个,具体怎么实现还没有头绪。告诉我一下思路,大概的方法。
或者是你自己能完成?
1