比如
Dim s1 = e.form.controls("combobox1").text
Dim s2 = e.form.controls("combobox2").text
If e.form.controls("checkbox1").checked then
msgbox(s1 & " " & s2)
End If
不用as默认就是object类型,你可以改成 as string