عرض مشاركة واحدة
منتديات طلاب وطالبات جامعة الملك عبد العزيز منتديات طلاب وطالبات جامعة الملك عبد العزيز
قديم 26-06-2010, 06:05 PM   #8

القرشي3770

جامعي

 
تاريخ التسجيل: Nov 2008
التخصص: دارة اعمال تظم معلومات
نوع الدراسة: إنتظام
المستوى: الخامس
الجنس: ذكر
المشاركات: 52
افتراضي رد: لغات برمجة شعبة ناصر شطوان

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
Dim b() As String = {"ي", "ز", "ن", " ", "ع", "س", "ي", "ر", "ي"}
For i = 0 To 7
If b(i) = " " Then
b(i) = "$"
End If
TextBox1.Text = TextBox1.Text + b(i)
Next
End Sub

هذي اجابة السؤال الثالث

 

القرشي3770 غير متواجد حالياً   رد مع اقتباس