не в состоянии преобразовать этот код из VB6 в vb.net - SET струнного = Новое приложение

Question

У меня есть некоторый vb6 код, который я пытаюсь использовать в своем приложении VB.NET, но я, имеющей чрезвычайно трудное время

это код из VB6 ....

Dim CurrentVersion as cApplication 

Set currentVerion = New Application 

и у меня есть функция под названием - getLatestInformation в другом классе с несколькими параметрами при выглядит следующим образом ....

GetLatestVersion(VaID As Integer, VaMode As Integer, ValueID As Integer) 

в моем vb6 приложении Я звоню ed это как это ...

currentVersion.getLatestVersion 3,4,5 

Я не могу ничего сделать, кроме DIM currentVersion как CApplication. Некоторое время с этим.

Answer 1

«Установить» больше не является ключевым словом для назначения объектов. Вместо этого вы можете сделать

Dim currentVersion As cApplication = New Application() 

или

Dim currentVersion As cApplication 
currentVersion = New Application() 

предполагая CApplication является совместимым с типом применения. Оба способа создают объект «Приложение» и присваивают его переменной currentVersion.

Вы бы затем вызвать с помощью

currentVersion.getLatestVersion(3, 4, 5) 

VB.NET сильно изменился синтаксис таким образом - вы можете получить текст, чтобы помочь вам вместе со всеми изменениями.