مقال ١

Public Class Form1
Dim I As Integer
Dim A (3) As Integer
Dim N As String
Private Sub Button1_Click () k
N = InputBox( فضلا ادخل رقم الطالب “) End Sub
Private Sub Button2_Click() For I = 0 To 3