主题：关于列表项目问题

RadioButton1控件，CheckedChanged事件：

if e.Sender.Checked = True
    e.Form.Controls("ComboBox1").ComboList = DataTables("收入项目").GetComboListString("收入项目")
End If

RadioButton2控件，CheckedChanged事件：

if e.Sender.Checked = True
    e.Form.Controls("ComboBox1").ComboList = DataTables("开支项目").GetComboListString("开支项目")
End If