A.Typepestudl no As Integer name As String score(1 To 3)As Single End Type B.Typestudl no As Integer no As Integer name As String*10 score()As Single End Type C.Typestudl no As Integer name As String*10 score(1 To 3)As Single End Type D.Typestudl no As Integer name As String score(1 To 3)As Single End Type