lstrcpyA (Kernel32)

Usage

    Private Declare Function lstrcpy Lib "kernel32" Alias "lstrcpyA" (ByVal lpString1 As String, ByVal lpString2 As String) As Integer

        Dim strTwo As String = Space(3)
        Dim strOne As String = "123"

        lstrcpy(strTwo, strOne)