Модераторы: diadiavova, gambit

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> ПРоцентное появление окна. 
V
    Опции темы
Экскалупатор
Дата 18.12.2009, 02:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
)) а я только хотел написать что скобки лишние.
PM MAIL ICQ   Вверх
Natapro
Дата 18.12.2009, 02:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 460
Регистрация: 13.9.2009
Где: Украина

Репутация: нет
Всего: нет
Код

 Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Dim rnd As New Random()
        Dim buf As Integer = rnd.Next(0, 100)
        If (buf <= 10) Then
            MsgBox("10%")

        End If
        If (buf <= 40) Then
            MsgBox("40%")

        End If


        If (buf <= 90) Then
            MsgBox("90%")

        End If


       

    End Sub


Добавлено через 28 секунд
харашо что дядь вовка спит, уже б нацял ругатсо smile 


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Экскалупатор
Дата 18.12.2009, 02:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
Код

    If (10 < buf) & (buf <= 10) Then
            MsgBox("40%")
        End If


а почему от 10 до 10?

Добавлено через 1 минуту и 31 секунду
    у тебя не правильно это работает. точнее работает может и правильно, но надо с Else сделать. а то у тебя идет проверка каждого условия.

Добавлено через 2 минуты и 26 секунд
по идее все таки будет работать не правильно, если число будет к примеру 10, то должны сработать все ифы

Добавлено через 3 минуты и 3 секунды
и выведется по очереди три сообщения
PM MAIL ICQ   Вверх
Natapro
Дата 18.12.2009, 02:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 460
Регистрация: 13.9.2009
Где: Украина

Репутация: нет
Всего: нет
если будет 10 то будет тока одно
If (buf <= 10) Then
                MsgBox("Н10%")


--------------------
Красивая девушка не может быть глупой.Умная девушка не позволит себе быть некрасивой...
PM MAIL   Вверх
Экскалупатор
Дата 18.12.2009, 02:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
тогда я не понимаю как это работает. если такую конструкцию написать на шарпе то будут по очереди проверяться все ифы, и соответственно при определенных значениях они будут срабатывать. ты проверила? и срабатывает только один? что то я все таки сомневаюсь.

Добавлено через 20 секунд
объясни почем остальные ифы не сработают?
PM MAIL ICQ   Вверх
diadiavova
Дата 18.12.2009, 09:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Экскалупатор, в бейсике вместо && надо писать And, а & - оператор конкатенации строк.


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Экскалупатор
Дата 18.12.2009, 12:47 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
diadiavova, про & я уже понял, а как на счет того сработают ли все ифы, если рандом сгенерит 10?
PM MAIL ICQ   Вверх
diadiavova
Дата 18.12.2009, 13:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Цитата(Экскалупатор @  18.12.2009,  12:47 Найти цитируемый пост)
а как на счет того сработают ли все ифы, если рандом сгенерит 10? 

Ессно


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Экскалупатор
Дата 18.12.2009, 14:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
Цитата(diadiavova @  18.12.2009,  12:33 Найти цитируемый пост)
Ессно 


тут просто Natapro утверждает обратное. вот мне и стало интересно кто прав...
PM MAIL ICQ   Вверх
diadiavova
Дата 18.12.2009, 14:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доктор Зло(диагност, настоящий, с лицензией и полномочиями)
****


Профиль
Группа: Модератор
Сообщений: 5821
Регистрация: 14.8.2008
Где: В Коньфпольте

Репутация: 8
Всего: 142
Одни и те же конструкции работают в обоих языках одинаково, мало того, после компиляции между ними просто не будет разницы.


--------------------
Хочешь получить мудрый совет - читай подписи участников форумов.
Злой доктор Щасзаболит smile
PM   Вверх
Экскалупатор
Дата 18.12.2009, 14:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
я это как бы знаю, но меня смутила уверенность Natapro, а по скольку я в бейсике никак, то нужно было подтверждение.
PM MAIL ICQ   Вверх
Pilger
Дата 18.12.2009, 22:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 257
Регистрация: 10.5.2008
Где: Германия

Репутация: нет
Всего: нет
Ага, а еще надо else if пользоваться. Последующие проверки должны происходить, только если первое не верно.


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Экскалупатор
Дата 18.12.2009, 23:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
Pilger, спасибо, Капитан Очевидность, я про это говорил последние 10 постов...
PM MAIL ICQ   Вверх
Pilger
Дата 19.12.2009, 00:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 257
Регистрация: 10.5.2008
Где: Германия

Репутация: нет
Всего: нет
Незачто, Капитан Шнелеральсаллесиндервельт. Я не вникал, почему там и что должно сработать и не разбирался. Я заметил, что ты сразу не сказал про елсе иф и потом видимо пропустил, потому что слишком много добавлений в одном сообщении. Можно и поделикатнее. 

Это сообщение отредактировал(а) Pilger - 19.12.2009, 00:57


--------------------
Ein Leben nach der Schleife existiert, nur wenn die Schleife terminiert.
PM MAIL ICQ   Вверх
Экскалупатор
Дата 19.12.2009, 01:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1746
Регистрация: 1.4.2009
Где: г. Минск

Репутация: 1
Всего: 24
если обидел извини. просто я еще в примере с элсами написал.
Цитата(Экскалупатор @  18.12.2009,  01:00 Найти цитируемый пост)
попробую.

Dim rnd As New Random()
Dim buf As Integer = rnd.Next(0, 100)
If ((0 <= buf)&&(buf<=10)) Then //куда то пишем текст бла бла
else If ((10 < buf)&&(buf<=40)) Then //куда то пишем текст ля ля
else If ((40 < buf)&&(buf<=100)) Then //куда то пишем текст бу бу


за правильность кода не ручаюсь но думаю идея ясна? 


но многоуважаемая Natapro это отдельная личность, ей очень тяжко что то объяснить и доказать. особенно с первого раза. а вопрос возник потому что я ей пытался доказать что надо с элсами делать. но она сказала что у нее и так все работает. 
PM MAIL ICQ   Вверх
Страницы: (3) Все 1 [2] 3 
 Ответ в темуСоздание новой темы Создание опроса
Правила форума VB .NET
diadiavova
  • Прежде чем задать вопрос, воспользуйтесь поиском: возможно Ваш вопрос уже обсуждался и на него был получен ответ.
  • Если такой же вопрос не найден, не стоит задавать свой вопрос в любую тему, создайте новую.
  • Заголовок темы должен отображать ее суть.
  • Содержание поста должно описывать проблему понятно, но в то же время, по возможности, лаконично. Сначала следует описать суть вопроса, потом можно привести пример кода, не вынуждайте других участников угадывать в чем Ваша проблема - телепатов здесь нет.
  • Будьте взаимно вежливы и дружелюбны.
  • При оформлении сообщений используйте форматирование, примеры кода заключайте в теги [CODE=vbnet][/CODE].
  • Также ознакомьтесь с общими правилами, действующими на всем форуме.
  • Если вопрос решен, не забывайте помечать тему решенной(вверху темы есть ссылка). Кроме того, если Вы хотите отблагодарить участников, оказавших помощь в решении, можно повысить им репутацию, в случае, если у Вас менее 100 сообщений в форуме и функция изменения репутации Вам недоступна, можете написать сюда.
  • Общие вопросы по программированию на платформе .NET обсуждаются здесь.
  • Литература по VB .NET обсуждается здесь.

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, diadiavova.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB .NET | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0542 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.