晕撒,第一天用vb,不会实例化对象,求助

2005-03-16 08:55:56 183 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Coursera | 离散数学概论（北大）| quiz答案 Coursera离散数学概论quiz答案Week1:数理逻辑：基本概念Week2:数理逻辑：命题逻辑及形式系统Week3:数理逻辑：谓词逻辑及形式系统Week4:集合论：集合代数先放下Coursera上找的离散数学部分相关课程： btw.线上学习拿证书还有很多，MOOC、edm等都可。博主选了北京大学离散数学概论Discrete Mathematics Generality。Mooc上貌似也有，但是上课时间貌似不如Coursera灵活，Coursera时间自己调度，规定时间上完即可。目前课阅读详情

一直用vc,设计了个stack类,确不知道怎么去用它
帮帮我啊
我只会写dim mystack as stack
是不是根本就没有对象啊?
msdn说用set语句,可我到哪去找那个对象啊?

怀念c++的new

...全文

GD32F427移植LiteOS-M实战：如何快速复用官方Demo进行二次开发本文详细介绍了如何在GD32F427开发板上移植LiteOS-M操作系统，通过复用OpenHarmony官方Demo快速构建RTOS工程。文章涵盖环境搭建、芯片配置迁移、中断向量表处理和外设驱动适配等关键步骤，并提供了调试技巧和二次开发进阶建议，帮助开发者高效完成移植工作。阅读详情

aresfe

VB基础类 7,788 成员 197,583 内容

+ 关注 + 加入社区

切换为时间正序

aresfe 2005-03-19

打赏
举报

传参问题........

kofboyx 2005-03-16

打赏
举报

老大，亏你还是学C++的。
你怎么在
Form_Load里面Dim ite As stack呀，
这不是等于在c++的一个类的一个成员函数中声明了一个stack* ite吗？
请问，你在另一个成员函数中如何访问这个ite
Command1_Click和Form_Load都是Form的成员函数（或者过程，和c++的void函数差不多）
而且， c++的stack* ite;ite = new stack;是在堆中，一直存在，而vb中Dim ite As stack = New stack虽然也是在堆中，可是vb中，所有的对象都会在最后一个引用（是一种智能指针）被释放时被收回内存，所以当程序运行完Form_Load的时候，ite对象已经被析构，而且即使不析构，ite是Form_Load的一个局部变量，怎么能被另一个成员函数Command1_Click访问？
幸好我是个从C++熟手转过来的长期使用VB的程序员，要不然你这个问题，真的搞不清。

aresfe 2005-03-16

打赏
举报

//class stack
Private var(50) As Integer
Private count, temp As Integer

Public Function pop()
If count! = -1 Then
count = count - 1
End Function

Public Function push(a As Integer)
If count! = 49 Then
count = count + 1
var(count) = a
End Function

Public Function top()
If count! = -1 Then
top = var(count)
End Function

Public Function emp()
If count = -1 Then
emp = 1
Else: emp = 0

End Function

Public Function stack()
For count = 0 To 49
var(count) = 0
Next
count = -1
End Function
//in my function
Private Sub Form_Load()
Dim ite As stack
Set ite = New stack
End Sub

Private Sub Command1_Click()
ite.push (i)
i = i + 1
End Sub

为什么还是不可以啊???

lsftest 2005-03-16

打赏
举报

Set 语句

将对象引用赋给变量或属性。

语法

Set objectvar = {[New] objectexpression | Nothing}

Set 语句的语法包含下面部分：

部分描述
objectvar 必需的。变量或属性的名称，遵循标准变量命名约定。
New 可选的。通常在声明时使用 New，以便可以隐式创建对象。如果 New 与 Set 一起使用，则将创建该类的一个新实例。如果 objectvar 包含了一个对象引用，则在赋新值时释放该引用。不能使用 New 关键字来创建任何内部数据类型的新实例，也不能创建从属对象。
objectexpression 必需的。由对象名，所声明的相同对象类型的其它变量，或者返回相同对象类型的函数或方法所组成的表达式。
Nothing 可选的。断绝 objectvar 与任何指定对象的关联。若没有其它变量指向 objectvar 原来所引用的对象，将其赋为 Nothing 会释放该对象所关联的所有系统及内存资源。

说明

为确保合法，objectvar 必须是与所赋对象相一致的对象类型。

Dim、Private、Public、ReDim以及 Static 语句都只声明了引用对象的变量。在用 Set 语句将变量赋为特定对象之前，该变量并没有引用任何实际的对象。

下面的示例说明了如何使用 Dim 来声明 Form1 类型的数组。Form1 实际上还没有实例。然后使用 Set 将新创建的 Form1 的实例的引用赋给 myChildForms 变量。在 MDI 应用程序中可以使用这些代码来创建子窗体。

Dim myChildForms(1 to 4) As Form1
Set myChildForms(1) = New Form1
Set myChildForms(2) = New Form1
Set myChildForms(3) = New Form1
Set myChildForms(4) = New Form1

通常，当使用 Set 将一个对象引用赋给变量时，并不是为该变量创建该对象的一份副本，而是创建该对象的一个引用。可以有多个对象变量引用同一个对象。因为这些变量只是该对象的引用，而不是对象的副本，因此对该对象的任何改动都会反应到所有引用该对象的变量。不过，如果在 Set 语句中使用 New 关键字，那么实际上就会新建一个该对象的实例。

晕撒,第一天用vb,不会实例化对象,求助

相关推荐