比如
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