vb加减乘除if语句怎么打（vb多条件if函数的使用方法）

Private Sub Option1_Click(Index As Integer) If Index = 0 Then Text3 = Val(Text1) + Val(Text2) If Index = 1 Then Text3 = Val(Text1) - Val(Text2) If Index = 2 Then Text3 = Val(Text1) * Val(Text2) If Index = 3 Then  If Val(Text2) <> 0 Then Text3 = Val(Text1) / Val(Text2) End If End Sub