1. Список говнокодов пользователя kempendyi

    Всего: 1

  2. VisualBasic / Говнокод #16439

    −125

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    Dim dLoadCurrent As Double
Dim strReading As String = String.Empty
Dim strTempReading As String

strReading = Space(20)

strReading = считали напряжение из устройства
strTempReading = CStr(InStr(1, strReading, vbLf, CompareMethod.Binary))
dLoadCurrent = CDbl(Left(strReading, CShort(strTempReading)))

    Супер каст.

    kempendyi, 29 Июля 2014

    Комментарии (15)