programma visual basic
  • In diretta da GamesVillage.it
    • News
    • -
    • In Evidenza
    • -
    • Recensioni
    • -
    • RetroGaming
    • -
    • Anteprime
    • -
    • Video
    • -
    • Cinema

Visualizzazione risultati da 1 a 8 di 8

Discussione: programma visual basic

Cambio titolo
  1. #1
    Bannato L'avatar di Tom Bombadillo
    Registrato il
    04-05
    Località
    nell'internet point
    Messaggi
    399

    programma visual basic

    devo fare un programma in visual basic in cui devo inserire 100 numeri, poi inserire un numero in una text box, e vedre se il numero è presente tra i numeri inseriti prima o meno e scrivere in una label se c'è o non c'è. poi devo contare quante volte il numero c'è (se c'è) e scriverlo in una label

    fino a ora ho fatto questo:

    (generali)
    Dim v(1 To 10) As Single
    Dim i As Integer
    Dim ricorrenze As Integer


    Private Sub Command1_Click()
    For i = 1 To 10
    v(i) = InputBox("inserisci numero")
    Next i
    End Sub

    Private Sub Command2_Click()
    Dim numero As Single
    numero = Val(txt1.Text)
    For i = 1 To 10
    If v(i) = numero Then
    lbl1.Caption = "il numero è presente nell'elenco"
    End If
    Next i
    If lbl1.Caption = "il numero è presente nell'elenco" Then
    lbl1.Caption = "il numero è presente nell'elenco"
    Else
    lbl1.Caption = "il numero non è presente nell'elenco"
    End If
    End Sub


    non so come fare nell'ultima parte (quella in cui devo contare le ricorrenze). ho creato un command button ma ora buio totale... perfavore aiutatemi o se ce l'avete anche un link che tratti questo argomento
    grazie!
    Ultima modifica di Tom Bombadillo; 27-05-2005 alle 15:00:55

  2. #2
    Programmatore capo L'avatar di thebigdax
    Registrato il
    10-04
    Località
    IBM
    Messaggi
    781
    un bell'array dove ci piazzi i numeri, poi catturi il valore della text box e fai un for controllando tutti i numeri dell'array con quello che hai inserito, per fare un contatore crei un if "dentro" il for con su scritto che se trova il numero uguale crea una variabile con valore 1 ecc... aggiungendo 1 ogni volta che ne trova uno uguale spero di essere stato chiaro, non so niente di visualbasic

    Può sempre servire
    Nel 1969, 2 commodore 64 sono riusciti a far andare l'uomo sulla Luna... ...oggi, nel 2005, un Athlon 3500+ fa fatica a far girare Windows Xp!!!!

  3. #3
    Bannato L'avatar di Tom Bombadillo
    Registrato il
    04-05
    Località
    nell'internet point
    Messaggi
    399
    grazie... minchia non ci avevo proprio pensato... era facile ma io mi arrabattavo con chissà quali soluzioni fantascientifiche
    grazie tante!

  4. #4
    Linux User L'avatar di Silversnake
    Registrato il
    11-02
    Località
    Palermo
    Messaggi
    2.608
    OT sei siciliano?

  5. #5
    Programmatore capo L'avatar di thebigdax
    Registrato il
    10-04
    Località
    IBM
    Messaggi
    781
    Citazione Tom Bombadillo
    grazie... minchia non ci avevo proprio pensato... era facile ma io mi arrabattavo con chissà quali soluzioni fantascientifiche
    grazie tante!
    figurati io non ho fatto niente

    Può sempre servire
    Nel 1969, 2 commodore 64 sono riusciti a far andare l'uomo sulla Luna... ...oggi, nel 2005, un Athlon 3500+ fa fatica a far girare Windows Xp!!!!

  6. #6
    Bannato L'avatar di Tom Bombadillo
    Registrato il
    04-05
    Località
    nell'internet point
    Messaggi
    399
    Citazione Silversnake
    OT sei siciliano?
    no

  7. #7
    Bannato L'avatar di Tom Bombadillo
    Registrato il
    04-05
    Località
    nell'internet point
    Messaggi
    399
    Citazione thebigdax
    figurati io non ho fatto niente
    si invece... mi hai salvato il culo, avevo fatto una scommessa di 10 euro con un compagno e ora ho 10 €

  8. #8
    Programmatore capo L'avatar di thebigdax
    Registrato il
    10-04
    Località
    IBM
    Messaggi
    781

    Può sempre servire
    Nel 1969, 2 commodore 64 sono riusciti a far andare l'uomo sulla Luna... ...oggi, nel 2005, un Athlon 3500+ fa fatica a far girare Windows Xp!!!!

Regole di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •