Looks great!
Two tips:
1. Users with WM6 devices should use the Serial2 library instead (no nead for any other dll).
2. Instead of all the Button??_Click subs you could do something like:
Code:
Sub App_Start
...
For i = 3 to 75
AddEvent("Button" & i,Click,"KeyPad")
Next
End Sub
Sub KeyPad
serial.Output (sender.Text)
label1.Text = strlabeltemp & sender.Text
End Sub