1、15度的红绿小扇形相间构成的扇形 Private Sub Command1_ClickConst pi = 36 Dim c2 As Long c0 = vbRed c1 = vbGreen X = 2000 Y = 2000 r = 1000 #39start_d，end_d，为起始与结束的度...