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] VB [Q]


Rekomendowane odpowiedzi

Opublikowano

Witam.

 

Witam.
Uczę się programować w VB i robię różne programy i w jednym z nich potrzebna mi jest komenda po której jeżeli nie będzie zaznaczony żaden Radio Buttom nic się nie stanie tzn. Mam już cały program tylko mi tego brakuje.
A drugie pytanie to jak wgrać muzykę 8 bit do programu tak jak w keygenach.
Z góry dziękuje.
Opublikowano


If radiobutton1.checked = true then

 

tu jakies komendy

 

else

 

msgbox("Zaznacz jakiś button!")

 

End If

 

Opublikowano

 

If radiobutton1.checked = true then

tu jakies komendy

else

msgbox("Zaznacz jakiś button!")

End If
 

 

 

 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Start()
ProgressBar1.Value = ProgressBar1.Minimum
If RadioButton1.Checked = False And
RadioButton2.Checked = False Then
MessageBox.Show("Choose game version", "Error")
Else
Timer1.Start()
ProgressBar1.Value = ProgressBar1.Minimum
If RadioButton1.Checked Then
RadioButton2.Enabled = False
End If
If RadioButton2.Checked Then
RadioButton1.Enabled = False
End If
End If
End Sub
Mam tak i i tak po nie zaznaczeniu wcześniej buttona i tak timer startuje i pojawia się jednocześnie że jest gotowe i trzeba wybrać wersje a chciałbym aby nic się nie działo prócz informacji o błędzie.
Opublikowano


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

 

 

 

If RadioButton1.Checked = False And

RadioButton2.Checked = False Then

MessageBox.Show("Choose game version", "Error")

Else

Timer1.Start()

ProgressBar1.Value = ProgressBar1.Minimum

If RadioButton1.Checked Then

RadioButton2.Enabled = False

End If

If RadioButton2.Checked Then

RadioButton1.Enabled = False

End If

End If

 

End Sub

 

Zarchiwizowany

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

×
×
  • Dodaj nową pozycję...