代码如下：
Private Sub Command1_Click() Shape 1.FillColor = RGB(255,0,0) End Sub
运行后提示语法错误，修改后仍提示缺少语句结束，怎么办？谢谢
Shape 1？中间多了一个空格吧
你修改了什么？