+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم امثلة ومشاريع VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=188)
+--- الموضوع : [مشروع] توليد ارقام جوال عشوائية والسبب داخل (/showthread.php?tid=36810)
توليد ارقام جوال عشوائية والسبب داخل - سعود - 31-10-20
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله و بركاته
وجدت الحاحا (يعني اصرارا
) في اليوتيوب في تعليق على شرح اعقد من هذا المثال يطالبون صاحب الشرح بالمثال فاحببت - (مع اني لم اذكر لهم شيء لكن .....)
) في اليوتيوب في تعليق على شرح اعقد من هذا المثال يطالبون صاحب الشرح بالمثال فاحببت - (مع اني لم اذكر لهم شيء لكن .....)
- ان اجهز مثال لعل وعسى يجده اي مبتديء او حتى محتاج.
تحياتي
نسيت موضوع تصدير الارقام لكن سهلة زر امر باي مكان وضمن حدثه الاولي الكود التالي:
PHP كود :
Dim sfd As New SaveFileDialog
Dim alln As String = ""
Dim m As Integer
For m = 0 To ListBox1.Items.Count - 1
alln &= ListBox1.Items(m).ToString & vbNewLine
Next
If sfd.ShowDialog = DialogResult.OK Then
My.Computer.FileSystem.WriteAllText(sfd.FileName, alln, False)
End If