Both wiz and I showed you how to make it multipline but you may not want to in any case. I say that because I don't think that that would be consistant with a calculator.

In any case have you thought about how you are going to solve the equations? One way to do that is to add a reference in your app to the Microsoft Script Control 1.0 and then do this

VB Code:
  1. Private Sub lblKeyEnter_Click()
  2. 'Text1.SetFocus
  3. Dim oSC As New ScriptControl
  4.    
  5.     oSC.Language = "VBScript"
  6.     Text1.Text = Text1.Text & " = " & oSC.eval(Text1.Text)
  7.  
  8.  
  9. SendKeys "{ENTER}"
  10. End Sub