Visual Basic

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
VB ListView copy Добрый день, хотелось бы узнать как можно скопировать содержимое listview или вывести столбы куда нибудь еще где можно копирнуть. Любые способы хоть что нибудь, срочно нужно Sub loadlistview() SQL = "exec sumandel '" & DTPicker1.value & "','" & DTPicker2.value & "' " CMD.CommandText = SQL Set RS = CMD.Execute ListView1.ListItems.Clear With RS Do Until .EOF Set... https://www.cyberforum.ru/ visual-basic/ thread1928898.html	VB Определить функцию! Определить функцию степень (stepen(x,y)) зависящую от вещественного x и натурального y вычисляющую посредством умножения величину x. Используя ее вычислите выражение 2,4 в степени k + (a + 1) в степени -5!
VB Где можно скачать visual basic 6.0? Где можно скачать visual basic 6.0? https://www.cyberforum.ru/ visual-basic/ thread1928442.html	VB Исправить ошибку For without Next Выбор типа решетки в конструкции 1 Select Case tru(i) 2 Case 1 ' раскосная треугольная 3 If res = 0 Then 4 res = 1 5 Else 6 res = 0 7 End If 8 If res = 0 Then https://www.cyberforum.ru/ visual-basic/ thread1928224.html
Последовательности VB Дано целое число N (> 1) и набор из N целых чисел. Вывести те элементы в наборе, которые меньше своего правого соседа, и количество K таких элементов.	VB Матрицы https://www.cyberforum.ru/ visual-basic/ thread1927797.html Дана матрица размера M х N. Преобразовать матрицу, поменяв местами минимальный и максимальный элемент в каждом столбце.
VB Составить массив вещественных чисел Помогите пожалуйста. Мне нужно в ручную(при помощи цикла) заполнить массив с вещественными элементами. Ранее я делал программу на языке C#, и всё работало. А здесь не получается. Module Module1 Sub Main() Dim n, i As Integer Dim q(n) As Double Console.WriteLine("Введите кол-во элементов в массиве") n = CInt(Console.ReadLine()) ... https://www.cyberforum.ru/ visual-basic/ thread1927772.html	Описать процедуру DigitCountSum(K, C, S), находящую количество цифр числа VB Описать процедуру DigitCountSum(K, C, S), находящую количество C цифр целого положительного числа K, а также их сумму S (K — входной, C и S — выходные параметры целого типа). С помощью этой процедуры найти количество и сумму цифр для каждого из пяти данных целых чисел.
VB Из дюймов в метры. Длина отрезка задана в дюймах (1дюйм=2,54см). Перевести значение длины в метрическую систем https://www.cyberforum.ru/ visual-basic/ thread1927651.html Из дюймов в метры. Длина отрезка задана в дюймах (1дюйм=2,54см). Перевести значение длины в метрическую систему, то есть выразить е в метрах, сантиметрах и миллиметрах. Так, например, 21 дюйм = 0 м 53 см 3,4 мм. Заранее спасибо.	VB Как сделать регистрацию в Visual Basic У меня есть 2 текстбокса и когда пользователь вводил в них данные ,то они после нажатия на кнопку они бы заносились в файлы .После этого при введении этих данных происходило бы событие https://www.cyberforum.ru/ visual-basic/ thread1926924.html
Альтернатива VB VB Всех приветствую! Некоторое время назад, после длительного перерыва (лет 15 назад я довольно много работал с VB6), возникла потребность вернуться к программированию. И, увы, выяснилось, что VB6 по ряду причин перестал быть актуальным. Вопрос такой - существует ли современная альтернатива VB6? Чтобы, по возможности, было бы побольше общего для легкости освоения. И, обязательно, чтобы в этом...	VB Калькулятор перевода в VB https://www.cyberforum.ru/ visual-basic/ thread1926479.html Здравствуйте, такое дело: пишу калькулятор перевода числа из одной СС в любую другую. Всё вроде бы хорошо, но есть одно большое и жирное НО - не могу прописать правило перевода. Допустим, что числа 125 не существует в 5-ой СС и так далее. Неистово буду благодарна :) Вот код программы: Dim w, e, r, t, p, u, o As Integer, q, y, i, m, z As Byte i = Len(Text2.Text) q = Val(Text2.Text)...

Pro_grammer

6807 / 2837 / 527

Регистрация: 24.04.2011

Сообщений: 5,308

Записей в блоге: 10

28.02.2017, 21:29

Удалить определенную строку в txt файле - VB - Ответ 10163769

28.02.2017, 21:29. Показов 7489. Ответов 25

Метки (Все метки)

Ответ

Надо вначале построчно считать файл куда нибудь, например в массив строк. Потом переписать старый фал уже из этого массива, но без нежелательной строки.

Примерно можно так написать:

Visual Basic

Private Sub Command1_Click()
' Перезапись файла с удалением строки
Dim St(10) As String
Open "c:\1.txt" For Input As #1
    Dim S As String
    While Not EOF(1)
        n = n + 1
        Input #1, S
        St(n) = S
    Wend
Close #1
 
