RosettaCodeData/Task/Write-entire-file/Visual-Basic-.NET/write-entire-file.vb

Module Module1

    Sub Main()
        My.Computer.FileSystem.WriteAllText("new.txt", "This is a string", False)
    End Sub

End Module