Zitat Zitat von Smith128FX
Basic: 100% //Soooo schwer
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