Visual basic - blokowanie buttona przy danej operacji


(D Kielbania) #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) #2

Zależy który VB, bo w każdym jest inaczej. Z reguły wygląda to tak:

NazwaPrzycisku.Enabled=False/True


(D Kielbania) #3

Tylko teraz jak odpowiednio ułożyć kod, żeby zablokować przyciski po zakończeniu operacji?


(Mireczek) #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


(D Kielbania) #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) #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