سلام دوستان من یک برنامه ای نوشتم که وقتی کاربر به اشتباه مثلا یک نام دیگری رو توی Filename وارد می کنه و فراخوانی میکنه ارور میده و از برنامه خارج میشه لطفا کمکم کنین تا این مشکل رو حل کنم
Untitled.jpg
سلام دوستان من یک برنامه ای نوشتم که وقتی کاربر به اشتباه مثلا یک نام دیگری رو توی Filename وارد می کنه و فراخوانی میکنه ارور میده و از برنامه خارج میشه لطفا کمکم کنین تا این مشکل رو حل کنم
Untitled.jpg
لطفا بیشتر توضیح بدین
یه تیکه کد لااقل بزارین ببینیم موضوع چیه اصلا
خوب وقتی اون فایل تو این مسیر نباشه ارور میده ها
اینو بزار بالای کدت ارور نده
On Error Resume Next
Private Sub Command7_Click()
Dim sFile As String
With CD1
.DialogTitle = "ÇäÊÎÇÈ ÊÕæíÑ ÑÇåäãÇ"
.CancelError = False
'ToDo: set the flags and attributes of the common dialog control
.Filter = "Picture (*.JPG)|*.JPG"
.ShowOpen
If Len(.FileName) = 0 Then
Exit Sub
End If
sFile = .FileName
Label69.Caption = CD1.FileName
End With
End Sub
Private Sub Label69_Change()
Image3.Picture = LoadPicture(Label69.Caption)
End Sub
داداش کدت تویسیستم من داره کار میکنه قشنگ عکس لود میشه.
اگه میتونی به تلگرامم پیام بده بتونم با تیم ویور بیام تو سیستمت مشکلو از نزدیک ببینم
@AmvajAbi
سلام دوست عزیز شما دو راه داری
اول اینکه همونطور ک دوست عزیزمون گفتن با کد on error resume next از خارج شدن برنامه جلوگیری کنی
یا اینکه براش یک کد خطا تعریف کنی ک خارج نشه از برنامه
دوم اینکه با استفاده از تابع API به اسم File system object استفاده کنی و قبل از اینکه بخوای عکس رو لود کنی
اصلا چک کنی ببینی همچنین فایلی وجود داره یا نه
موفق باشی
سلام دوست عزیز من از کد on error resume next استفاده کردم حتی دوست عزیزمونم دیدن تو کامپیوتر ایشون با وجود این کد ارورنمیده ولی تو سیستم من ارور میده حتی من ویژوال بسیک رو حذف کردم و دوباره نصب کردم نشد و حتی نسخه اصلی ویژوال استدیو 6 رو نصب کردم بازم ارور میده نمی دوم مشکل ارور کجاست
سلام
دلیل رو تو تاپیک زیر که ایجاد کردین توضیح دادم
https://barnamenevis.org/showthread.p...=1#post2364579
آخرین ویرایش به وسیله vbhamed : دوشنبه 11 اردیبهشت 1396 در 11:01 صبح
اگر من و شما هر كدوم يك چيز ياد داشته باشيم و به هم ياد بديم، حالا هر كدوم دو تا چيز ياد داريم ! http://www.ArminaCo.com
سلام
لینک تو همون پست اصلاح شد
اگر من و شما هر كدوم يك چيز ياد داشته باشيم و به هم ياد بديم، حالا هر كدوم دو تا چيز ياد داريم ! http://www.ArminaCo.com