如何将DropListBox里选择的值存入相关变量
我看了下这个控件的例子说明，但是搞不清楚如何把选择完的值赋值给相关变量。。。等高人指点下代码如下：
Dim DropListBox1() as String
Dim x as Integer
ReDim DropListBox1(3)
For x=0 to 2
DropListBox1(x)=Chr(65+x) & ":"
Next x
Begin Dialog UserDialog 186, 62, "SQABasicDialog Box"
Text8, 4, 42, 8, "Drive:", .Text3
DropListBox8, 16, 95, 44, DropListBox1(), .DropListBox1
OKButton124, 6, 54, 14
CancelButton124, 26, 54, 14
End Dialog
Dim mydialog as UserDialog
On Error Resume Next
Dialog mydialog
If Err=102 then
MsgBox "Dialog box canceled."
End If
[ 本帖最后由 bb64844866 于 2008-12-5 10:32 编辑 ]
页:
[1]
