Zitat Zitat von Milchbox
Wenn das so schwer ist kannst du mir auch sicherlich sagen was das hier macht:

Code: 
Private Sub Form_Haha()
Dim p$
'
p$ = App.Path
'
If Right(p$, 1) <> "\" Then
  p$ = p$ + "\"
End If
'
If LoadFileToTB(Text1, p$ + "lol.blubb") = False Then
 MsgBox ":D.", , ":P"
End If
'
End Sub
Hf
Da Smith es uns nicht sagt, möchte ich trotzdem gerne wissen, was dieser Code bewirkt (ist zwar total Offtopic, aber warum soll es solche Gespräche hier nicht auch mal geben ^^)
Ich verstehe das irgendwie so, dass du ein sub definierst, in dem du einen Pfad in p$ lädst, ggf. ein \ anhängst und dann versuchst, den Text aus Text1 in die Datei "lol.blubb" in diesem Verzeichnis zu schreiben. Falls das missglückt, gibst du eine nichtssagende "Fehlermeldung" ":P" aus. (ich hoffe mal das stimmt annährend. Falls nicht stempel ich Basic als unintuitive Sprache ab und werde nie versuchen es zu lernen )