易截截图软件、单文件、免安装、纯绿色、仅160KB

谁用过VB?请进!

Private Sub Command1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 1 Then
    Dim ReturnVal As Long
  X = ReleaseCapture()
  ReturnVal = SendMessage(Me.Command1.hwnd, WM_NCLBUTTONDOWN, HTCAPTION, 0)
End If
End Sub

以上VB代码是在运行时移动窗体,如何翻译为VC代码?

楼上的代码无法运行啊,无效啊……

你是MFC工程么?

楼上代码是正确滴...楼主是什么工程,说清楚啊

是MFC的
也是对话框的,也在class wizard设置了BN_CLICKED的,点了就是没反映

是visual c++6.0

问题解决了!
用SetWindowLong控件窗口子类化。
结贴


相关问答:

请好心人帮我把VB源码转为VB.NET~

希望大家能够帮我下.感谢了..


源码传在大米盘 VB6 的源码 http://www.damipan.com/file/3wNoKLW.html

转为VB.NET源码.

小弟完全是新手 不懂的说.麻烦各位帮忙一下

我的EMAIL是:4452 ......

求教下VB如何给D3D游戏写屏 - VB / API

想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】,效果就像游戏平台中一样,我试过在一窗口中写入文字,然后一直让窗口强制最前,虽然能实现文字显示,但是文字会不断闪烁,而且有不确定BUG,通过论坛搜 ......

VB修改注册表

用VB怎么只针对windows自带的文件的右键添加菜单 如(.txt .doc)
这个是只针对以这两个为扩展名的文件操作
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\txtfile\shell\[随便起名]\command]
@= ......

关于VB.NET和MS ACCESS的问题

我写了一个软件,要用到ACCESS数据库,我再访问ACCESS的时候,我需要从表里读出一行数据,我的程序是这样写的,SQLSTRING="SELECT * from '" &ME.TEXTBOX1.TEXT &"' WHERE ID = '"& ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号