Выполнение условия

@valk66 · Регистрация: 21.11.2014

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

Уважаемые Гуру от VB помогите пожалуйста начинающему в таком вопросе.
Пишу код для работы и там есть такой вопрос при программном создании документа Word:
Есть два TextBox (TextBox1 и TextBox2), как написать условие If, чтобы при присутствии в двух TextBox-сах - значения - 0 выполнялось одно условие, а при наличии в любом из TextBox другого значения (отличного от нуля) выполнялось другое условие

@Genn55 · 13.02.2015, 22:20

Если правильно понял

Visual Basic
1
If (Val(Text1.Text) = 0 And Val(Text1.Text) = 0) And (Text1.Text = "" And Text2.Text = "") Then Print "1 условие"; Else Print "2 условие";

@valk66 · 14.02.2015, 06:31 **[ТС]**

Извините. Наверное я все таки не правильно выразился: Имеются три закладки ВМ1, ВМ2, ВМ3 и

If Text1.Text = 0, a Text2.Text = 3 то вписываем ТОЛЬКО в ВМ2.

If Text1.Text =3, a Text2.Text = 0 то вписываем ТОЛЬКО в ВМ1

If Text1.Text =0 и Text2.Text = 0 то вписываем ТОЛЬКО в ВМ3, а ВМ1 и ВМ2 желательно удалить

@Казанский · 14.02.2015, 12:39

Примерно так

Visual Basic
1
2
3
4
5
6
7
If Text1.Text = 0 And Text2.Text = 3 Then
  myDoc.Bookmarks("BM2").Range = "вписываем ТОЛЬКО в ВМ2"
ElseIf Text1.Text = 3 And Text2.Text = 0 Then
  '...
ElseIf Text1.Text = 0 And Text2.Text = 0 Then
  '...
End If

@valk66 · 17.02.2015, 20:16 **[ТС]**

Казанский, Спасибо все получилось и работает.
Если не затруднит подскажите в каком направлении копать вот по такому вопросу. В этой программе я хочу попробовать сделать автоматическое создание документа в котором будут присутствовать таблицы. Вторая таблица будет выглядеть так, - если в первой таблице в столбце появится слово "ноутбук", то во второй таблице появляется - верхняя строка - ноутбук, вторая строка что в нем проверяется. Если в первой таблице появляется слово аккумулятор, то во второй соответственно аккумулятор и что в нем проверяется и т.д. Может быть пооробовать процедурой - Like? Или нужно создавать БД и привязывать к ней?

@Казанский · 18.02.2015, 19:01

valk66, правильнее, конечно, создать БД (например, таблицу в Excel). Не в коде же прописывать эти "ноутбуки", "аккумуляторы".

@valk66 · 13.03.2015, 21:41 **[ТС]**

Уважаемый Казанский! Не стал я заморачиваться на БД, разложил (расщепил) все устройства на составные, из которых изделия состоят. Получилось 10-11 узлов. Подскажите пожалуйста, можно ли создать такую функцию или массив для такого условия. Дело в том, что при составлении документа приходится переносить данные из документов, которые приносят разработчики. Так вот, в одном документе например, "Накопитель на ЖМД", в другом на другое изделие "Накопитель HDD", в третьем "Накопитель на НКЖМД". Когда я составляю документ, во второй таблице мне не важно как они его обозвали в первой таблице, мне необходимо указать в моей программе, что при вводе любого из этих трех названий в указанную мной графу вписывалось только - "НАКОПИТЕЛЬ ЖМД". Ну и так далее по другим устройствам, типа - "Пенал для ЖМД, Rack, MobileRack" - "ПЕНАЛ ДЛЯ ЖМД". Может есть смысл создать массив, если да, то как сделать его динамическим, чтобы новое название добавлялось само - вдруг разработчику придет в голову дать в новом изделии новое название ЖМД - "Дисковый бульбулятор" ?

