Graphics[Line[{Re[#],Im[#]}&/@Accumulate[RandomComplex[{-1-I,1+I},500]]]]

Graphics3D[Line[Accumulate[RandomChoice[{-1,1},{1000,3}]]]]