编写VB程序，实现如下功能：单击“计算”按钮，在列表框List1中产生10个[1，99]随机数，文本框Text1显示相邻两个数字之间相差最大的差值。运行界面如图所示。

（1）窗体上，“计算”按钮的对象名是_____。
（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private sub cmd1_click( )
Dim b(1 to 10) as integer
Dim I as integer,max as integer ,a as integer, c as integer
Max=0
For i=1 to 10
Randomize
A=int(rnd*99)+1
_______________________
List1.additem  str(a)
Next i
For  i=2 to 10
C=________________
If c>max then __________________
Next I
____________________________
End sub