Aprire un nuovo progetto di Visual Basic . Fare doppio clic sul controllo " Button " quattro volte per aggiungere " Button1 " attraverso " Button4 " per la forma e disporli come ti piace. Modificare la proprietà "Text " per " Button1 " a " Aggiungi ", per " Button2 " per " rimuovere ", per " Button3 " a "Mostra tutto" e per " Button4 " a " Cancella ".
2
Premere " F7 " per aprire la finestra del codice . Digitare il seguente codice nella prima riga :
Imports System.Collections
questo importa il namespace System.Collections nel progetto. Esso contiene la classe Hashtable
3
Aprire la classe " Form1 " e digitare il seguente codice : .
Dim MyHashTable As New Hashtable ( ) per
questo crea un nuovo oggetto chiamato " MyHashTable " che utilizza la classe Hashtable
4
Aprire il sottoprogramma " Button1_Click " e digitare il seguente codice : .
Prova
MyHashTable.Add ( "Primo " , "Gold" ) per
MyHashTable.Add ( "secondo", " Argento" ) per
MyHashTable.Add ( "Terzo " , " bronzo " )
catch ex As Exception
MessageBox.Show ( " chiave duplicata " ) per
End Try
Queste linee utilizzano il metodo "Add " per aggiungere tre nuovi elementi alla tabella hash con "Primo ", "Secondo" e "Terzo ", come le chiavi e " oro ", " argento " e " bronzo ", come i loro rispettivi valori. È possibile ottenere le coppie chiave-valore da qualsiasi altra parte del programma , ad esempio un utente InputBox , controlli TextBox o altre selezioni in fase di esecuzione . L'aggiunta di questi elementi in un " try-catch " blocco assicura che se si tenta di aggiungere un elemento con una chiave già esistente nella tabella hash , non crashare il programma .
5
Aprire il sottoprogramma " Button2_Click " e digitare il seguente codice :
( MyHashTable.Count = 0) allora
MsgBox ( " HashTable è vuoto " ) per
Else
MyHashTable.Remove ( MyHashTable.Count ) per
End If
Queste linee utilizzano il metodo "Count" per vedere se la tabella hash è già vuota . In caso affermativo , il programma indica all'utente , altrimenti si rimuove l'elemento più recente. È possibile programmare modi alternativi per rimuovere elementi dalla tabella hash
6
Aprire il sottoprogramma " Button3_Click " e digitare il seguente codice : .
MyHashTable.Count = 0 Then < br
MsgBox > ( " Non ci sono elementi nella tabella hash " ) per
Else
For i = 0 To MyHashTable.Count - 1
MsgBox ( MyHashTable.Keys ( i) . ToString & " , " & MyHashTable.Values ( i) ) per
Next i
End If
Queste linee di controllo per vedere se esistono eventuali voci nella tabella hash . In caso contrario , l' utente è informato che la tabella è vuota , altrimenti , tutte le coppie chiave-valore vengono visualizzati. Poiché le tabelle hash utilizzano zero indicizzazione , è necessario contare fino a di questa tabella di hash "count" meno uno
7
Aprire il sottoprogramma " Button4_Click " e digitare il seguente codice: .
MyHashTable.Clear ( ) per
Questo metodo cancella tutte le voci della tabella di hash . Non è necessario per prima cosa verificare se la tabella è vuota o non perché compensazione un tavolo vuoto non causa un errore .
Programmazione © www.354353.com