PDA

View Full Version : openfiledialog



shina jun
پنج شنبه 19 شهریور 1388, 13:39 عصر
سلام دوستان
من میخواهم یک عکس را به برنامه brows کنم و برای اینکار از یک picureboxوbuttonاستفاده کردم وکد زیر نوشتم

dim result as dialogResult
result =openfiledialog1.showdialog
picturebox1.image=image.fromfile(openfildialog1.fi lename

با این کار پنجره اپن باز میشه وعکسرا هم در پیکچر سیو میکنه اما اگر دکمه کنسل پنجره اپن را بزنم ارور میده و فکر میکنم میگه که مسیر جاری پیدا نمیکنم مشکل رو نمیفهم اگه کسی میدونه لطفا کمک کنه
ممنون

Hesamzadeh
پنج شنبه 19 شهریور 1388, 14:37 عصر
باید به این صورت بنویسی:


If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
End If

Saeed Hamed
پنج شنبه 19 شهریور 1388, 17:30 عصر
dim result as dialogResult
result =openfiledialog1.showdialog


علت اینکه شما اومدین مقدار برگشتی دیالوگ رو داخل یک متغیر نگه میدارید همین است که متوجه بشین کاربر کدوم کلید را زده است. برای این کار میتونی از یک دستور IF استفاده کنی به این صورت:



Dim result As DialogResult
result = openfiledialog1.showdialog
If result = Windows.Forms.DialogResult.OK Then
'
'Set PictureBox Image
'
End If