VB6 CallByName горе - PullRequest
       28

VB6 CallByName горе

0 голосов
/ 28 июня 2010

Я хочу сделать CallByName для некоторых сабвуферов, но я просто не могу заставить его работать.

Все идет хорошо, пока исполнение не достигнет CallByName, тогда у меня проблемы:

  • Всякий раз, когда я использую Me, он жалуется на ошибку компиляции
  • И если я использую frmMyServer, он говорит: «объект или метод не поддерживается»

Вопрос: Как мне это сделать?

Вот что у меня есть:

в моих 'modHandleData'

Private Sub HandleRequestScriptedNPC(...)
    ' ...
    NPCMethod = "Scripted_Npc_" & NpcNum
    CallByName Me, NPCMethod, VbMethod, NpcNum, Index
End Sub

в моем 'modScriptedNPC'

Public Sub Scripted_Npc_9(ByVal NpcNum As Long, PlayerNum As Long)
    SendOneOptionMsg PlayerNum, "NPC 9", "NPC 9 talks." & vbCrLf & "Then gives you a clue"

End Sub

1 Ответ

4 голосов
/ 28 июня 2010

Вы вызываете код в модуле , поэтому нет экземпляра Me (который существует только в классах, включая формы).Мой VB6 немного заржавел, но я считаю, что вы не можете вызывать методы в модулях, использующих CallByName, так как вам нужен объект.

...