我是个新手,用{OD}怎么改一个软件的版权
不使用OD即可更改版权。
为什么使用刀子?
VB怎么修改应用程序的图标?
2,生成一个exe文件;
VB 如何设置快捷键?
'以下在模块中,在窗体调用SetHotKey,或者把SetHotKey中的内容放到窗体
'自己写的,反正能用,是全局快捷键.
public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hwnd As Long, ByVal nIndex As Long) As Long
public Declare Function CallWindowproc Lib "user32" Alias "CallWindowprocA" (ByVal lpprevWndFunc As Long, ByVal hwnd As Long, ByVal Msg As Long, ByVal wparam As Long, ByVal lparam As Long) As Long
public Declare Function RegisterHotKey Lib "user32" (ByVal hwnd As Long, ByVal id As Long, ByVal fskey_Modifiers As Long, ByVal vk As Long) As Long
public Declare Function UnregisterHotKey Lib "user32" (ByVal hwnd As Long, ByVal id As Long) As Long
public Const WM_HOTKEY = &H312
public Const MOD_ALT = &H1
public Const MOD_CONTROL = &H2
public Const MOD_SHIFT = &H4
public Const GWL_WNDpROC = (-4)
public preWinproc As Long
public Modifiers As Long, uVirtKey1 As Long, idHotKey As Long
public Function SetHotKey()
End Function
public Function Keywndproc(ByVal hwnd As Long, ByVal Msg As Long, ByVal wparam As Long, ByVal lparam As Long) As Long
If Msg = WM_HOTKEY Then
Select Case wparam
Case 1
MsgBox "1" '热键动作
Case 2
MsgBox "2" '热键动作
End Select
End If
Keywndproc = CallWindowproc(preWinproc, hwnd, Msg, wparam, lparam)
End Function
上一篇:申请专利时,应当向专利局提交哪些申请文件?下一篇:行使商标注册优先权如何体现?
软件著作权说明书代写
一、《申请表》《说明书》《源代码》3个文档
二、300元/案子,3天内交付
三、电话/微信:139-9853-9835