Search:

Iy would be better if you start a new thread about transparency in VB6... anyway
Here's a small VB6 project about transparent form
I think this is better than explain here

Dim intTotal1 As Integer
Dim strTotal1 As String
Dim intTotal2 As Integer
Dim strTotal2 As String

Private Sub Command1_Click()
If IsNumeric(Text1.Text) And _
IsNumeric(Text2.Text)...

The character _ means continuation line... just press Enter after _ and continue typing next line of code

Just following the example... isn't the best approach

First, in design time, to each textbox, set it's MaxLength property = 1



Dim intTotal1 As Integer
Dim strTotal1 As String
...

Dim intTotal1 As Integer
Dim strTotal1 As String
Dim intTotal2 As Integer

intTotal1 = Val(Text1.Text) + Val(Text2.Text) + Val(Text3.Text) + Val(Text4.Text) + Val(Text5.Text) +...