você tem um adobephotoshop né? Bem, vou usar um recurso do adobe neste tuto, então é bom você adquirir um photoshop ae se você num tiver(eu adquiri o CS3, então eu recomendo que você use o adquira também, pois pode ser que não tenha o recurso utilizado em outras versões^^)
Neste tuto irei ensinar a fazer um botão que imita o botão do vb6(command1)

1°Crie uma pasta.
2°Abra teu adobe.
3°clique em "Novo...".
4°Ponha "Largura" e "Altura" 150 e dê OK.
5°Agora vá na parte de "Camadas", clique com o botão direito na imagem e clique em "Duplicar Camada...".
6°Pinte a imagem na cor que quiser, usando a "Ferramenta Pincel",que fica no lado esquerdo.
7°Na imagem duplicada, clique com o botão direito e clique em "Opções de Mesclagem..."
8°Clique em "Chanfro e Entalhe",deixe "Profundidade" em 215%, deixe "Direção" em "Abaixo", "Tamanho" deixe em 18 e dê OK.
9°Clique em "Salvar Como...", no nome, coloque "botaobaixo"(sem aspas obviamente¬¬), no formato, coloque JPEG, salve a imagem na pasta que criou, clique em OK, feche a imagem.
10°Repita do 3° passo ao 7° passo, entretanto, ao invés de colocar "Direção" em "Abaixo", coloque em "Acima"e salve como "botaocima".
----------TERMINOU A PARTE DO ADOBE, AGORA É SÓ VB^^----------
11°Abra o vb.
12°Adicione um objeto "Image" ao seu formulário.
13°No evento load do formulário, adicione a seguinte linha

Código:

Image1.Picture = LoadPicture("caminho da imagem 'botaocima', ex: 'c:\pudim\botaocima.jpeg'")

15°No evento MouseUp do objeto "Image", adicione a mesma linha que a anterior.
14°No evento MouseDown do objeto "Image", adicione a mesma linha que a anterior, mas coloque o caminho do "botaobaixo":

Código:

Image1.Picture = LoadPicture("caminho da imagem 'botaobaixo'")

Prontinho, aí está!!! Maneiro, não? Agora é com vocês para personalizarem seus botões!!!