vba case



Vba select case

Автор Артём Максеев задал вопрос в разделе Другие языки и технологии

Microsoft Visual Basic 6, оператор Select Case и получил лучший ответ

Ответ от Никита Сунгуров[гуру]
Вот, пашет: Private Sub Command1_Click() Dim Reka As String, More As String Reka = LCase(Text1.Text) Select Case Reka Case "волга" More = "Каспийское" Case "днепр" More = "Черное" Case "лена " More = "Лаптевых" Case "нарва" More = "Балтийское" Case "дон" More = "Азовское" Case Else More = "Такой реки в базе нет" End Select MsgBox More End Sub Скорее всего, ошибка из-за того, что "днепр" не равно "Днепр". Исправлено. Вводи хоть "ДнЕПр"))

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Microsoft Visual Basic 6, оператор Select Case

чем оператор IF отличается от оператора GO TO? Какие логические операторы есть в VBA?
Условная и безусловная передача управления. Ещё есть Select Case .
подробнее...
спросили в CNPC
Как привязать объекты к элементу ComboBox в Visual Basic?
При выборе какого либо элемента из выпадающего списка на форме должны появляться скрытые объекты. Я
подробнее...
спросили в User am User am 0
VBA Excel Обработка ошибки
из справки VBA:




On Error
Statement

Enables an error-handling routine
подробнее...
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:
спросили в Pectinoida V10 0
Помогите сделать задачу VBA
Sub MacrosBirthDay()
'Рассчитать, в какой день недели вы родились
Dim BirthDay,
подробнее...
спросили в Sql
SQL оператор case в WHERE
Access не поддерживает CASE в SQL.
Если сильно нужно, используйте IIF.
Формируйте текст
подробнее...

Помогите Макрос на vba написать...
Public Function Zodiac(R As Range) As String
Dim D As Date
On Error Resume Next
D =
подробнее...
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*