【加试题】某校有100个学生的期末成绩存储在数据库中，并已经按学号升序排序，学号编号从1到100．现要求找出成绩最高的学生的得分．如果有多个符合要求的学生，只输出学号排在前面的．小吴为此编写了VB程序，程序运行时，单击按钮Command1后，在文本框Text1中输出最大成绩．实现上述功能的VB代码如下，请补全代码．
Dim a（1To 100）As Single'依次存储100个学生成绩
Const n=100
Private Sub Form_Load（　　）
'本过程从数据库中读取1到100号学生成绩，并存储在数组a中
'代码略
End Sub
Private Sub Command1_Click（　　）
Dim i As Integer,max As single
max=①

a（1）

a（1）

For i=2To n
if ②

a（i）＞maxthenmax=a（i）

a（i）＞maxthenmax=a（i）

Next i
Text1．Text=“成绩最高分是：“+Str（max）
End Sub
（1）程序中①横线处应填入

a（1）

a（1）

．
（2）程序中②横线处应填入

a（i）＞maxthenmax=a（i）

a（i）＞maxthenmax=a（i）

．