تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
open file dialog
#1
مرحبا

انا لدي مشروع ويحتوي على داة open file dialog  و1 تايمر واريد اضافة شرط عند فتح نافذة open file dialog وتحديد اي شي يبدا العد في tiemr من 0 الى 11 ثانية

وبعد 11 ثانية يتوقف انا كتبت الكود التالي وناجح ولاكن المشكلة عند فتح البرنامج يحسب 11 ثانيه ويضهر اخطا



كود :
       If dlgOpen.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
           txtFile.Text = dlgOpen.FileName
           ProgressBar1.Value = 0
           Timer1.Start()
           
       End If

فهل لازم نضيف اسم الزر في الشرط ام فقط يكفي اسم الاداة
الرد
تم الشكر بواسطة:
#2
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
   Using dlgOpen As New OpenFileDialog
       If dlgOpen.ShowDialog(Me) = Windows.Forms.DialogResult.OK Then
           txtFile.Text = dlgOpen.FileName
           ProgressBar1.Value = 0
           Timer1.Start()
       End If
   End Using
End Sub

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
   Static i = 0
   ProgressBar1.Increment(ProgressBar1.Maximum / 10)
   If i = 11 Then
       Timer1.Stop()
       i = 0
       MsgBox("Timer1.Stop")
   End If
   i += 1
End Sub
الرد
تم الشكر بواسطة: dasktop , asemshahen5 , elgokr , elgokr


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة في open file dailog nnnnn 2 110 17-11-18, 06:59 PM
آخر رد: اسامه الهرماوي
  استخدام file upload montser 0 172 17-04-18, 06:41 PM
آخر رد: montser
  خطأ في Open File Dialog ibraheam 5 444 21-03-18, 12:28 AM
آخر رد: محمود صالح
  [سؤال] مشكلة عند فتح open file dialog fouadmdany 1 232 30-12-17, 10:56 PM
آخر رد: طالب برمجة
  Could not load file or assembly 'CrystalDecisions.Enterprise.Framework dfouad 1 203 28-12-17, 02:43 PM
آخر رد: طالب برمجة
  شاشة مثل dialog محمود صالح 1 232 22-12-17, 03:00 AM
آخر رد: محمود صالح
Sad ما الطريقة للتخلص من login database dialog KH_Alaswad 3 305 21-12-17, 02:25 PM
آخر رد: KH_Alaswad
  الداتابيز اكسس لما بتتحط في program file تصبح للقراءة فقط hoshosgost@yahoo.com 1 222 02-11-17, 02:18 AM
آخر رد: boudyonline
  file resource ddemed 5 357 01-08-17, 03:46 AM
آخر رد: سعود
  remove file.exe ddemed 6 529 13-07-17, 02:50 AM
آخر رد: الماجيك مسعد

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


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