Hvad er der galt her 21-04-06 16:12 : lufthoved 21-04-06 16:15 : Surf 21-04-06 17:03 : e.c 17-05-06 13:38 : Surf

Hvad er der galt her Fra : Surf Vist : 1526 gange 50 point Dato : 21-04-06 16:06

Dim nummer As Integer Randomize() nummer = CInt(Rnd() * 3) + 1 If nummer = 1 Then TextBox1.Text = "Hej lars" End If If nummer = 2 Then TextBox1.Text = "hvem er du" If nummer = 3 Then TextBox1.Text = "dig gider jeg ikke at snakke med" end if

Kommentar Fra : lufthoved Dato : 21-04-06 16:12

Jeg vil i hvert fald foreslå du skriver randomize timer... Ligeledes tror jeg ikke koden fungerer med mindre du fjerner begge endif'er

Kommentar Fra : Surf Dato : 21-04-06 16:15

Kom heller med en kode hmmmf

Accepteret svar Fra : e.c Modtaget 35 point Dato : 21-04-06 17:03

Kode Dim nummer As Integer Randomize (1 - 10) nummer = CInt(Rnd() * 3) + 1 If nummer = 1 Then Text1.Text = "Hej lars" Else If nummer = 2 Then Text1.Text = "hvem er du" Else Text1.Text = "dig gider jeg ikke at snakke med" End If End If End Sub

Godkendelse af svar Fra : Surf Dato : 17-05-06 13:38

Tak for svaret e.c.

Du har følgende muligheder

Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål. Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.