小弟有碰到问题了只有10分了 小弟创建了一个类模块,有一个过程A()然后在FORM1中这样写:dim a as class1a.a编译器提示我出错当我把代码写成:set a = class1a.a成功通过编译小弟觉得纳闷为什么这样写就行呢? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 '定义Dim obj As Class1Private Sub Command1_Click()Dim K As GetstrDim i As boolee'使用类要进行实例化Set obj = New Class1'调用方法i = obj.SetPep(K)End Sub 沒有實例化是不行的要用new關鍵字set a=new class1這樣就可以了 稍微了解一下Java或者.net这类面向对象的语言就知道怎么回事了。 vb可以调整摄像头分辨率吗 时间数据转换 请教一个用VB转换汉字成矩阵的问题,跪谢!!! 请问高手,这种效果应该怎样编程? 我用ADO连接oracle,但是速度让人无法忍受,有没有什么好的解决方法? 关于 getopenfilename 一个问题,希望有数据库高手回答~~~~~~(sql server) 大家救急! 我的VB显示不出帮助文档,F1显示没装MSDN,我下了MSDN.iso,但不知怎么装? 谁能讲讲做群发邮件的原理,有源码更好.70分相送! 明天来结帐:一active控件,可不可以不加载到工具箱里,真接调用啊? 急救!!
Dim obj As Class1Private Sub Command1_Click()
Dim K As Getstr
Dim i As boolee
'使用类要进行实例化
Set obj = New Class1
'调用方法
i = obj.SetPep(K)
End Sub
要用new關鍵字
set a=new class1
這樣就可以了