VB作业：急急急！！！

来源：百度知道 编辑：UC知道 时间：2024/05/21 23:47:54
1设计一个窗体，输入一个3位整数，将它反向输出。
2从键盘输入任意一个实数，用Print方法在窗体上同一行显示其平方和平方根，要求保留3位小数。
以上两题要求用Inputbox完成！
3在一个字符串的指定位置插入一个字符，要求位置和待插入的字符都从键盘输入。

1
dim a(3) as integer
dim i as integer
for i=1 to 3
a(i)=val(inputbox("input 3 number "))
next
for i=3 to 1 step -1
label1.text=a(i)& " " &
next

2
dim i as doubel
i=val(inputbox("input number "))
form1.print i^2& " " & sqrt(i)
3
dim s as string
dim i as integer
dim x as string*1
s="abcdefg" '
i=val(inputbox("input number "))
x=inputbox("input char ")
form1.pring left(s,i) & x & right(s,len(s)-i)
未测试，解决基本的思路而以。

既然是作业还是给你一点提示把就不把代码给你写出来了 要动脑筋好好琢磨
比如三个数用“，”分割 如 s="123，456，789"

用循环判断逗号的位置
for n=0 to len(s)
判断逗号的位置
截取数据 mid(s,1，n)
得到第一个数
同样的方法可以从后面用right截取后面的数，剩余的是中间的数 数的顺序自己排以下
在这个程序里面主要用的函数 left,right,mid