16-12-13, 10:44 AM
(14-12-13, 08:14 PM)mamas1 كتب : هذا هو الكود كامل
فقط ألصقه في برنامجك و حاول فهمه
PHP كود :
Public Class Form1
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
'--------------- ملئ الكومبو
ComboBox2.Items.Clear()
If ComboBox1.Text = "اسياء" Then
ComboBox2.Items.Add("الصين")
ComboBox2.Items.Add("يابان")
'---------------- وضع الصورة
Dim file_name As String = Application.ExecutablePath
file_name = file_name.Substring(0, file_name.LastIndexOf("\bin")) & _
"\Map Asia.png"
'-------------- على أساس أن Map Asia.jpg هو إسم صورة خريطة آسيا و موجود في مجلد البرنامج
' Load the picture into a Bitmap.
Dim bm As New Bitmap(file_name)
PictureBox1.Image = bm
PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage
End If
End Sub
End Class
أنظر مرفق مثالك بعد التعديل
اللهمّ بعلمك الغيب وقدرتك على الخلق، أحييني ما علمت الحياة خيراً لي، وتوفّني ما علمت الوفاة خيراً لي.

