Visual Basic 10 Scientific Calculator Code | 8K |

End Class

' Clear Entry (CE) - Only clears current number Private Sub btnClearEntry_Click(sender As System.Object, e As System.EventArgs) Handles btnClearEntry.Click currentInput = "0" newEntry = True UpdateDisplay() End Sub Visual Basic 10 Scientific Calculator Code

Private Sub btnLog_Click(sender As Object, e As EventArgs) Handles btnLog.Click Try Dim result As Double = Math.Log(Convert.ToDouble(txtDisplay.Text)) txtDisplay.Text = result.ToString() Catch ex As Exception txtDisplay.Text = "Error" End Try End Sub End Class ' Clear Entry (CE) - Only