/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Error ?
Fra : Preben Jensen


Dato : 23-09-01 12:55

Jeg får en fejlmeddelelse som lyder:
[Run-time error '5'
Invalid procedure call or argument]
på nedenstående eksempel.
Hvis jeg ikke indtaster noget i det første felt,
men indtaster jeg noget først så får jeg ikke
en error !?

Det skal lige indskydes at når jeg tester
programmet i VB inden jeg laver exe-filen så
er der ingen errors!
Er der en der kan hjælpe mig videre?

Option Explicit
Private Sub Command1_Click()
Text3 = 1 * Text1 + Text2
End Sub

Private Sub Form_Load()
End Sub

Private Sub Text1_LostFocus()
If Not IsNumeric(Text1) Then
Text1.SetFocus
MsgBox "indtast tal!"
Text1 = ""
End If
End Sub

Private Sub Text2_LostFocus()
If Not IsNumeric(Text2) Then
Text2.SetFocus
MsgBox "indtast tal!"
Text2 = ""
End If
End Sub

--
Preben Jensen
www.pdcs.dk
preben@NOSPAMpdcs.dk
fjern NOSPAM



 
 
Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408847
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste