修改 VB 程序,使其具有下列功能:程序启动运行在文本框上显示 20 个 [10 , 99] 的随机整数。单击“素数个数”按钮,在标签 3 上显示出素数数列及标签 4 上显示素数个数。单击“平均数”按钮,在标签 4 上显示出此数列的平均数。运行效果如图 515-1 、图 515-2 所示。 打开 工程文件 5 15 .vbp ,完成下列操作: (1) 加载窗体时, 初始界面如图 515-1 所示 。 (2) 单击 “素数个数”按钮,在文本框 2 中显示素数 ; (3) 单击 “平均数”按钮,在标签 4 上显示平均值。 根据以上要求,完成下列程序。 Dim a%(1 To 20), k% Private Sub Command1_Click() Dim x%, f% For i = 1 To 20 f = 0 For j = 2 To a(i) - 1 If a(i) Mod j = 0 Then f = 1: Exit For End If Next j If f = 0 Then ___'(1) a(k) = a(i) If k = 1 Then Label3.Caption = a(k) Else Label3.Caption = ______ ' (2) End If End If Next i Label4.Caption = ______ ' (3) End Sub Private Sub Command2_Click() Dim s% Dim ______ ' (4) For i = 1 To k s = s + a(i) Next i pj = ______ ' (5) Label4.Caption = _____' (6) End Sub Private Sub Form_Load() Randomize For i = 1 To 20 a(i) = ______ ' (7) Text1.Text = Text1.Text & ______ ' (8) Next i End Sub