Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: помогите Добавлено: 07.12.08 08:50  

Автор вопроса:  Andrew | ICQ: 278653784 
для учебник4а нужно сделать задание с картинками ,тоесть нужно сделать упражение даны 3 картинки одна из них правильно а остальные нет как это сделать? замутите код плизззззззззз

Ответить

  Ответы Всего ответов: 4  

Номер ответа: 1
Автор ответа:
 EROS



Вопросов: 58
Ответов: 4255
 Профиль | | #1 Добавлено: 07.12.08 09:31
пипец... мой моцк лопнул... телепаты отдыхают

Ответить

Номер ответа: 2
Автор ответа:
 Kardinal



ICQ: 360041513 

Вопросов: 1
Ответов: 164
 Web-сайт: kg7.ru
 Профиль | | #2
Добавлено: 07.12.08 20:38
В смысле как решение тестов, можно уточнить?

Ответить

Номер ответа: 3
Автор ответа:
 Andrew



ICQ: 278653784 

Вопросов: 1
Ответов: 1
 Профиль | | #3 Добавлено: 08.12.08 04:13
ну я создал упражнение, смысл его в том что там даётся вопрос и 3 варианта ответа, 2 неправильных а один правильный!!!! вот дак ну теперь нужно сделать кнопку чтоб при нажитии она выдовала количество баллов заработанных в этом упражнении!!! и так на каждом упражнеее должна стоя такая кнопка а в конце в заключении кнопка чтоб выдала общее кол во баллов как этовсё осуществить?

Ответить

Номер ответа: 4
Автор ответа:
 Kardinal



ICQ: 360041513 

Вопросов: 1
Ответов: 164
 Web-сайт: kg7.ru
 Профиль | | #4
Добавлено: 08.12.08 08:49
Пример на Visual Basic:
  1.  
  2. Dim PravOtvet(10), Vopros, Pravilno
  3. Private Sub Form_Load()
  4. PravOtvet(1) = 1  'Варианты ответов
  5. PravOtvet(2) = 3
  6. PravOtvet(3) = 2
  7. PravOtvet(4) = 3
  8. Vopros = 1
  9.  
  10. End Sub
  11.  
  12. Private Sub Image1_Click(Index As Integer)
  13. If Index + 1 = PravOtvet(Vopros) Then Pravilno = Pravilno + 1: red$ = "Правильно" Else red$ = "Неправильно"
  14. Vopros = Vopros + 1 'Это на тот случай если надо перейти на следующий
  15. MsgBox (red$ & vbNewLine & "Правильных ответов " & Pravilno)
  16. End Sub

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам