这个实现的事件应该是什么,就是我何时去触发panel(1).text的值改变?
解决方案 »
- vb MSHFlexGrid 焦点移动某一行
- VBA的开发环境是哪一个?VB6能全包括VBA吗?
- XP+VB6.0写的web控件,在XP,2003的ie上可以用,2000,2000server不可以用
- 为何会出现ODBC--call failed.错误?
- 如何获得系统传行口的数量
- 怎么样用VB做个,半透明或全透明的窗体???
- 在xp,2000下的打印机设置问题
- 怎样用两个猫 在两台机器之间通讯
- 求助:为什么VB6编译的EXE只能在本机运行
- 请问如何在程序中用代码设置combox的style的属性?
- 从两个分别在不同的oracle数据库服务器中的表中查询数据到一个新表中,怎么做
- SuperRuntimeLibrary技术支持。
{ window.status="随便写了";
}在onMouseOver="inputmessage(ID)"
就可以了
如果要显示的内容不同,只要把设置ID就可以了
刚才测试没通过,我想这样应该可行的
Select Case msg
Case WM_MENUSELECT
Dim xxx As Long
CopyMemory xxx, wParam, Len(xxx)
xxx = Val("&h" + Right$(Hex$(xxx), 4))
Select Case xxx
Case IDM_PROGRAMS
Label1.Caption = LoadResString(IDM_PROGRAMS)
Case IDM_DOCUMENTS
Label1.Caption = LoadResString(IDM_DOCUMENTS)
Case IDM_FIND
Label1.Caption = LoadResString(IDM_FIND)
Case IDM_HELP
Label1.Caption = LoadResString(IDM_HELP)
Case IDM_RUN
Label1.Caption = LoadResString(IDM_RUN)
Case IDM_SETTINGS
Label1.Caption = LoadResString(IDM_SETTINGS)
Case IDM_SHUTDOWN
Label1.Caption = LoadResString(IDM_SHUTDOWN)
End Select
Case WM_COMMAND
If HIWORD(wParam) = 0 And lParam = 0 Then '// only messages from menus
Call CommandHandler(LOWORD(wParam))
End If
IMessageTarget_Message = CallOrgProc(hWnd, msg, wParam, lParam)
Case WM_MEASUREITEM
If wParam = 0 Then
Call MeasureMenuItem(lParam)
End If
IMessageTarget_Message = CallOrgProc(hWnd, msg, wParam, lParam)
Case WM_DRAWITEM
If wParam = 0 Then
Call DrawMenuItem(lParam)
End If
IMessageTarget_Message = CallOrgProc(hWnd, msg, wParam, lParam)
Case Else
IMessageTarget_Message = CallOrgProc(hWnd, msg, wParam, lParam)
End Select
End Function