Needs["Statistics`NormalDistribution`"]

Needs["Graphics`Graphics`"]

normdata = RandomArray[NormalDistribution[], 10000];

Histogram[normdata]

Options[Histogram]