Declare Function strcpy Lib "msvcrt.dll" (Byval Dest As String, Byval Source As String) As Long
Private Sub Test()
    Dim cs_text As String
    Dim cs_word As String
    
    cs_word = "word"
    cs_text = String(512, 0)
    
    strcpy cs_text, cs_word
    
    MsgBox (cs_text)
    
End Sub

Выдаёт ошибку Bad DLL calling convention(пытаюсь сделать в Exel'евском VBA)
Подскажите пожалуйста что не так.