VB运算题 没有难度 可能模糊点 强力大侠进! 笔记可能模糊点 刚涉足VB 高分求答案！

1．写出下列程序的运算结果
private sub form_click()
Dim a as integer,c as integer
a=4,b=5,c=6
a=b b=a
print a b
b=c c=a print a b c
End sub
2.写出运算结果
private sub form_click()
DIm n as integer
n=1
do while n<=5
print n*n
n=n+1 loop
end sub
3.设输入的数据分别为 14,3,12,21 时,标签中值分别是多少？
private sub form_click()
Dim a as integer
a=val(inputbox("please input a number"))
select case a mod5
case4 w=a+10 case w=a*2
case1 w=a-10 case else w=a+1
end select
label1.caption="a="es
end sub
4. 写出结果
sub test (byvali as integer)
i=i+1 print "i=" i end sub
private sub form_click()
dim x as integer x=4
print "x=" x call test(x)
print "x=" x
end sub

VB没有Mod和Div运算吗 vb运算问题 VB的运算结果 VB中运算问题~ vb排列组合运算 VB运算帮忙~ vB简单运算 vb运算符问题 求VB运算代码 VB表达式的运算