Другие языки программирования и технологии

Помогите написать код для VBA

вставил в презентацию текстовое поле для ввода ответа, кнопку проверить... по нажатию кнопки проверить макрос должен выдавать либо правильно, либо неправильно и считать сколько неправильных попыток было... то есть если нажали на кнопку, а в текстовом поле неправильный ответ, то к какой то переменной прибавляется 1...
я начал писать
Public Sub CommandButton1_Click()
Dim k As Integer
k = 0
If TextBox1 <> "привет" Then
MsgBox "Буду" + Str(k) + " раз", vbOKOnly, "Твой результат"

End If
End Sub

но как сделать этот счетчик неправильных ответов?
Dim k As Integer ' счетчик для правильного ответа
Dim m As Integer ' счетчик для Неправильного ответа
' Объявляются ВНЕ всех процедур !!!

Public Sub CommandButton1_Click()

If TextBox1.Text = "привет" Then
k=k+1 ' это правильный
Else
m=m+1 ' это неправильный
End If

Dim Result As String
Result = "Правильных: " & k & vbCrLf
Result = Result & "Неправильных: " & m
MsgBox Result,, "Твой результат"

End Sub
Ecaterina Miron
Ecaterina Miron
85 893
Лучший ответ
на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут на5бор в кома43анду асс6енизат43оров по очир54стке отва43етов от Г кот6о5рорые удап34ляют вопроа34сы з32ырь тут