Sind[t_]:= Sin[t Pi/180.]
Cosd[t_]:= Cos[t Pi/180.]

Graphics[{Arrow[{{0,0},{1,1}}],Arrow[{{0,0},{-1,1}}]},Axes->True]

Graphics[{{Thick, Red,Arrow[{{0,0},{Cosd[30],Sind[30]}}]},
{Thick, Blue,Arrow[{{0,0},{1,0}}]}}, Axes->True, PlotRange->{{-1,1},{-1,1}}]

Manipulate[
{Plot[{Sind[t+phi ],Sind[t ]},{t,0,360}, PlotStyle->{Red,Blue,Thick},
	ImageSize->300,PlotLegends->{"i(t) = sin(t+phi)", "v(t) = sin(t)"} ],

Graphics[
{
{Thick, Red, Arrowheads[0.05],Arrow[{{0,0},{1.5Cosd[phi],1.5 Sind[phi]}}]  },
{Thick, Blue,Arrowheads[0.05],Arrow[{{0,0},{1,0}}]   }
},
 Axes->True,PlotRange->{{-1.5,1.5},{-1.5,1.5}},ImageSize->300 
]
},
{{phi,0,"Phase"},-90 ,90 }  ]