• Home
 · 
• Math/Dates
 · 
• Using Variant in VB 5.0 carefully

Using Variant in VB 5.0 carefully

Using Variant in VB 5.0 carefully

API Declarations


following codes to find that root. I don't get it in VB 5.0 but in VB 6.0 I can.



Rate Using Variant in VB 5.0 carefully

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

a = 0
b = 1
While (b - a) >= 0.00000001
    x = (a + b) / 2
    fx = x ^ 3 - 3 * x + 1
    If fx > 0 Then a = x Else b = x
Wend
x = (a + b) / 2  ' x is the root