Hei ich abrbeite an einem sitzplan Programm bin soweit auch fertig aber jetzt würde ich gerne wissen wie man nur neben bestimmten Personen sitzt.ich weis das ich dazu eine Schleife brauche bzw. 2 ! dann mache ich ja eine If abfrage und dann???? wie wählt der einen dieser namen aus
Visual Basic-Quellcode
- Public Class Form1
- Dim randomizer As New Random
- Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim vornamen() As String = {"Marian", "Leonardo", "Jonas", "Niklas", "Julia", "Lucy", "Katja", "Christian", "Matthias", "Vincent", "Michael", "Sarah", "Jana", "Julius", "Magdalena", "Paul", "Manuel", "Clemence", "Tim F.", "Tim K.", "Kevin", "Leon", "Marcel", "Emilio", "Eila", "Simon"}
- Dim boxes() As TextBox = {TextBox2, TextBox3, TextBox4, TextBox5, TextBox6, TextBox7, TextBox8, TextBox9, TextBox10, TextBox11, TextBox12, TextBox13, TextBox14, TextBox15, TextBox16, TextBox17, TextBox18, TextBox19, TextBox20, TextBox21, TextBox22, TextBox23, TextBox24, TextBox25, TextBox26}
- Dim ori(24) As Integer
- Dim nb(24) As Integer
- For i = 0 To 24
- ori(i) = i
- nb(i) = randomizer.Next(0, 25)
- Next
- Array.Sort(nb, ori)
- For i = 0 To 24
- boxes(i).Text = vornamen(ori(i))
- Next
- [color=#FF0000]If TextBox3.Text = "Marian" Then
- TextBox2.Text = "katja" Or "Lucy"
- [/color]
- End If
- End Sub
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „TheProgrammer“ ()