C
Chuck Insight
When I run the code below, I get
Compiler Error Message: Argument not specified for parameter 'key' of 'Public Shared Sub Add(key As Object, value As Object)'.
Here's the code:
<%@Page Explicit = "True" Language="VB" Debug="True" %>
<HTML><HEAD>
<Script runat="server">
Sub OK_Button(Sender As Object, E As Eventargs)
end sub
Public Shared Sub Add(ByVal key As Object, ByVal value As Object)
Static usethis as arraylist = new arraylist
dim s as integer
for s = 1 to 50
s += 1
usethis.add(s.ToString)
next s
Static samples as hashtable = new hashtable
dim i as integer
dim up as integer = 0
randomize
dim bh as integer = int(rnd * 50) + 1
for i = 1 to 50
on error resume next
if bh = 1 and usethis.contains(bh) then
up += 1
samples.add(up.ToString, bh.ToString)
usethis.remove("1")
end if
next i
End Sub
</Script></head><BODY>
<%=add.samples.get("1") %>
</BODY></HTML>
Compiler Error Message: Argument not specified for parameter 'key' of 'Public Shared Sub Add(key As Object, value As Object)'.
Here's the code:
<%@Page Explicit = "True" Language="VB" Debug="True" %>
<HTML><HEAD>
<Script runat="server">
Sub OK_Button(Sender As Object, E As Eventargs)
end sub
Public Shared Sub Add(ByVal key As Object, ByVal value As Object)
Static usethis as arraylist = new arraylist
dim s as integer
for s = 1 to 50
s += 1
usethis.add(s.ToString)
next s
Static samples as hashtable = new hashtable
dim i as integer
dim up as integer = 0
randomize
dim bh as integer = int(rnd * 50) + 1
for i = 1 to 50
on error resume next
if bh = 1 and usethis.contains(bh) then
up += 1
samples.add(up.ToString, bh.ToString)
usethis.remove("1")
end if
next i
End Sub
</Script></head><BODY>
<%=add.samples.get("1") %>
</BODY></HTML>