fName dévil como secuencia = “C:\Users\shadow\Documents\ExpertsExchange\EmailContent.txt”
El oldString dévil como la secuencia = My.Computer.FileSystem.ReadAllText (fName)
findStr dévil como secuencia = “
“
El newString dévil como secuencia = substituye (el oldString, findStr, findStr + vbCrLf + el “newtext”)
MsgBox (el newString)
|