注册 登录
编程论坛 VB6论坛

程序在循环中怎么改变当前光标选中项

lzx1556 发布于 2013-06-12 14:37, 449 次点击
在编写批量剪切程序时,希望程序在循环剪切中可以改变当前光标选中项,也就是有指向的选择要剪切的对象,怎么实现?
4 回复
#2
风吹过b2013-06-12 19:48
有一个线程在后台监视剪切板,或者用定时器到后台监视也可。
每一次变动,都记录下来。

然后显示为一个列表,点击哪个时,就把哪个传到要粘贴的地方或重新放剪切板。
#3
lzx15562013-06-15 09:40
回复 2楼 风吹过b
您说的这个我已猜到,的有具体的例子吗?,另外:
API右键菜单怎么调用自定义函数呢?具体函数如下:
Public Function AddCallBack(ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
    Select Case wMsg
        Case WM_COMMAND '消息
            Select Case wParam
                Case WM_USER + IDM_CUT
                                              UserForm1.cmd剪切
                Case WM_USER + IDM_CREAT
                                            UserForm1.TreeView1.Cmd添加
                Case WM_USER + IDM_PASTE
                                              UserForm1.TreeView1.cmd粘贴
            End Select
    End Select
    AddCallBack = CallWindowProc(OldProc, hwnd, wMsg, wParam, lParam)
End Function
    剪切、添加、粘帖函数在按钮点击时已通过测试,请教和API右键菜单的关联问题?
谢谢!
#4
lzx15562013-06-15 09:48
回复 2楼 风吹过b
还有:我是在cad环境中用的vba编程的,vb中很多的常量在这里不支持了
#5
lzx15562013-06-15 09:53
回复 2楼 风吹过b
api右键弹出菜单我已捣鼓出来,与自定义函数关联时老死机,调用出错。
1