[求助]请问这样的随机颜色应该怎么写啊?
我想随机的选择颜色...function ttttt()
redim tb_color(8,2)
for i=1 to 8
tb_color(i,1)=#ffffff
tb_color(i,2)=#ffffff
next
现在我想把那两个地方的颜色改成随机的...不知道应该怎么办....
谁能帮帮我啊???谢谢!!!!!!!
tmp = "0123456789ABCDEF"
Function RoundStr(str,Num)
s = ""
for j = 1 to Num
Randomize
strLen = Len(str)
t = Round((RND * (strLen-1))+1)
s = s & mid(str,t,1)
Next
RoundStr = s
End Function
============================
这个本来是一个随机产生密码的函数,修改了一下
color="#<%= RoundStr(tmp,6)"