xZeuSx
(D Kielbania)
17 Listopad 2007 15:47
#1
Mam pytanie, czy jest możliwość zablokowania wybranych buttonów w momencie kliknięcia i wykonania przypisanej operacji jednemu z nich?
Przykład:
Mam kilka buttonów (dodawanie, odejmowanie, mnożenie i dzielenie). W momencie kliknięcia w jeden wykonuje się operacja (np. dodawanie) oraz następuje zablokowanie zarówno użytego jak i pozostałych.
Będę wdzięczny za pomoc.
Mireczek
(Mireczek)
17 Listopad 2007 15:59
#2
Zależy który VB, bo w każdym jest inaczej. Z reguły wygląda to tak:
NazwaPrzycisku.Enabled=False/True
xZeuSx
(D Kielbania)
17 Listopad 2007 16:26
#3
Tylko teraz jak odpowiednio ułożyć kod, żeby zablokować przyciski po zakończeniu operacji?
Mireczek
(Mireczek)
17 Listopad 2007 16:32
#4
Wpisujesz na końcu w jakiejś procedurze, która wykonywała operację wiersze:
Sub Oblicz()
…
Coś_Liczy_1
Coś_Liczy_2
…
Przycisk_1.Enabled=False
Przycisk_2.Enabled=False
Przycisk_N.Enabled=False
End Sub
EDIT:
Z tego co widzę, to chyba w Twoim przypadku przydatna będzie poniższa strona:
Kurs Visual Basic
xZeuSx
(D Kielbania)
17 Listopad 2007 18:04
#5
Dzięki za pomoc. Pomogło.
Teraz mam inny problem. chcę, żeby wynik z buttona pokazywał się w labelu. Kod buttona wygląda tak:
Private Sub Command1_Click()
Dim varLiczba As Variant
Randomize
varLiczba = Int((15 * Rnd) + 3) '
a kod labela tak:
Private Sub Label1_Change()
Label1.Caption = Command1
End Sub
Próbowałem również za Command1 wpisać varLiczba, jednak nic to nie daje.
Szukałem tego po tutorialach, ale nigdzie tego nie ma
(Przepraszam, że w tym samym temacie, ale nie chcę robić bałaganu na forum)
Mireczek
(Mireczek)
17 Listopad 2007 18:41
#6
Ja bym to zrobił tak:
Private Sub Command1_Click()
Dim varLiczba As Variant
Randomize
varLiczba = Int((15 * Rnd) + 3)
Label1.Caption = varLiczba
...
End Sub