понедельник, 21 ноября 2011 г.

Разработка линейных программ с текстовыми файлами

В качестве комментария к данному сообщению необходимо отправить комментарии к строкам программы.
Option Strict On

Module Modulel

Sub Main()
Dim fileReader As String, a As Integer
fileReader = My.Computer.FileSystem.ReadAllText("C:\Documents and Settings\Yulia\Рабочий стол\1.txt")
a = CInt(fileReader)
Console.WriteLine(2 * a)
Console.ReadLine()
End Sub

End Module

Комментариев нет:

Отправить комментарий