Problemer...!

Slet ingen der kan hjælpe???

Du mangler såmænd bare et "end" i form_unload, da programmet bliver ved med at have indtil (afhængigt af om man har hævet ellr indsat penge) 2 forms åbne selv om du lukker hovedformen:

Private Sub Form_Unload(Cancel As Integer)
Call SaveSetting("Bankbog", "1.0", "Penge", CStr(Saldo))
End
End Sub

PS: End afslutter hele programmet.

PPS: Hvis det skal laves HELT rigtigt skal du lave indrykninger for forskellige "niveauer" i programmet. Eks:

Private Sub Form_Unload(Cancel As Integer)
  Call SaveSetting("Bankbog", "1.0", "Penge", CStr(Saldo))
  End
End Sub
 
...Det giver et meget bedre overblik.

End er ikke godt at bruge hvis andre formler skal gemme noget først. Brug Unload Me i stedet for Me.Hide

Private Sub cmdOK_Click()
'Kode......
'Kode......
  Unload Me
End Sub


eller brug For Each frmName... for at lukke alle vinduer.

Private Sub Form_Unload(Cancel As Integer)
Dim frmName As Form
Call SaveSetting("Bankbog", "1.0", "Penge", CStr(Saldo))
  For Each frmName In Forms
    Unload frmName
  Next
End Sub

Lav en funktion som tjekker om der står tal i boksen.


'--- Module1 ---
Public Function TjekTal(ByVal vTekst As Variant) As Boolean
Dim i As Integer
  TjekTal = True
  For i = 1 To Len(vTekst)
    If Not IsNumeric(Mid(vTekst, i, 1)) Then
      TjekTal = False
      Exit For
    End If
  Next i
End Function
'--- Module1 ---


Private Sub cmdOK_Click()
  'If Not TjekTal(txtHaevet.Text) Then

  If Not TjekTal(txtIndsat.Text) Then
    MsgBox "Tekst boksen må kun indeholde hele tal."
    Exit Sub
  End If
'Kode......
'Kode......
End Sub

Hvis du åbner dine vinduer med ".Show 1, Me" så skal brugeren lukke det vindue før han/hun kan komme vider.


Haev.Show 1, Me

Indsaet.Show 1, Me

Mange tak...

men løser noget af det her (er det det med Unload?) det med at den ligger sig i Joblisten efter programmet er lukket...?

Hvad synes i forresten og brugerfladen?

Den er da ok :-)

Takker... :D

Er alle de problemer som soreno fandt så løst?

Begge metoder løser lige præcis det problem med joblisten. Effekten var jo netop at programmet aldrig blev lukket (rigtigt).

Ok...

Man tak begge 2!