vb.net_FIBRONIC_SERIES_BY

Web Site Devloped By Abhishek Mishra
Tech. Help By Anand Mishra
Contact no. 9425355631
Powerd by Shree Guru Kripa Computer

vb.net_FIBRONIC_SERIES_BY_WHILE Program

This is vb.net_FIBRONIC_SERIES_BY_WHILE Program.You set a Gap of Number.

Public Class Form1
Dim A, B, C As Byte
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
A = 0
B = 1
ListBox1.Items.Add(A)
ListBox1.Items.Add(B)
While C < 10
C = A + B
ListBox1.Items.Add(C)
A = B
B = C
End While
End Sub
End Class