VBNet - Форум - Помогите абсолютному чайнику

Вопрос: Помогите абсолютному чайнику Добавлено: 22.04.09 21:39

Автор вопроса: maks

сделал первую в своей жизни прогу на VB, пытался запустить, но в ответ сначало ЭТО:

Compile error
Method or data member not found

после нажатия ОК указывает ошобку в коде:

Private Sub Command1_Click()
    Image1.Visible = False 'скрыть монеты
    Label1.Caption = Int(Rnd * 10) 'показать числа
    Label2.Caption = Int(Rnd * 10)
    Label3.Caption = Int(Rnd * 10)
    'Если любое число равно 7, показать рисунок и дать сигнал
    If (Label1.Caption = 7) Or (Label2.Caption = 7) Or (Label3.Caption = 7) Then
        Image1.Visible = True
        Beep
    End If
End Sub

желтым выделяет строку:
Private Sub Command1_Click()
и синим
.Caption =
в строке
Label1.Caption = Int(Rnd * 10) 'показать числа

умные мальчики и девочки, помогите чайнику

Ответить

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

Номер ответа: 1 Автор ответа: Aston ICQ: 214-179-991 Вопросов: 42 Ответов: 272	Профиль \| \| #1	Добавлено: 23.04.09 00:34
	Я просто скопировал твой код в ВБ6 и всё сработало без ошибки. Единственная идея что у меня возникла - это то что элмента типа Label1 у тебя нет на форме, тое ты обращаешься к несуществующему объекту. Ответить

Номер ответа: 2 Автор ответа: VβÐUηìt Вопросов: 246 Ответов: 3333	Web-сайт: смекаешь.рф Профиль \| \| #2	Добавлено: 23.04.09 10:48
	Label1.Caption- это текст, а твое случайное число - это число. Получаецо жопа. Надо так: Private Sub Command1_Click() Image1.Visible = False 'скрыть монеты Label1.Caption = Сstr(Int(Rnd * 10)) 'показать числа Label2.Caption = Cstr(Int(Rnd * 10)) Label3.Caption = Cstr(Int(Rnd * 10)) 'Если любое число равно 7, показать рисунок и дать сигнал If (Label1.Caption = 7) Or (Label2.Caption = 7) Or (Label3.Caption = 7) Then Image1.Visible = True Beep End If End Sub Ответить

Номер ответа: 3 Автор ответа: Tolik-ezhik Вопросов: 2 Ответов: 1	Профиль \| \| #3	Добавлено: 30.05.09 19:49
	Ты обращаешься просто к несуществующей метке. Переименуй нужную метку в свойстве name на label1 Ответить

Номер ответа: 4 Автор ответа: Arvitaly ICQ: 301746136 Вопросов: 28 Ответов: 549	Web-сайт: okazani.ru Профиль \| \| #4	Добавлено: 30.05.09 20:36
	Label1.Caption- это текст, а твое случайное число - это число. Получаецо жопа. Надо так: В данном случае VB сам умеет автоматически преобразовывать Ответить

Страница: 1 |