Berechnen von Pi VB-Version:  VB5, VB6
	Views:  15.270

Sicher kennen Sie alle diese Zahl, genannt Pi. Im Allgemeingebrauch wird siemit dem Wert 3,14 angegeben, der natürlich nicht stimmt, da diese Zahlüberhaupt nicht endet. Wie berechnet man nun Pi in VB? Das geht mit der  Atn-Funktion.

Um es auszuprobieren benötigen Sie eine Form, 1 Label und ein CommandButtonsowie diesen Code:

Private Sub Command1_Click()
  Dim Pi
  Pi = 4 * Atn(1)
  Label1.Caption = Pi
End Sub

Starten Sie Ihr Projekt und klicken Sie den CommandButton an. Sie erhalten imLabel jetzt die Anzeige 3,14159265358979. Für die meisten Zwecke dürfte diesausreichen.