1. (2021高二上·临河期末) 输入45人的VB成绩，求出均分。

PRIVATE SUB FORM_CLICK( )

    S=0

    FOR I= 1 TO

        X=VAL(INPUTBOX(“请输入成绩”))

        

    NEXT I

    PRINT

END SUB