Como faço para saber qual botão em um form foi clicado atraves de API ou outra coisa?

 

melhor ainda, o evento click...

você deve usar o evento MouseDown ou MouseUp

 

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
  'vbLeftButton 1
  'vbRightButton 2
  'vbMiddleButton 4
 
  If Button = 1 Then
    MsgBox "Botão Esquerdo"
  ElseIf Button = 2 Then
    MsgBox "Botão Direito"
  ElseIf Button = 4 Then
    MsgBox "Botão do Meio"
  End If

End Sub

se vc quer o botão do mouse, a idéia do Martini é boa mas não funciona se vc clicar em algum objeto do form, só se clicar no fundo do form mesmo.

 

se vc quer um botão do form (commandbutton) então usa o evento click de cada um deles pra identificar

 

Private Sub tmrativo_Timer()
 For Each ctl In fm.Controls

     strNome = Me.ActiveControl.Name
        If strNome= "cmdBtnTeste" Then

             i = ctl.tag
             cmdBtnTeste_Click i

             exit for
            End If
   Next oControle
       

End Sub

 

com esta rotina vc sabe o nome do controle ativo através de um timer com isto e um pouco de criatividade dá para resolver seu problema. Imagine uma array de botoes onde o seu index fica na propriedade tag  assim .......