Try
Dim sayi As Integer = InputBox("Lütfen İndirmek İstediğiniz TAHAKKUK Numarasını Girini")
WebBrowser1.Document.GetElementById("form" & sayi).SetAttribute("action", "https://ebildirge.ssk.gov.tr/WPEB/TahakkukFisi.pdf?rapor=TahakkukFisi&n=0")
Me.WebBrowser1.Document.GetElementById("form" & sayi).InvokeMember("submit")
Catch ex As Exception
MsgBox("Bu numaralı evrak bulunamadı")
End Try
Böyle bir çözüm ürettim. Konu tamamdır.