كود لتوليد ارقام عشوائيه
كود لتوليد ارقام عشوائيه اضف تايمر واربعه تكست بوكس وضع الكود التالى فى الفورم تحت التايمر تك وانظر للنتيجه حدد الانترفال للتايمر كما تحب
كود: Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Dim R As New Random Randomize() Dim Number As Integer Number = R.Next(20, 105) ‘ MsgBox(Number) TextBox1.Text = Number TextBox2.Text = Number TextBox3.Text = Number TextBox4.Text = Number End Sub |
الساعة الآن 10:21 AM |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Content Relevant URLs by vBSEO ©2010, Crawlability, Inc. TranZ By
Almuhajir