13 lines
498 B
VB.net
13 lines
498 B
VB.net
Imports System.Threading.Tasks
|
|
Imports Microsoft.VisualBasic
|
|
|
|
Public Class LinkFactory
|
|
Public Shared Async Function createLink(link As String, par1 As String, par2 As String, par3 As String) As Threading.Tasks.Task(Of String)
|
|
Dim factorymain As StringBuilder = New StringBuilder(link)
|
|
factorymain.AppendFormat("?P1={1}&P2={2}", par1, par2, par3)
|
|
Dim result As String = factorymain.ToString
|
|
Await Task.Delay(2)
|
|
Return result
|
|
End Function
|
|
End Class
|