تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
هل من الممكن ان تعدلو لي هدا الكود
#1
هدا الكود يعمل مع :listbox
انا اريد ان اجعله يعمل مع :combobox
Imports DMSoft
Public Class Form1
Public SkinOb As DMSoft.SkinCrafter

Dim App_Path As String = New System.IO.FileInfo(Application.ExecutablePath).DirectoryName & "\skins\"
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Dim di As New IO.DirectoryInfo(App_Path)
Dim diar1 As IO.FileInfo() = di.GetFiles()
Dim dra As IO.FileInfo

'list the names of all files in the specified directory
For Each dra In diar1

Dim search, where
search = ".skf"
where = InStr(dra.Name, search)

If where Then
ListBox1.Items.Add(dra)
End If

Next



End Sub
Public Sub New()
DMSoft.SkinCrafter.Init()
SkinOb = New DMSoft.SkinCrafter
'These function parameters are used for Skincrafter DEMO
SkinOb.InitLicenKeys("SKINCRAFTER", "SKINCRAFTER.COM", "support@skincrafter.com", "DEMOSKINCRAFTERLICENCE")
SkinOb.InitDecoration(1)
InitializeComponent()
End Sub

Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
SkinOb.LoadSkinFromFile(App_Path & ListBox1.Text)
SkinOb.ApplySkin()
End Sub


End Class
الرد
تم الشكر بواسطة:
#2
[HTML]
بدلا من
listbox.items.add(dra)


combobox.items.add(dra)


[/HTML]
الرد
تم الشكر بواسطة: mohammed moh


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ما الخطاء فى هذا الكود new_programer 3 47 منذ 6 ساعة مضت
آخر رد: حريف برمجة
  [VB.NET] تعديل بسيط في الكود :) مجهول 5 140 أمس, 08:18 PM
آخر رد: elgokr
Photo اين الخطأ في الكود لو سمحتم samira20 6 137 01-12-18, 01:55 PM
آخر رد: asemshahen5
Photo اين الخطأ في الكود لو سمحتم samira20 0 49 30-11-18, 11:08 AM
آخر رد: samira20
  [سؤال] ما الخطأ في الكود التالي اسامه الهرماوي 2 88 23-11-18, 05:52 PM
آخر رد: Rabeea Qbaha
  حل مشكلة هذا الكود imam_boune 2 84 23-11-18, 02:13 PM
آخر رد: imam_boune
  [سؤال] ما الخطأ في هذا الكود اسامه الهرماوي 3 104 21-11-18, 02:05 AM
آخر رد: اسامه الهرماوي
  مشكلة في الكود salahmax12 4 180 08-11-18, 08:36 PM
آخر رد: salahmax12
  محتاج مساعدة فى كتابة الكود احمد خطاب 6 168 06-11-18, 09:21 PM
آخر رد: احمد خطاب
  سؤال في الكود مهم لو سمحتم احمد خطاب 14 280 05-11-18, 06:57 PM
آخر رد: احمد خطاب

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم