UC知道excel vb一些简单的问题，急需答案
来源：百度知道 编辑：UC知道 时间：2024/05/22 03:55:06
一、我在excel表格中获得了把个数，用a,b,c,d,e,f,g,h 表示，它们的值是1、2、3其中的一个，我想计算这八个值里面，1的个数，2的个数和3的个数，请问该如何写这个代码？
二、我想获得一个从0到1 的随机数，又应该如何写代码？
二、我想获得一个从0到1 的随机数，又应该如何写代码？
it is easy
一、
dim i as integer
dim x as integer '存放1的个数
dim y as integer '存放2的个数
dim z as integer '存放3的个数
dim arr(7) as variant '数组，存放8个数
arr(0) = a
arr(1) = b
...... '这里省略，自己添加吧
arr(7) = h
for i = 0 to 7
if arr(i) = 1 then
x = x + 1
else if arr(i) = 2 then
y = y + 1
else if arr(i) = 3 then
z = z + 1
end if
next
二、用函数rnd（）可获得随机数
a = rnd()