Code:

    lbloppgave1 = Fix(randnr)
    lbloppgave2 = Fix(randnr2)
    
    svar = CLng(lbloppgave1) / CLng(lbloppgave2)

Select Case svar
        Case 0
                If txtsvar = "" Then
                    txtsvar = "skriv svaret her"
                Else
                    If CLng(lbloppgave1) / CLng(lbloppgave2)= Fix(txtsvar) Then
                        picSvar = picSmil
                        rett = rett + 1
                        lblpoeng.Caption = rett
            
                    Else
                        picSvar = picSur
                    End If
                End If

++++
End Select

the program is should be easy math, so i don't want to get "8/10" or something like that, as it returns a desimal answer... But 4/2 is ok as thats 2.
any idees?