文件名称:vb上级实验
文件大小:50KB
文件格式:DOCX
更新时间:2017-01-08 07:04:54
vb上级实验
2013年大二上学期vb实验 部分如下: 从键盘输入长方体的长宽高,求长方体的表面积 Dim Length As Integer Dim Wide As Integer Dim Hight As Integer Dim area As Integer Length = Val(InputBox("输入长方体的长:")) Wide = Val(InputBox("输入长方体的宽:")) Hight = Val(InputBox("输入长方体的高:")) area = 2 * (Length * Wide + Length * Hight + Wide * Hight) MsgBox area