Fejl håndtering i drive, dir og fil list~ kyllekylle har modtaget 10 point for dette tip Fra : kyllekylle Vist : 1590 gange Dato : 20-01-01 10:04

Har du nogensinde været ude for, at du søgte på en floppy disk eller CDRom som ikke blev fundet? Hvis ja, så ved du, at dit VB program vil gå ned. Her er løsningen Option Explicit Private Sub Drive1_Change() On Error GoTo Error_Line Dir1.Path = Drive1.Drive Exit Sub Error_Line: If Drive1.Drive = "a:" Then MsgBox "No formatted Disk on drive A:" Drive1.Drive = "c:" Else MsgBox "No Disk was found on drive " & Drive1.Drive Drive1.Drive = "c:" End If End Sub

Bedømmelse Fra : gandalf Dato : 21-01-01 09:57

Bedømmelse Fra : gandalf Dato : 21-01-01 09:57

Bedømmelse Fra : gandalf Dato : 20-01-01 15:49

Bedømmelse Fra : gandalf Dato : 21-01-01 09:57

Bedømmelse Fra : gandalf Dato : 20-01-01 15:49

Du har følgende muligheder

Eftersom du ikke er logget ind i systemet, kan du ikke lave en bedømmelse til dette tip. Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.