Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: VB глючит Добавлено: 31.03.05 09:37  

Автор вопроса:  Yeputons | ICQ: 278444762 
У меня такая ситуация: блок кода присвоения переменной какого-то значения не выполняется! (при остановке после блока переменная как была нулевая так и осталась) А при отладке все о'кей. Что делать?

Ответить

  Ответы Всего ответов: 3  

Номер ответа: 1
Автор ответа:
 LamerOnLine



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #1 Добавлено: 31.03.05 09:42
Ну, код, наверное, привести...

Ответить

Номер ответа: 2
Автор ответа:
 Yeputons



ICQ: 278444762 

Вопросов: 71
Ответов: 179
 Профиль | | #2 Добавлено: 31.03.05 09:55
Private Const Sym1 = "1"
Private Const Sym2 = "255"
Private Const Sym3 = "65535"
Private Const Sym4 = "16777215"
Private Const Sym5 = "4294967295"
Private Const Sym6 = "1099511627775"
Private Const Sym7 = "281474976710655"
Private Const Sym8 = "72057594037927935"

        StrCode = "0"
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 1, 1))), Sym1))
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 2, 1))), Sym2))
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 3, 1))), Sym3))
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 4, 1))), Sym4))
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 5, 1))), Sym5))
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 6, 1))), Sym6))
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 7, 1))), Sym7))
        StrCode = Add(StrCode, Multi(CStr(Asc(Mid(AStr, 8, 1))), Sym8))

Ответить

Номер ответа: 3
Автор ответа:
 Страшный Сон



Вопросов: 46
Ответов: 848
 Профиль | | #3 Добавлено: 31.03.05 16:12
Чего-то я не видел нигде функций Add и Multi.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам