28-06-13, 07:46 PM
كود :
Dim Types As String = ".jpg.png"
If Types.Contains(Path.GetExtension) Then
Dim information = My.Computer.FileSystem.GetFileInfo("C:\MyFile.jpg")
MsgBox("The file's full name is " & information.FullName & ".")
End If
هذا الكود اذا كان صيغة الملف jpg او png يتم تنفيز العملية