How can we get vertex names for "NetworkGraph" ExampleData?

How can I label each node in, say,

CommunityGraphPlot@ExampleData[{"NetworkGraph", "DolphinSocialNetwork"}]

From

FindGraphCommunities@ExampleData[{"NetworkGraph", "DolphinSocialNetwork"}]

I know that there dolphin names are in there, but I cannot get to them, not even with “VertexProperty”. Could someone kindly help pls? Many thanks in advance.

Try

g = ExampleData[{"NetworkGraph", "DolphinSocialNetwork"}]
VertexList@g
EdgeList@g

I just re-read your question and realized that I misunderstood it. I think you want

g = ExampleData[{"NetworkGraph", "DolphinSocialNetwork"}]    
Graph[g, VertexLabels -> "Name"]

So simple and so nice! Sorry for taking up your time for such a simple issue! Thank you very much.