اقتباس:
المشاركة الأصلية كتبت بواسطة almsry
صمم برنامج يعرض جدول ضرب ال3,4,6,9 باستخدام الاجراء sub
|
إن كنت فهمتك صح .... خد الكود ده ....
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
() ali
End Sub
ــــــــــــــــــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــــــــــــــــــــــــــــ ــــــــــــــــــــــــ
() Sub ali
Dim x As Integer = 1
"" = Me.Label1.Text
"" = Me.Label2.Text
"" = Me.Label3.Text
"" = Me.Label4.Text
For x = 1 To 12
Me.Label1.Text = Me.Label1.Text & x & "x" & 3 & "=" & 3 * x & vbCrLf
Me.Label2.Text = Me.Label2.Text & x & "x" & 4 & "=" & 4 * x & vbCrLf
Me.Label3.Text = Me.Label3.Text & x & "x" & 6 & "=" & 6 * x & vbCrLf
Me.Label4.Text = Me.Label4.Text & x & "x" & 9 & "=" & 9 * x & vbCrLf
Next
End Sub
End Class