CARVIEW |
Select Language
HTTP/2 200
date: Sat, 11 Oct 2025 20:21:06 GMT
content-type: text/html; charset=UTF-8
server: cloudflare
x-frame-options: DENY
x-content-type-options: nosniff
x-xss-protection: 1;mode=block
vary: accept-encoding
cf-cache-status: DYNAMIC
content-encoding: gzip
set-cookie: _csrf-frontend=9984bbeaf5c58fcb44d8fee96e4f1444517599cd5aed529db54507ed4c02fbf1a%3A2%3A%7Bi%3A0%3Bs%3A14%3A%22_csrf-frontend%22%3Bi%3A1%3Bs%3A32%3A%22ZFZohot46SpuPw0d5m26X2uz5cniclzF%22%3B%7D; HttpOnly; Path=/
cf-ray: 98d10fd9f9d4ccbb-BLR
Imports System.CollectionsModule Program Sub Main() ' Create a - Pastebin.com
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Imports System.Collections
- Module Program
- Sub Main()
- ' Create a Hashtable
- Dim myHashtable As Hashtable = New Hashtable()
- ' Add key-value pairs to the Hashtable
- myHashtable.Add("ID", 101)
- myHashtable.Add("Name", "John")
- myHashtable.Add("Age", 25)
- ' Display Count
- Console.WriteLine("Number of elements in Hashtable: " & myHashtable.Count)
- ' Access values using keys
- Console.WriteLine("Value for key 'Name': " & myHashtable.Item("Name"))
- ' Check if a key exists
- Console.WriteLine("Contains key 'Age': " & myHashtable.ContainsKey("Age"))
- ' Check if a value exists
- Console.WriteLine("Contains value 101: " & myHashtable.ContainsValue(101))
- ' Remove a key-value pair
- myHashtable.Remove("Age")
- Console.WriteLine("After removing 'Age', contains key 'Age': " & myHashtable.ContainsKey("Age"))
- ' Iterate through the Hashtable
- Console.WriteLine("Hashtable elements:")
- For Each key In myHashtable.Keys
- Console.WriteLine(key & ": " & myHashtable.Item(key))
- Next
- ' Clear the Hashtable
- myHashtable.Clear()
- Console.WriteLine("Count after Clear: " & myHashtable.Count)
- End Sub
- End Module
Advertisement
Add Comment
Please, Sign In to add comment
-
π Crypto Swap Glitch β
Working
JavaScript | 8 sec ago | 0.24 KB
-
β
β Make huge profits on trading ββ 5
JavaScript | 16 sec ago | 0.25 KB
-
π EASY MONEY GUIDE β
Working
JavaScript | 17 sec ago | 0.24 KB
-
ββ
Marketplace Glitch β
Working β
NEVER SEEN...
JavaScript | 24 sec ago | 0.25 KB
-
π ChangeNOW Exploit
JavaScript | 27 sec ago | 0.24 KB
-
ββ
Exploit 2500$ in 15 Minutesβββ 7
JavaScript | 34 sec ago | 0.25 KB
-
π΅ Make 3000$ in 20 minutes π΅
JavaScript | 38 sec ago | 0.24 KB
-
Free Crypto Method (NEVER SEEN BEFORE)ββ 1
JavaScript | 43 sec ago | 0.25 KB
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand