fs=Texture/@(ExampleData/@ExampleData["ColorTexture"]);

styles=AngularGauge[RandomInteger[{1,100}],{0,100},GaugeStyle->GrayLevel[0.2],GaugeFaceStyle->#]&/@Flatten[{None,Table[fs[[a]],{a,{11,27}}],{Texture[ExampleData[{"ColorTexture","YellowMarble"}]],Texture[ImageCrop[Graphics3D[{Sphere[]},Lighting->{{"Ambient",Hue[.6,1,.5]},{"Directional",Hue[.5,1,.7],ImageScaled[{1,1,2}]}},Boxed->False]]],
Texture[ImageCrop[Graphics3D[{Sphere[]},Lighting->{{"Ambient",Hue[.65,.5,.2]},{"Directional",Hue[.8,.3,1],ImageScaled[{.5,.5,5}]}},Boxed->False]]]}}];

function=Table[AngularGauge[RandomInteger[{1,100}],{0,100},GaugeFaceElementFunction->f,GaugeStyle->GrayLevel[0.2],GaugeFaceStyle->RandomChoice[ColorData[88,"ColorList"]],GaugeFrameStyle->None],{f,ChartElementData["AngularGauge","Face"][[{1,2,5,6,7,8}]]}];

Grid[Partition[Riffle[styles,function], 3]]