LongArray上的VB6联接在windows更新后出现类型不匹配错误
在windows更新时,VB6中的联接运算符引发类型不匹配错误 我的vb6 jtTaskBO类具有以下属性:LongArray上的VB6联接在windows更新后出现类型不匹配错误,vb6,Vb6,在windows更新时,VB6中的联接运算符引发类型不匹配错误 我的vb6 jtTaskBO类具有以下属性: Friend Property Set PredecessorOffsets(ByVal Offsets As LongArray) mPredecessorOffsets.Assign Offsets End Property Public Property Get PredecessorOffsets() As LongArray Set PredecessorOf
Friend Property Set PredecessorOffsets(ByVal Offsets As LongArray)
mPredecessorOffsets.Assign Offsets
End Property
Public Property Get PredecessorOffsets() As LongArray
Set PredecessorOffsets = mPredecessorOffsets
End Property
我的代码已经运行了多年,但今天我不得不修改它,如下所示
Private Function GetPredecessorsDisplay(bo As jtTaskBO)
On Error GoTo error_handle:
' This used to work
' GetPredecessorsDisplay = Join(bo.PredecessorOffsets, ", ")
' replaced by the following
Dim s As String
s = ""
If Not IsNull(bo.PredecessorOffsets) Then
If (bo.PredecessorOffsets.Count > 0) Then
Dim i As Integer
Dim n As Integer
n = bo.PredecessorOffsets.Count - 1
For i = 0 To n
If i <> 0 Then s = s & ", "
s = s & bo.PredecessorOffsets(i)
Next
End If
End If
GetPredecessorsDisplay = s
exit_point:
Exit Function
error_handle:
MsgBox Error$
Resume exit_point
End Function
用户还报告了Windows 7的问题
有没有办法在不发布版本的情况下解决这个问题
我看到在或中提到了VB6
[更新]
我更新到版本1903构建18362.295,但问题仍然存在
是否有通过向Microsoft报告的官方渠道?如果与此相关,您可以等待Microsoft的修复。您确定VB6标记是正确的标记吗<代码>长数组在我的VB6中不是可识别的数据类型。可能是VBA吗?@Kaniu谢谢你。我还遇到了param数组问题。正如Hel O'Ween已经说过的,LongArray不是原生VB6数据类型。我猜,有一个外部引用指向某种被windows update破坏的库。要检查这一点,可以使用文本编辑器打开VBP文件。然后查找以“Reference=”或“Object=”开头的所有行,并验证引用的文件是否确实存在。祝你好运!:)如果与此相关,您可以等待Microsoft的修复。您确定VB6标记是正确的标记吗<代码>长数组在我的VB6中不是可识别的数据类型。可能是VBA吗?@Kaniu谢谢你。我还遇到了param数组问题。正如Hel O'Ween已经说过的,LongArray不是原生VB6数据类型。我猜,有一个外部引用指向某种被windows update破坏的库。要检查这一点,可以使用文本编辑器打开VBP文件。然后查找以“Reference=”或“Object=”开头的所有行,并验证引用的文件是否确实存在。祝你好运!:)
Windows 10 version 1809 Build 17763.678