Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim i As Integer
Dim scores(20) As Double
Dim avg As Double
Dim count As Integer
avg = 0
For i = 1 To 20
scores(i) = CDbl(InputBox("请输入第" & i & ...