Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
Private Const CB_SHOWDROPDOWN = &H14FPrivate Sub Command1_Click()
SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, True, 0
End Sub
Private Const CB_SHOWDROPDOWN = &H14FPrivate Sub Command1_Click()
SendMessage Combo1.hwnd, CB_SHOWDROPDOWN, True, 0
End Sub
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货