Новые блоги и статьи Все статьи Все блоги /
Программный контроль заполнения реквизита табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать контроль заполнения реквизита табличной части. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .	Вывод данных в справочнике через динамический список Maks 01.04.2026 Реализация из решения ниже выполнена на примере нетипового справочника "Спецтехника" разработанного в конфигурации КА2. Задача: вывести данные из ТЧ нетипового документа. . .
Функция заполнения текстового поля в реквизите формы документа Maks 01.04.2026 Алгоритм из решения ниже реализован на нетиповом документе "ВыдачаОборудованияНаСпецтехнику" разработанного в конфигурации КА2, в дополнении к предыдущему решению. На форме документа создается. . .	К слову об оптимизации kumehtar 01.04.2026 Вспоминаю начало 2000-х, университет, когда я писал на Delphi. Тогда среди программистов на форумах активно обсуждали аккуратную работу с памятью: нужно было следить за переменными, вовремя. . .	Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем

@valk66 0 / 0 / 0 Регистрация: 21.11.2014 Сообщений: 7

	Выполнение условия 13.02.2015, 20:44. Показов 1346. Ответов 6 Метки нет (Все метки) Уважаемые Гуру от VB помогите пожалуйста начинающему в таком вопросе. Пишу код для работы и там есть такой вопрос при программном создании документа Word: Есть два TextBox (TextBox1 и TextBox2), как написать условие If, чтобы при присутствии в двух TextBox-сах - значения - 0 выполнялось одно условие, а при наличии в любом из TextBox другого значения (отличного от нуля) выполнялось другое условие 0

@valk66 0 / 0 / 0 Регистрация: 21.11.2014 Сообщений: 7
	14.02.2015, 06:31 [ТС]
	Извините. Наверное я все таки не правильно выразился: Имеются три закладки ВМ1, ВМ2, ВМ3 и If Text1.Text = 0, a Text2.Text = 3 то вписываем ТОЛЬКО в ВМ2. If Text1.Text =3, a Text2.Text = 0 то вписываем ТОЛЬКО в ВМ1 If Text1.Text =0 и Text2.Text = 0 то вписываем ТОЛЬКО в ВМ3, а ВМ1 и ВМ2 желательно удалить 0

@valk66 0 / 0 / 0 Регистрация: 21.11.2014 Сообщений: 7
	17.02.2015, 20:16 [ТС]
	Казанский, Спасибо все получилось и работает. Если не затруднит подскажите в каком направлении копать вот по такому вопросу. В этой программе я хочу попробовать сделать автоматическое создание документа в котором будут присутствовать таблицы. Вторая таблица будет выглядеть так, - если в первой таблице в столбце появится слово "ноутбук", то во второй таблице появляется - верхняя строка - ноутбук, вторая строка что в нем проверяется. Если в первой таблице появляется слово аккумулятор, то во второй соответственно аккумулятор и что в нем проверяется и т.д. Может быть пооробовать процедурой - Like? Или нужно создавать БД и привязывать к ней? 0

@Казанский 15155 / 6428 / 1731 Регистрация: 24.09.2011 Сообщений: 9,999
	18.02.2015, 19:01
	valk66, правильнее, конечно, создать БД (например, таблицу в Excel). Не в коде же прописывать эти "ноутбуки", "аккумуляторы". 0

@valk66 0 / 0 / 0 Регистрация: 21.11.2014 Сообщений: 7
	13.03.2015, 21:41 [ТС]
	Уважаемый Казанский! Не стал я заморачиваться на БД, разложил (расщепил) все устройства на составные, из которых изделия состоят. Получилось 10-11 узлов. Подскажите пожалуйста, можно ли создать такую функцию или массив для такого условия. Дело в том, что при составлении документа приходится переносить данные из документов, которые приносят разработчики. Так вот, в одном документе например, "Накопитель на ЖМД", в другом на другое изделие "Накопитель HDD", в третьем "Накопитель на НКЖМД". Когда я составляю документ, во второй таблице мне не важно как они его обозвали в первой таблице, мне необходимо указать в моей программе, что при вводе любого из этих трех названий в указанную мной графу вписывалось только - "НАКОПИТЕЛЬ ЖМД". Ну и так далее по другим устройствам, типа - "Пенал для ЖМД, Rack, MobileRack" - "ПЕНАЛ ДЛЯ ЖМД". Может есть смысл создать массив, если да, то как сделать его динамическим, чтобы новое название добавлялось само - вдруг разработчику придет в голову дать в новом изделии новое название ЖМД - "Дисковый бульбулятор" ? 0

Выполнение условия

Решение