Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

[Pytanie] Panel logowania ;)


Rekomendowane odpowiedzi

Opublikowano

siemka mam "panel" logowania ale nie umiem dodać żeby było "hasło".

chyba że trzeba dać inny kod. Ja stosuje to:

If textbox1.text = "user" Then
Msgbox ("dobre hasło")
form2.show
else
MsgBox ("złe hasło")
end if

 

Ale chce żeby też sprawdzało mi texbox2.text.

To mam napisać tak:

If textbox1.text = "user" Then
Msgbox ("dobre hasło")
form2.show
else
MsgBox ("złe hasło")
end if
If textbox2.text = "pass" Then
Msgbox ("dobre hasło")
form2.show
else
MsgBox ("złe hasło")
end if

 

 

1372687195-U932691.png

Created by

. Gentleman .

Opublikowano

If tb1.Text.Equals("fghvcfg") And 1 = 1 Then

...

End If

Opublikowano

Po pierwsze nie możesz tego "oddzielać" gdyż już po wprowadzeniu dobrego usera, program sprawdzi ze jest dobry i uruchomi form2.show

Musisz polaczyc te 2 rzeczy w jedno, bardzo prostym sposobem jest wsadzenie if do if, lecz mało efektywnym

 

 

If textbox1.text = "user" Then
  If textbox2.text = "haslo" Then
    Msgbox ("dobre hasło")
    form2.show
  else
    MsgBox ("złe hasło")
  end if
  else
  Msgbox ("złe hasło")
end if

 

W ten sposób program sprawdzi PO TYM jak user jest dobry, czy hasło również jest dobre ;)

Ile mój steam jest warty... :( ---> LINK <---


P.s. Jeb** mnie ile mam postów, chcecie dać warna za "nabijanie postów" ? Lepiej mi zmieniajcie ilosc postow na '0'.

Opublikowano

@UP Co ty piszesz o.0 Nie wiem po co uczyć się tak rozpisywać, przecież można się pogubić o.O

 

 

 

if textbox1.text = "tajnehasło" and textbox2.text = "tajneściślejtajnehasło" then
msgbox("good pass")
else
msgbox("bad pass")
end if

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...