你的那句(do form backcolor=blue)我不知道什么意思. 但是设置背景颜色可以这样的:thisform.label1.BackColor =RGB(0,0,255)
end case 好象是这样的。要分开写吧