Int to UInt

[Joo]

Народ подскажите есть в VB.NET какая нить функци переводящая Int в UInt???
В C# достаточно написать

Код: Выделить всё

uintVar = (uint) IntVar

В VB.NET такое не проканает

Код: Выделить всё

UIntVar = CUInt(IntVar)

так тоже

Код: Выделить всё

UIntVar = DirectCast(IntVar, UInt32)

Ошибка: Переполнение в результате выполнения арифметической операции.
Я в принципе знаю откуда у этой ошибки растут ноги, но блин неужели не придумали перевода знакового в беззнаковое в VB
Приходится делать так

Код: Выделить всё

UIntVar=UInt32.MaxValue * -CInt(IntVar< 0) + IntVar + 1

[MIT]

Замечательно все работает:

Код: Выделить всё

        Dim i As Integer = 100
        Dim ui As UInteger = 100
        MsgBox(CInt(ui))
        MsgBox(CUInt(i))

Если тебе надо абсолютное число, то примерно так:

Код: Выделить всё

        Dim i As Integer = -100
        MsgBox(CUInt(i - Integer.MinValue))

Или я не понял задачи...

[Joo]

Ты не правильно понял, или просто незнаешь...
Если Int = -1, то UInt должен быть равен 4294967295, как я уже сказал C# это делает без всякого гемороя

[Nord777]

В свойствах VB-проекта отключи проверку переполнения.
В C# она отключена по умолчанию.

[Joo]

В свойствах VB-проекта отключи проверку переполнения.
В C# она отключена по умолчанию.

Спасибо!!!