Vill med följande sats (cmdSök) testa om en textbox innehåller data och om den gör det ska den anropa en annan procedur, om den inte innehåller data ska den gå vidare till nästa textbox och kolla om den innehåller data osv. <code> Vill göra dig uppmärksam på att det är skillnad på isNull och en tom sträng. Man ser inte skillnad på om det är Null eller en tom text. En textruta uppfattas alltid som en tom text, alltså en sträng "".testa om en textbox är tom eller ej och anropa iså
Vad som händer är att den anropar proceduren vare sig det finns ett värde i textboxen eller ej. Har innan jag kört koden tömt alla textboxar så det är inte problemet
Gör jag en test med hjälp av följande värde returnerar den 1 om den innehåller värde och 2 om den inte innehåller värde så den funkar i det sammanhanget men inte när jag ska anropa en annan procedur.
Private Sub cmdtest_Click()
Dim test As Integer
If Not IsNull(txtFnamn.Text) Then
test = 1
Else
test = 2
End If
intMedd = MsgBox(test)
End Sub
Har även testat med If Not IsNull men det är samma problem då.
Private Sub cmdSök_Click()
i = 0
n = lstNamn.ListCount
If IsNull(txtFnamn.Text) = False Then
Call FyllFnamn
Else
End If
If Not IsNull(txtEnamn.Text) Then
Call FyllEnamn
Else
End If
If Not IsNull(txtAdress.Text) Then
Call FyllAdress
Else
End If
If Not IsNull(txtPnr.Text) Then
Call FyllPnr
Else
End If
If Not IsNull(txtOrt.Text) Then
Call FyllOrt
Else
End If
End SubSv: testa om en textbox är tom eller ej och anropa
if txtFnamn.text = "" then ' textboxen tom
else 'textboxen inte tom
end if
</code>Sv: testa om en textbox är tom eller ej och anropa
I en databas kan ett fält antingen vara Null eller "". Kan vara bra att veta dessa begrepp fortsättningsvis. Har själv råkat ut för konstiga fel beroende på detta.