Страница: 1 |
Недавно начал изучать VB, помогите решить проблему. Private Sub Command1_Click() Private Sub Form_Load()
y = Text1.Text А для формулы задаваемой в Text1.Text - нужно сделать обработчик. Что-то вроде: iPos=InStr(Text1.Text,"^") <компонент1>=Mid(Text1.Text,1,iPos-1) . . . . . . и т.д. Страница: 1 |
Вопрос: График?
Добавлено: 28.01.03 09:28
Автор вопроса:
MixeR
Хочу построить простой график функции (например y=2^x+3 или другой)
На форме у меня picture1, command1, text1(ввожу в textbox
например x^2+3, но так ничего неполучается. У меня только
получается, когда я функцию записываю в код(в цикл y=x^2+3),
но хосется сделать чтобы функция считывалаяь из textboxa/
Такой код:
For x = -20 To 20
y = Text1.Text
Picture1.PSet (x, 500 - y)
Next x
End Sub
Dim x As Integer
End Sub
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа: Sergey M.
Вопросов: 9
Ответов: 68
Профиль | | #1
Добавлено: 28.01.03 12:13
в текстовом поле у тебя "строка", которую нельзя вычитать из числа. И про "х" непонятно, зачем он там объявлен, процедура то приватная, соответственно переменные, объявленные в ней, будут тока в ней работать. Объявляй этот "х" или в кнопке или в модуле формы....
Номер ответа: 2
Автор ответа: Alex&r
Вопросов: 10
Ответов: 105
Профиль | | #2
Добавлено: 28.01.03 12:39
Здесь "у" становится - string. А в Picture1.PSet (x, y) координаты должны иметь числовое значение. "Х" - объявляй здесь же, или в General Declarations.