vb会的进来看看

来源:百度知道 编辑:UC知道 时间:2024/06/22 08:34:29
dim a
a=inputbox("输入一个1--3的值")
a=int(a)
select case a
case 1
msgbox("壹")
case 2
msgbox("贰")
case 3
msgbox("叁")
case else
msgbox("输入错误")
end select
上面的程序的case 1,case 2,case 3,都是表示当a输入是1,2,3才会执行规定的命令.那为什么下面的程序(看看另一个程序在下面)用到select..case
的功能可以实现二维数组呢,为什么可以实现case 0 opt="姓名" case 1 opt="国籍" case 2 opt="民族" dim info(4,2)
dim i,j
for i=0 to 4
for j=0 to 2
dim opt
select case j
case 0
opt="姓名"
case 1
opt="国籍"
case 2
opt="民族"
end select
info(i,j)=inputbox("请输入第" & i+1 & "个人的" & opt)
next
next

据我自己的理解select case函数就相当与if then elseif elseif end if 那为什么在第二个程序可以用来当做数组输入元素呢

你的数组的功能是不是:
info(n,0) :姓名
info(n,1) :国籍
info(n,2) :民族
select case 并没有当做数组接收数据,而是给你个提示,当第二维的数值变化时输入的数据分别代表什么意思