السؤال الخامس في امتحان بني سويف

[el3andleeb]

Function cube ( ByVal n As integer ) as integer
Dim r As integer
r= n*n*n
Return r
End Function

Private Sub cube_btn_Click(sender As Object, e As EventArge) Handles cube_btn_Click
rslt.Text= cube (5
End Sub

1- في الدالة cube حدد اسم المتغير الذي سوف يتم ارجاع القيمة المخزنة بداخله

2 - عند النقر على الزر cube_btn حدد القيمة التي ستمرر للدالة cube

3 - عند النقر على الزر cube_btn واتفيذ الدالة cube حدد القيمة التي ستظهر داخل الأداة rslt