[ű]
=ComboBox
[ȼ]
=F6
ֹͣ=F11
ͣ=F10
[]
Public Const SW_SHOW = 5
Sub Main()
Hwnd = HGUI.CreateWindow("FormDesinger1",2,78,670,436) '
HGUI.Show Hwnd,SW_SHOW 'ʾ
HwndComboBox1 = HGUI.CreateComboBox(Hwnd,"",120,66,262,24) 'ComboBox
HGUI.ComboBox_AddString HwndComboBox1,"abc"
HGUI.ComboBox_AddString HwndComboBox1,"def"
HGUI.ComboBox_SetCurSel HwndComboBox1,1
HGUI.Show HwndComboBox1,SW_SHOW 'ʾComboBox
HGUI.Run 'Ϣѭ
End Sub
[]
