I am trying to Click on a button in a table on web page

Sub PO_Input()


Dim IE As Object
Dim doc As HTMLDocument
Dim aEle As HTMLLinkElement
Set IE = CreateObject("InternetExplorer.Application")




IE.Visible = True
IE.navigate "https://www.eprocure.gov.bd/"


Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop


Set doc = IE.document


doc.getElementById("txtEmailId").Value = ThisWorkbook.Sheets("Login").Range("B3").Value
doc.getElementById("txtPassword").Value = ThisWorkbook.Sheets("Login").Range("C3").Value
doc.getElementById("btnLogin").Click




Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop


Set ObjA = IE.document.getElementById("paymentsubmenu").getElementsByTagName("a")(1)
ObjA.Click


Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop


doc.getElementById("txtTenderId").Value = ThisWorkbook.Sheets("PO_Details").Range("A2").Value


This point which code for click the search button?


'<input name="btnpaymentsearch" id="btnpaymentsearch" onclick="return Validate();" type="button" value="Search">










Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop






















'Set ObjB = IE.document.querySelector("img[src='../resources/images/Dashboard/dashBoardIcn.png']")
'ObjB.Click






















Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop




'IE.navigate "https://www.eprocure.gov.bd/Logout.jsp"


Do While IE.Busy
Application.Wait DateAdd("s", 1, Now)
Loop


'IE.Quit


End Sub