08-01-20, 11:49 PM
(آخر تعديل لهذه المشاركة : 08-01-20, 11:51 PM {2} بواسطة محمد مسافر.)
(08-01-20, 12:25 PM)asemshahen5 كتب : ضع متغيير من نوع انتجر في السيتنغ و اكتب الكود التالي في حدث تحميل الفورم :
PHP كود :
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim lines() = My.Resources.textfile.Split(vbNewLine)
If My.Settings.HekmaID >= lines.Count Then
My.Settings.HekmaID = 0
My.Settings.Save()
End If
Dim hekma = lines(My.Settings.HekmaID)
TextBox1.Text = hekma
My.Settings.HekmaID = My.Settings.HekmaID + 1
My.Settings.Save()
End Sub
هل ممكن تطبيق ذلك على المرفق اذا امكن لااني جربت الطريقه وطلع لي خطا في الكود بحسب الخطوات
اللهمّ بعلمك الغيب وقدرتك على الخلق، أحييني ما علمت الحياة خيراً لي، وتوفّني ما علمت الوفاة خيراً لي.

