| Вопрос: ????????????????????????? (не знал как озаглавить) | Добавлено: 04.04.06 19:09 |
Автор вопроса:  Billi Gates | ICQ: 242-026-281 |
| Привет всем! Hello! Hi! Вопрос: как на вб сделать от и до? Поясню: допустим на примере Form1.width=10000 - форма button1.left=(form1.width/2)+(button1.left/2) - доска(отбивает мячик) и мячик. у доски ширина 400 как сделать так, чтобы мячик отбивался от доски (от начала доски и до конца.) Пробовал так >button1.left<button1.left+button1.width. но не получилось! Или второй пример: случайным образом появляются цифры от 400 до 450 и как сделать чтобы кнопка нажималась только когда цифры от 420 до 430? |
| Ответы | Всего ответов: 13 |
|
Номер ответа: 1 Автор ответа:  Sacred Phoenix ICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #1 | Добавлено: 04.04.06 20:37 |
|
случайным образом появляются цифры от 400 до 450 Где появляются? как появляются?
чтобы кнопка нажималась только когда цифры от 420 до 430? Если это число у тебя в переменной, то так:
Command1.Enabled = (lngNum >= 420 And lngNum <= 430) |
||
|
Номер ответа: 2 Автор ответа: [root] Вопросов: 45 Ответов: 1212 |
Web-сайт: Профиль | | #2 | Добавлено: 04.04.06 21:46 |
|
Private Sub Form_Load()
Dim num As Integer num = InputBox("Enter", "Number" 
Select Case num Case 420 To 430 MsgBox ("GooD"
Case Else MsgBox ("Bad"
End Select End Sub |
||
|
Номер ответа: 3 Автор ответа: NecoICQ: 247906854 Вопросов: 133 Ответов: 882 |
Web-сайт: Профиль | | #3 | Добавлено: 05.04.06 01:04 |
|
if a>420 and a<430 then
msgbox "ok" end if |
||
|
Номер ответа: 4 Автор ответа: Billi Gates ICQ: 242-026-281 Вопросов: 25 Ответов: 57 |
Профиль | | #4 | Добавлено: 05.04.06 09:52 |
|
if a>420 and a<430 then
msgbox "ok" end if не получится! Потому, что если а больше 420 т.е. 430 431 432 10000000 и.т.д.! а меньше 430 что? 420 410 и.т.д.! А вот [root] правильно подсказал! Спасибо! |
||
|
Номер ответа: 5 Автор ответа: LamerOnLineICQ: 334781088 Вопросов: 108 Ответов: 2822 |
Профиль | | #5 | Добавлено: 05.04.06 11:07 |
|
Примеры из постов N2 и N3 отличаются только тем что в третьем посте строгое неравенство. Т.е. < вместо <= и т.д. Посему оно аналогично
Case 421 To 429 ЗЫ Плиз, пиши внятно, голова болит парсить твои посты... |
||
|
Номер ответа: 6 Автор ответа: [root]Вопросов: 45 Ответов: 1212 |
Web-сайт: Профиль | | #6 | Добавлено: 05.04.06 13:46 |
|
всегда рад
|
||
|
Номер ответа: 7 Автор ответа: NjICQ: 223663115 Вопросов: 21 Ответов: 285 |
Профиль | | #7 | Добавлено: 05.04.06 14:23 |
|
доска(отбивает мячик) и мячик.
Арканойд или Теннис пишешь? >button1.left<button1.left+button1.width Ты чего это написал-то?
Точнее, в чем твоя проблема, что значит мячик должен отбиваться по всей доске? По ходу дела, Тебе нужно проверять задел ли мячик доску или мимо попал? Сие, координаты мячика надо сличать с координатами доски, т.е. мячиком провоцируемое событие должно процедурой проверить if мячик.left < доска.left _
or мячик.left > доска.left+400 then msgbox "BALL LOST" else задаем мячику отбиваться и лететь end if Чего-то я помойму упустил в этом коде... не помню, что-то еще проверить надо... Не могу ручаться, но я бы попробывал так. |
||
|
Номер ответа: 8 Автор ответа: NjICQ: 223663115 Вопросов: 21 Ответов: 285 |
Профиль | | #8 | Добавлено: 05.04.06 17:10 |
| Ах, да, надо еще чтобы мячик.top был около доски, а то ерунда получится... | ||
|
Номер ответа: 9 Автор ответа: Sacred PhoenixICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #9 | Добавлено: 05.04.06 20:24 |
|
if a>420 and a<430 then
В условии сказано больше 420 и меньше 430, а не больше 420 или меньше 430. Тем более что, если a=420 или a=430, мессаги не будет, хотя она должна быть. Че париться:
msgbox "ok" end if не получится! Потому, что если а больше 420 т.е. 430 431 432 10000000 и.т.д.! а меньше 430 что? 420 410 и.т.д.! Как [root]: Select Case num
Case 420 To 430: ... Case Else: ... End Select Или как я: If num >= 420 And num <= 430 Then ...
|
||
|
Номер ответа: 10 Автор ответа: NecoICQ: 247906854 Вопросов: 133 Ответов: 882 |
Web-сайт: Профиль | | #10 | Добавлено: 06.04.06 01:44 |
|
не получится! Потому, что если а больше 420 т.е. 430 431 432 10000000 и.т.д.!
а меньше 430 что? 420 410 и.т.д.! А не рановато ты замахнулся на доски и мячики? 8) |
||
|
Номер ответа: 11 Автор ответа: Sacred PhoenixICQ: 304238252 Вопросов: 52 Ответов: 927 |
Профиль | | #11 | Добавлено: 07.04.06 21:33 |
|
А не рановато ты замахнулся на доски и мячики? 8) Он надеется на нашу помощь 
надо еще чтобы мячик.top был около доски Математика, а тем более программирование, требуют точности. Как говорилось, "Скока вешать в граммах". Что значит "около доски"?
|
||
|
Номер ответа: 12 Автор ответа: NjICQ: 223663115 Вопросов: 21 Ответов: 285 |
Профиль | | #12 | Добавлено: 07.04.06 22:27 |
|
Надо проверить, где мячик - внизу формы, т.е. там где пластина, или где-то еще.
if мячик.top=доска.top + мячик.высота Then
проверять где именно оказался мячик в отношении доски 2 Sacred Phoenix Я предложил такой вариант - предложи свой, коли не нравится. |
||
|
Номер ответа: 13 Автор ответа: Billi GatesICQ: 242-026-281 Вопросов: 25 Ответов: 57 |
Профиль | | #13 | Добавлено: 08.04.06 09:11 |
| Я понимаю что нужно делать, если просто друг с другом поговорить хотите, то ни кто не мешает, но если для меня всё это пишется, то я давно разобрался! Nj, с топом у меня всё в порядке, это я до тебя дня за 4 сделал(за 2 дня, до того как ты поставил сообщение, а не 2 дня делал, сделал за 1 минуту) ато смеяться будете. А [root] отдельное спасибо, он реально на поставленный вопрос ответил Всем огромное спасибо за желание помочь и за оказанную помощь, вопрос уже исчерпан, всё уже давно получилось! | ||
Страница: 1 |