Простая программка

@Парабеллум · Регистрация: 10.06.2012

Студворк — интернет-сервис помощи студентам

Здравствуйте, помогите пожалуйста с написанием программки на VB, посмотрел половину форума, что то не получается(

Дана строка символов. В строке заменить все символы «_» на символы «=»; удалить все символы «+»; записать полученный строку в обратном порядке.

SoftIce · 27.03.2015, 21:02

Так программка-то простая?

@Парабеллум · 27.03.2015, 21:07 **[ТС]**

Для тех кто разбирается в ВБ думаю да)

SoftIce · 27.03.2015, 21:08

Ну тогда держи

Visual Basic
1
2
3
4
5
Private Sub Command1_Click()
    Dim s As String
    s = "В строке заменить все символы «_» на символы «=»; удалить все символы «+»"
    MsgBox StrReverse(Replace(Replace(s, "_", "="), "+", ""))
End Sub

@Парабеллум · 27.03.2015, 21:16 **[ТС]**

Спасибо большое!

Добавлено через 4 минуты
Правда почему то при запуске ругается на 3ю строчку

SoftIce · 27.03.2015, 21:20

Я скрин зачем прикрепил? Чтобы не было подобных вопросов.
У меня все работает, значит Вы что-то делаете не так

Добавлено через 1 минуту

Сообщение от Парабеллум

на 3ю строчку

Да, кстати, на какую строку ругается? На эту?

s = "В строке заменить все символы «_» на символы «=»; удалить все символы «+»"

Так здесь и кода-то никакого нет

А что ругается? Какая ошибка,?

@Парабеллум · 27.03.2015, 21:28 **[ТС]**

Да я вижу что у вас работает,

s = "В строке заменить все символы «_» " ругается на символ в скобках

Добавлено через 1 минуту
syntax error

Добавлено через 5 минут
Причина была в кавычках, убрал кавычки все заработало

SoftIce · 27.03.2015, 21:29

Ну я не знаю. Проверил в Net - тоже работает.

SoftIce · 27.03.2015, 21:29

Сообщение от Парабеллум

убрал кавычки все заработало

Какие кавычки убрал? Откуда они взялись?

@Парабеллум · 27.03.2015, 21:30 **[ТС]**

s = "В строке заменить все символы _ на символы =; удалить все символы +"

вот так сделал и все получилось

SoftIce · 27.03.2015, 21:33

Понятно.
Теперь ложка дёгтя: не каждый преподаватель примет такой код.
Некоторые запрещают использовать функции типа StrReverse и Replace

@Парабеллум · 27.03.2015, 21:34 **[ТС]**

Эту функцию можно использовать, о ней рассказывается перед заданием

SoftIce · 27.03.2015, 21:36

Сообщение от Парабеллум

Эту функцию можно использовать

Ну и ладненько

@Парабеллум · 27.03.2015, 21:43 **[ТС]**

текстовый файл 1. Создать текстовый файл 2, в который переписать текст из файла 1 добавляя в конец каждой строки символ «;».

текстовый файл. Первый символ каждой строки записать в другой текстовый файл.

