Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.06.2010, 13:00   #1
Rosstarot
 
Аватар для Rosstarot
 
Регистрация: 16.06.2010
Сообщений: 7
По умолчанию Синтаксическая ошибка в VB

Не пойму, почему код не работает. На VB 6.0 все работало, перенес на VB 9.0 - перестало. Функция, грубо говоря, переводит текст из объекта Textf в значение функции f. Но в строке f=sc.Eval(sf) он почему-то принимает sc за необъявленную переменную. Any help?

Код:
 Public Function f(ByRef x As Single) As Single
        Dim sf As Object
        Dim S As Object
        Dim lx As Object
        Dim i As Short
        lx = "(" & Str(x) & ")"
        For i = 1 To Len(Textf.Text)
            S = Mid(Textf.Text, i, 1)
            
            If S <> "x" Then
                sf = sf & S
            Else
                sf = sf & lx
            End If
        Next i
        f = sc.Eval(sf)
    End Function
Rosstarot вне форума Ответить с цитированием
Старый 20.06.2010, 11:32   #2
Rosstarot
 
Аватар для Rosstarot
 
Регистрация: 16.06.2010
Сообщений: 7
По умолчанию

Haaalp, plz
Rosstarot вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Nero - ошибка драйвера DMA. ошибка CRC NecRoMat Софт 5 09.05.2012 01:29
Синтаксическая диаграмма Fataller Помощь студентам 0 09.12.2009 20:57
Это ошибка Delphi или моя ошибка??? bloodeagle Общие вопросы Delphi 3 12.11.2009 15:26
Ошибка в Аfor i:=1 to SI do. Пишит что ошибка в SI Алексей_xXx Помощь студентам 2 29.05.2009 00:09
...Ошибка 101 (net::ERR_CONNECTION_RESET): Неизвестная ошибка... infrared Помощь студентам 0 16.04.2009 17:44