Hi, I am a beginner at Visual Basic 6! I am trying to make a simple program that will allow you to enter an angle, and receive the sine, cosine, and tangent values.(adsbygoogle = window.adsbygoogle || []).push({});

the code:

As you can see this is very rudimentary stuff.Code (Text):Public Class Form1

' Imports System.Math

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim A As Double = TextBox1.Text

Dim B As Double = TextBox2.Text

MsgBox((A ^ 2 + B ^ 2) ^ (1 / 2))

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

Dim A As Double = TextBox3.Text

Dim C As Double = TextBox4.Text

MsgBox((C ^ 2 - A ^ 2) ^ (1 / 2))

End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click

Dim A As Decimal = TextBox5.Text

MsgBox("cos" & " " & Math.Cos(A))

MsgBox("sin" & " " & Math.Sin(A))

MsgBox("tan" & " " & Math.Tan(A))

End Sub

End Class

The first part of the code is for the Pythagorean Theorem knowing A and B, or AorB and C.

The second part will give me the sine, cosine and tangent of an angle in a message box in decimal form.

The questions I have:

Is there a command that will make the answers appear in fraction form? I am assuming this will replace the "As Decimal" but I can't find anything in the book I have or on the microsoft website.

Are there inverse sine, cosine and tangent commands? So I can turn the fraction back into the angle (in radians or degrees)

Please forgive me if it is very simple! I am still learning!

**Physics Forums | Science Articles, Homework Help, Discussion**

Dismiss Notice

Join Physics Forums Today!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

The friendliest, high quality science and math community on the planet! Everyone who loves science is here!

# Visual Basic Help

**Physics Forums | Science Articles, Homework Help, Discussion**