Если не сложно помогите еще с этими программками, тут вообще ничего не понятно, нашел на форуме подобную тему попробовал код который там был ничего не вышло(

SoftIce · 27.03.2015, 22:03

Парабеллум, один вопрос - одна тема.

@Казанский · 27.03.2015, 22:14

Парабеллум, файл text1.txt должен находиться в папке с .exe.

Visual Basic
1
2
3
4
5
Private Sub Command1_Click()
  With CreateObject("scripting.filesystemobject")
    .createtextfile("text2.txt").write Replace(.opentextfile("text1.txt").readall, vbCrLf, ";" & vbCrLf)
  End With
End Sub

Новые блоги и статьи Все статьи Все блоги /
Популярные LM модели ориентированы на увеличение затрат ресурсов пользователями сгенерированного кода (грязь -заслуги чистоплюев). Hrethgir 12.06.2025 Вообще обратил внимание, что они генерируют код (впрочем так-же ориентированы разработчики чипов даже), чтобы пользователь их использующий уходил в тот или иной убыток. Это достаточно опытные модели,. . .	Топ10 библиотек C для квантовых вычислений bytestream 12.06.2025 Квантовые вычисления - это та область, где теория встречается с практикой на границе наших знаний о физике. Пока большая часть шума вокруг квантовых компьютеров крутится вокруг языков высокого уровня. . .	Dispose и Finalize в C# stackOverflow 12.06.2025 Работая с C# больше десяти лет, я снова и снова наблюдаю одну и ту же историю: разработчики наивно полагаются на сборщик мусора, как на волшебную палочку, которая решит все проблемы с памятью. Да,. . .	Повышаем производительность игры на Unity 6 с GPU Resident Drawer GameUnited 11.06.2025 Недавно копался в новых фичах Unity 6 и наткнулся на GPU Resident Drawer - штуку, которая заставила меня присвистнуть от удивления. По сути, это внутренний механизм рендеринга, который автоматически. . .	Множества в Python py-thonny 11.06.2025 В Python существует множество структур данных, но иногда я сталкиваюсь с задачами, где ни списки, ни словари не дают оптимального решения. Часто это происходит, когда мне нужно быстро проверять. . .
Работа с ccache/sccache в рамках C++ Loafer 11.06.2025 Утилиты ccache и sccache занимаются тем, что кешируют промежуточные результаты компиляции, таким образом ускоряя последующие компиляции проекта. Это означает, что если проект будет компилироваться. . .	Настройка MTProxy Loafer 11.06.2025 Дополнительная информация к инструкции по настройке MTProxy: Перед сборкой проекта необходимо добавить флаг -fcommon в конец переменной CFLAGS в Makefile. Через crontab -e добавить задачу: 0 3. . .	Изучаем Docker: что это, как использовать и как это работает Mr. Docker 10.06.2025 Суть Docker проста - это платформа для разработки, доставки и запуска приложений в контейнерах. Контейнер, если говорить образно, это запечатанная коробка, в которой находится ваше приложение вместе. . .	Тип Record в C# stackOverflow 10.06.2025 Многие годы я разрабатывал приложения на C#, используя классы для всего подряд - и мне это казалось естественным. Но со временем, особенно в крупных проектах, я стал замечать, что простые классы. . .	Разработка плагина для Minecraft Javaican 09.06.2025 За годы существования Minecraft сформировалась сложная экосистема серверов. Оригинальный (ванильный) сервер не поддерживает плагины, поэтому сообщество разработало множество альтернатив. CraftBukkit. . .

@Парабеллум 0 / 0 / 0 Регистрация: 10.06.2012 Сообщений: 57

	Простая программка 27.03.2015, 20:57. Показов 1071. Ответов 15 Метки нет (Все метки) Здравствуйте, помогите пожалуйста с написанием программки на VB, посмотрел половину форума, что то не получается( Дана строка символов. В строке заменить все символы «_» на символы «=»; удалить все символы «+»; записать полученный строку в обратном порядке. 0

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	27.03.2015, 21:02
	Так программка-то простая? 0

@Парабеллум 0 / 0 / 0 Регистрация: 10.06.2012 Сообщений: 57
	27.03.2015, 21:07 [ТС]
	Для тех кто разбирается в ВБ думаю да) 0

@Парабеллум 0 / 0 / 0 Регистрация: 10.06.2012 Сообщений: 57
	27.03.2015, 21:16 [ТС]
	Спасибо большое! Добавлено через 4 минуты Правда почему то при запуске ругается на 3ю строчку 0

@Парабеллум 0 / 0 / 0 Регистрация: 10.06.2012 Сообщений: 57
	27.03.2015, 21:28 [ТС]
	Да я вижу что у вас работает, s = "В строке заменить все символы «_» " ругается на символ в скобках Добавлено через 1 минуту syntax error Добавлено через 5 минут Причина была в кавычках, убрал кавычки все заработало 0

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	27.03.2015, 21:29
	Ну я не знаю. Проверил в Net - тоже работает. Миниатюры 0

@Парабеллум 0 / 0 / 0 Регистрация: 10.06.2012 Сообщений: 57
	27.03.2015, 21:30 [ТС]
	s = "В строке заменить все символы _ на символы =; удалить все символы +" вот так сделал и все получилось 0

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	27.03.2015, 21:33
	Понятно. Теперь ложка дёгтя: не каждый преподаватель примет такой код. Некоторые запрещают использовать функции типа StrReverse и Replace 0

@Парабеллум 0 / 0 / 0 Регистрация: 10.06.2012 Сообщений: 57
	27.03.2015, 21:34 [ТС]
	Эту функцию можно использовать, о ней рассказывается перед заданием 0

@Парабеллум 0 / 0 / 0 Регистрация: 10.06.2012 Сообщений: 57
	27.03.2015, 21:43 [ТС]
	текстовый файл 1. Создать текстовый файл 2, в который переписать текст из файла 1 добавляя в конец каждой строки символ «;». текстовый файл. Первый символ каждой строки записать в другой текстовый файл. Если не сложно помогите еще с этими программками, тут вообще ничего не понятно, нашел на форуме подобную тему попробовал код который там был ничего не вышло( 0

Опции темы

SoftIce es geht mir gut 11274 / 4760 / 1183 Регистрация: 27.07.2011 Сообщений: 11,439
	27.03.2015, 22:03
	Парабеллум, один вопрос - одна тема. 0

Простая программка

Решение