要用select case语句的话，你就要把复选框搞成数组形式的，例如：ch1[0],
ch1[1],ch[2]
上面的也行，若想用这个语句的话，就稍微改一下就行了
public sub c1_click()
dim str as string
if(ch1.checked) then str=str & ch1.caption
if(ch2.checked) then str=str & ch2.caption
if(ch3.checked) then str=str & ch3.caption
me.print "我选的课程是" & str
end sub
我回去了自己试试啊，好久VB了。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024