combo1.setfocus
sendkeys "^DOWN"送Ctrl+DOWN
sendkeys "^DOWN"送Ctrl+DOWN
解决方案 »
- 表格控件(如vsflexgrid)句柄取得后,如何取得或写入内容(多行),或其它方式?
- [求助]从API中读取的*BYTE数据为什么不对?
- 请问:我已经实现将vb的text框中的信息导入到word中,但是在关闭word后,再按command按钮进行导入,就出错了。不知道问题出在哪里?望赐
- 打印的问题
- 请问sql语句里支持自定义的函数么?
- 求助,安装SP5后的打包问题,小弟重金答谢,不够再加。
- 一不小心,多了个三角
- 简单问题。vb中如何判断文本框输入的是数字还是中文?
- 请教,vb能新建一个 12345678.123 这样的文件吗?
- 想问一下;怎么制作类似于友情强档左边的工具栏,上面有地址簿,日历等。
- 各为高手问了vb的问题
- 实时错误10:该数组被固定或临时锁定 急!在线等待!
sendkeys "%DOWN"
end sub
sendkeys "%"+"{down}"
呵呵,少了{}
所以建议发送WM_KeyDown消息
大家转VB。NET吧那里只要
COMBOBOX1.DROPDOWNED=TRUE
你能说得详细点吗?对这方面我不是太熟,呵呵,谢谢!
Private Const CB_SHOWDROPDOWN = &H14F
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As LongPrivate Sub Command1_Click()
SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, True, 0&
End Sub
'MSDN
'CB_SHOWDROPDOWN
'An application sends a CB_SHOWDROPDOWN message to show or hide the list box of a combo box that has the CBS_DROPDOWN or CBS_DROPDOWNLIST style.
'
'To send this message, call the SendMessage function with the following parameters.
'
'SendMessage(
' (HWND) hWnd, // handle to destination window
' CB_SHOWDROPDOWN, // message to send
' (WPARAM) wParam, // show state
' (LPARAM) lParam // not used; must be zero
');
'Parameters
'wParam
'Specifies whether the drop-down list box is to be shown or hidden. A value of TRUE shows the list box; a value of FALSE hides it.
'lParam
'This parameter is not used.
'Return Values
'The return value is always TRUE.
'
'Res
'This message has no effect on a combo box created with the CBS_SIMPLE style.
谢谢!我试试!呵呵