Picture1.BackColor = r1,BackColor属性要么用RGB颜色代码,要么直接给16进制颜色代码,你这里的r1取不到符合要求的颜色代码当然要溢出
最后的Picture1.BackColor的位置放错了