Учи по съвременен език там нещата са много по прости. Ето как се решава твоята задачка във Visual Basic 6.0
http://programirane.bivaood.com/primeri/forumDev/1/1.jpg
Товае целия сорс:
Private Sub Command1_Click()
Text2.Text = "" 'Почистваме Text2 от предишни изчисления
n = Text1.Text 'Въвеждаме си проста променлива, за да пишем по-лесно математическия израз, но това не е задължително
On Error GoTo dolu ' Манипулатор на грешка, който реално извършва и валидирането на входните данни
Text2.Text = (n + 4) / (n - 4) ' Визуализираме изчисления резултат, ако е възможен
Exit Sub ' Излизаме от процедурата
dolu: 'Етикет за скок при грешка и невъзможност да се извърши математичната операция
MsgBox "Некоректни входни данни", vbCritical, "Пример за проста валидация" ' Съобщение
End Sub
Предполагам си представяш в една сложна програма какво ще се случи, ако започнеш с цикли да проверяваш и валидариш всяка входна данна. Затова в програмирането се използват прости манипулатори на грешка. Аз съм ти дал един прост пример за подобен манипулатор. В общия случай са няколко, като самия процес на отстраняване на възможни грешки се нарича настройка на програмата. Това е много отговорен момент при създаване на една програма, защото при грешка програмата ще затвори, ако грешката не е манипулирана, тоест предвидена. В общия случай времето за създаване на една истинска програма се разделя на 3. Една трета от времето отива за написване на реалния сорс, който реализира идеята ти. Една трета отива и за изработване на картинките и дизайна, тоест как да изглежда програмата и последната една трета отива за настройка на програмата, тоест при натискане на даден бутон, кой да се покаже, какво да се скрие и каква грешка може да се получи.
Ето линк и към самото проектче, вътре има и компилирано ехе, сам да провериш дали програмата решава твоята проста задачка:
http://programirane.bivaood.com/primeri/forumDev/1/1.rar