Следующий пример:Imports SystemImports System.IOModule VBDemoSub Main() Dim Bytes As Byte() Dim Reader As BinaryReader Dim Writer As BinaryWriter Reader = New BinaryReader(File.OpenRead (“c:\demo.exe”)) Writer = New BinaryWriter(File.Create (“c:\demo_copy.exe”)) While Reader.PeekChar() > -1 Bytes = Reader.ReadBytes(1024) Writer.Write(Bytes) End While Reader.Close() Writer.Flush() Writer.Close()End SubEnd Module
демонстрирует:
(Ответ считается верным, если отмечены все правильные варианты ответов.)
Варианты ответа
объединение методов классов BinaryReader и BinaryWriter(Верный ответ)
использование класса BinaryWriter для записи данных примитивных типов в ассоциированный поток(Верный ответ)
выполнение операции копирования (Верный ответ)