Ответить на сообщение
Вернуться к теме
Вы отвечаете на сообщение:
ник: Анатолий (Киев)
Dim bytArr(1 To 10) As Byte bytArr(1)=Число1 bytArr(2)=Число2 ... bytArr(10)=Число10 Put #1, 3, bytArr 'В файле заменяется 10 байтов, начиная с третьего.
Put #1, 3, CByte(Число1) Put #1, , CByte(Число2) ... Put #1, , CByte(Число10)
Ваше имя:
Пароль:
Сообщение:
Прикрепить:
Для вставки смайлов в текст щелкните по значку.