我有以下（简化为使这易于阅读） 第一类： Class MainWindow
Private mFile As myFile 'myFile is a class containing a bunch of stuff
Sub go()
dim editFiles as New EditFiles(mFile)
End Sub
End Class
我有一个函数为当前用户设置一个变量。变量名以模块的名称为前缀 - 基本上，应用程序的设置方式，Client是类，Server是类，Agency是类，等等。这是一个尝试创建一个系统，我们可以通过尽可能少的点击并使用其数据库中的实时数据，在200多台服务器上找到有关客户或其网站之一的任何关键信息。 功能如下： public sub setVariable(varName, varValue)
我已经查看了此处报告的ByRef错误，但仍无法找到我的方式的错误。 我有这个，其中OrderedCaseList（）是类型Variant的函数。它正确调用并按预期返回数组。 但是，当我尝试编译时，我在Join(arr...命令上得到“ByRef参数类型不匹配”。我不知道为什么... Private Sub worksheet_Activate()
Dim s As String
Dim arr
我是相当新的编程，我被告知，我应该通过使用的ByRef和BYVAL的事情，但是当我这样做，我得到一个错误说： Error 3 Method 'Private Sub Activate_Click(ByRef intIDToChange As Integer, sender As Object, e As System.EventArgs)'
cannot handle event 'Public
在传统的ASP中，我有一个对象，称之为bob。然后有一个名为name的属性，其中有let和get方法。 我有一个函数如下： sub append(byref a, b)
a = a & b
end sub
这简直让它更快文本添加到一个变量。我也有相同的prepend，只是它是a = b & a。我知道这很容易说bob.name = bob.name & "andy"，但我尝试使用上
抽象按地址的方法我有一个抽象类方法： Public Class Base_BLL
{
Public Overridable Function Persist(ByRef x As Base_BO) As Base_BO
{
}
}
Public CLass ActualBLL Inherits Base_BLL
{
}
public Class Mai