Private Sub Command1_Click()

    Timer1.Enabled =      ①    

End Sub

Private Sub Timer1_Timer()                 

    sec = Val(Text2.Text)

    min = Val(Text1.Text)

If sec> 0 Then

    sec = sec - 1

Else

    sec = 59                           

If min > 0 Then                            

    min = min - 1

Else

   Text1 = 0

   Text2 = 0

MsgBox "倒计时时间到"

End If

End If

Text1 = min

Text2 = sec

End Sub

①人们保护环境的意识不强               ②治理雾霾难以实现

③人们的思想道德素质有待提高       ④我国法治不健全

____和____，统称聚落。

读等高线图，图中可以发育为河流的是（　　）

下列各组词语中，没有错别字的一组是（     ）