下列程序的功能是：用Array函数建立一个含有8个元素的数组，然后查找并在文本框Text l中输出该数组中各元素的最小值。请填空。
Option Base 1
Private Sub Command1_Click()
Dim arr1()
Dim Min As Integer,i As Integer
Arr1=Array(12,435,76,-24,78,54,866,43)
Min=______
For i=2 To 8
If arr1(i)＜Min Then______
Next i
Text1=Min
End Sub

某未知化合物，其分子式为C₁₀H₁₀O。已测定它的紫外吸收光谱、红外光谱（KBr压片）以及核磁共振谱，如下页图所示。确定该化合物结构。