VB编程:定义一个Box(盒子)类,在该类定义中包括数据成员 length(长)、width(宽)和height(高);包括成员函数:构造函数New和函数volume,函数New设置盒子长、宽和高三个初始数据,函数volum

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 19:06:03
VB编程:定义一个Box(盒子)类,在该类定义中包括数据成员 length(长)、width(宽)和height(高);包括成员函数:构造函数New和函数volume,函数New设置盒子长、宽和高三个初始数据,函数volum

VB编程:定义一个Box(盒子)类,在该类定义中包括数据成员 length(长)、width(宽)和height(高);包括成员函数:构造函数New和函数volume,函数New设置盒子长、宽和高三个初始数据,函数volum
VB编程:定义一个Box(盒子)类,在该类定义中包括数据成员 length(长)、width(宽)和height(高);
包括成员函数:构造函数New和函数volume,函数New设置盒子长、宽和高三个初始数据,函数volume计算并输出盒子的体积.在main函数中,要求创建Box对象,并求盒子的体积.

VB编程:定义一个Box(盒子)类,在该类定义中包括数据成员 length(长)、width(宽)和height(高);包括成员函数:构造函数New和函数volume,函数New设置盒子长、宽和高三个初始数据,函数volum

技术不好,所以不能完全按照你的意思来答题,不知道你是不是想实现这样的结果:

1、创建一个类,将类的名称修改为:Box

2、在Box类中,加入如下代码:

Public Length As Double
Public Width As Double
Public Height As Double
Private Sub Class_Initialize()   '构建函数,给长宽高赋初值
    Length = 10
    Width = 10
    Height = 10
End Sub
Public Property Get Volume() As Double
    '因为不了解你是想用一个过程来计算体积,还是像这样计算体积并返回值
    Volume = Length * Width * Height
End Property

   

3、在其他模块中,加入如下代码来测试我们的Box类:

   

Private Sub Main()
    Dim bb As New box  '引入我们的类,并利用New关键字创建类的实例bb
    MsgBox bb.Volume   '输出初始体积:1000
       
    bb.Length = 100
    bb.Height = 5
    bb.Width = 4
    MsgBox "修改后:" & bb.Volume    '输出修改了长宽高之后的体积:2000
End Sub

 

VB编程:定义一个Box(盒子)类,在该类定义中包括数据成员 length(长)、width(宽)和height(高);包括成员函数:构造函数New和函数volume,函数New设置盒子长、宽和高三个初始数据,函数volum 定义一个Box(盒子)类,在该类定义中包括数据成员: length(长),width(宽)和height(定义一个Box(盒子)类,在该类定义中包括数据成员: length(长)、width(宽)和height(高);成员函数: 构造函数B vb(编程)定义变量为实数,怎么表示? 用JAVA语言描述一个盒子类Box,其有长宽高三个属性,并能够设置每一个盒子的长宽高和计算盒子的体积.在编写一个主类,再其主方法main()中创建一个具体的盒子,求出盒子的体积!我可能题没 VB定义函数问题我想把函数定义在一个程序里面的IF里面 .这个定义在该怎么写啊? 用vb编程在文本框输入一个三位数,单击窗体后,在窗本打印输出该数的个位数,十位数和百位数 用JAVA编写:设计并实现类Box,所包含的实例数据表示盒子的高度、宽度和厚度,一个boolean型实例数据变量full表示盒子是否装满.定义Box构造方法接收和初始化盒子的高度、宽度和厚度.每一个新 定义盒子Box类,要求具有以下成员:长、宽、高分别为x,y,z,可计算盒子体积;可计算盒子的表面积.定义盒子Box类,要求具有以下成员:长、宽、高分别为x,y,z,可计算盒子体积;可计算盒子的表 vb编程,生成N组22选5的彩票号码组(每组有不同的5个数字组成,且每个数码只能取1~22之间的数)在文本框1中输入N值,按运行按钮在列表框中显示结果程序中要定义一个通用过程,用于生成一组 设计一个算法,求实数a的绝对值(VB编程) 这是一个考题,建立类box,box的构造函数被传递了3个double值,每一个double值表示盒子的一条边长.用BOX类计算立方的体积,并存储在一个double变量中,在BOX类中包含一个成员函数 VOl( ),用来显示每个 在vb中 ,输入一个正整数,编程判断该数是奇数还是偶数. Private Sub Form_Click() Dim X As Integer输入一个正整数,编程判断该数是奇数还是偶数.Private Sub Form_Click() Dim X As Integer X = InputBox(输入一个正 “潘多拉的盒子(Pandora's box)”在英语中怎么使用?RT.急求,谢谢! 用VB编程写一个圆柱体体积的函数过程 vb编程 在画一个流程图 计算s=1^2+3^2+5^2+.+19^2的值 产生一个随机数,均匀分布,在0到100产生3000个随机数,用word输出,能保存用vb编程 vb.net定义一个函数,private a ()括号里如何定义可有可无的参数? 在vb编程中,如何表示偶数相乘的计算