Open "c:\1.txt" For Output As #1
    For i = 1 To 10
        If i <> 7 Then ' Убираем 7-ю строку
            Print #1, St(i)
        End If
    
    Next
Close #1
End Sub
 
Private Sub Form_Load()
' Создадим файл на 10 строк
Open "c:\1.txt" For Output As #1
For i = 1 To 10
    Print #1, "String №" & i
Next
Close #1
End Sub

Вернуться к обсуждению:
Удалить определенную строку в txt файле VB

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

28.02.2017, 21:29

Готовые ответы и решения:

Запись из TextBox в .txt файл в определенную строку
Подскажите пожалуйста: Имеется Text box, как сделать так чтобы после ввода в него текста и нажатию...

Необходимо в текстовом файле найти определенную строку, в которой имеется спец.символ и удалить строку
К примеру в файле есть записи: Привет Привет Хороший День Мне нужно, что бы запись с символом...

Как удалить определённую строку в файле?
Дан файл, в нём содержится текст.Удалить определённую строку. Удаление происходит через запрос...

Как удалить определенную строку в файле по индексу?
как удалить определенную строку в файле по индексу в c#

	28.02.2017, 21:29

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

28.02.2017, 21:29

Помогаю со студенческими работами здесь

Найти в текстовом файле строку по заданному слову и заменить ей определённую часть строки в другом файле
Всех с Новым Годом! Наверное избитая тема, но все же... Задача такая: Существует два файла:...

write to txt. В определенную строку!
Здравствуйте! Мне необходимо сделать запись в txt файл в определённую строку (в конец) Вот...

Удалить в текстовом файле 1.txt все строки, которые встречаются в текстовом файле 2.txt
например имеется текстовый файл 1.txt c таким содержанием 111 222 333 444 555 и имеется...

Как считать определенную строку из txt файла?
Здравствуйте, у меня есть в папке с программой .txt файл, как мне считать в нем определенную...

Новые блоги и статьи
Из чего и как собрать свой домашний кинотеатр bt_guru 21.01.2025 Создание домашнего кинотеатра: от идеи до реализации В современном мире домашний кинотеатр стал неотъемлемой частью комфортного жилого пространства, предоставляя возможность наслаждаться. . .	Ошибки стиральных машин bt_guru 21.01.2025 Современные стиральные машины представляют собой сложные электронные устройства, оснащенные множеством датчиков и систем контроля. Они способны самостоятельно определять вес загруженного белья,. . .	Копирование (маппинг) объектов в JavaScript bytestream 21.01.2025 В современной разработке программного обеспечения копирование объектов представляет собой фундаментальную операцию, которая требует особого внимания и понимания. Маппинг объектов в JavaScript – это. . .	Как работать с Apache Kafka в C# .NET bytestream 21.01.2025 Apache Kafka представляет собой распределенную платформу потоковой передачи данных, которая произвела революцию в области обработки больших объемов информации в реальном времени. Эта система,. . .	Как использовать RabbitMQ в C# .NET bytestream 21.01.2025 RabbitMQ представляет собой мощный брокер сообщений, который эффективно решает эту задачу, обеспечивая надежную передачу данных между множеством приложений. Этот инструмент реализует протокол AMQP. . .	Как объединить последние коммиты в Git bytestream 21.01.2025 В мире разработки программного обеспечения система контроля версий Git стала незаменимым инструментом для управления исходным кодом. Одной из наиболее полезных, но порой сложных для освоения функций. . .
Как запушить новую локальную ветку (branch) в удалённый репозиторий Git и отслеживать её bytestream 21.01.2025 В современной разработке программного обеспечения система контроля версий Git стала неотъемлемым инструментом для эффективного управления кодом и организации командной работы. Одной из ключевых. . .	Как создать директорию и все родительские директории, указанные в пути, с помощью Python bytestream 21.01.2025 Python предоставляет мощные инструменты для работы с файловой системой через встроенные модули os и pathlib, которые значительно упрощают процесс манипуляции директориями. Эти модули содержат. . .	Как работать с массивами в JavaScript bytestream 21.01.2025 Массивы в JavaScript представляют собой один из фундаментальных типов данных, который позволяет хранить упорядоченные коллекции различных элементов в одной переменной. Эта структура данных является. . .	Какая максимальная длина адреса (URL) в различных браузерах и стандартах bytestream 21.01.2025 В современном мире интернет-технологий URL-адреса (Uniform Resource Locator) играют фундаментальную роль в функционировании веб-пространства. Эти уникальные идентификаторы ресурсов стали неотъемлемой. . .	Как сбросить локальный репозиторий до состояния удалённого репозитория Git bytestream 21.01.2025 При разработке программного обеспечения с использованием системы контроля версий Git разработчики часто сталкиваются с необходимостью синхронизации локального и удаленного репозиториев. Данная задача. . .	Как запретить подсветку выделенного текста с помощью CSS bytestream 20.01.2025 Подсветка текста при выделении является стандартным поведением браузера, которое не всегда соответствует дизайнерским решениям или функциональным требованиям веб-приложения. Выделение текста может. . .

Наверх