/ Forside/ Teknologi / Udvikling / VB/Basic / Spørgsmål
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Hvad er der galt her
Fra : Surf
Vist : 977 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.
Søg
Reklame
Statistik
Spørgsmål : 177549
Tips : 31968
Nyheder : 719565
Indlæg : 6408820
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste