3、在按钮里面写
a=inputbox("输入a")
b=inputbox("输入b")
c=inputbox("输入c")
sum=a+b+c
msgbox sum
4、在按钮里写
randmonize
x=int(90*rnd+10)
print x
LZ你真牛掰,把VB的题放在C/C++分类里面,佩服死你了
如果我没猜错,你这是二级题吧?二级题,输入输出的框架应该都是有的吧,那我就把算法给你写出来吧
ps.艹,没看清楚,原来是实验。我可没时间为这么破5分给你写实验报告,谁愿意写就写吧。我只把程序写出来
1.
公共部分:
dim sno as string
sno = inputbox("输入学号")
数学方法:
dim dno as double
dno = cdbl(sno)
dim ino as long
ino = clng(dno / 10000)
ino = ino mod 10000
所得的ino就是结果
字符串方法:
dim result as string
result = mid(sno, 5, 4)
所得的result就是结果
2.
dim inp as string
inp = inputbox("输入4位整数")
dim n as integer
n = cint(inp)
n = (n mod 10)*1000 + (n mod 100)\10*100 + (n mod 1000)\100*10 + n \1000
print format(n, "#.000")
3.
dim a1 as double, a2 as double, a3 as double
a1 = cdbl(inputbox("输入第一个数"))
a2 = cdbl(inputbox("输入第二个数"))
a3 = cdbl(inputbox("输入第三个数"))
msgbox a1 + a2 + a3
4.
msgbox cint(rnd() * 90) + 10
PS.上面的问题补充说的什么乱七八糟的