Ошибка переполнения при рисовании на PictureBox - VB
Формулировка задачи:
Всем привет, помогите разобраться с кодом. Постоянно выдает ошибку overflow.
Заранее спасибо!
Указывает на ошибку в строке
Picture1.PSet (x0 + i * k, y0 + y * k)
Решение задачи: «Ошибка переполнения при рисовании на PictureBox»
textual
Листинг программы
Private Sub Command1_Click() Picture1.Cls For x = 1 To 20 Step 0.005 If Abs(x - 4) > 0.0000001 Then y = (x + 8) / (x - 4) Picture1.PSet (x, y) Debug.Print y End If Next End Sub Private Sub Command2_Click() End End Sub Private Sub Form_Load() Picture1.Scale (0, 15)-(30, -15) End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д