If e.Forms("平板单词窗口").Controls("TabControl1").SelectedIndex = 1 Then
改成
If Forms("平板单词窗口").Controls("TabControl1").SelectedIndex = 1 Then