编译错误:块IF没有END IF

来源：百度知道编辑：UC知道时间：2024/07/04 13:38:53

Private Sub Timer1_Timer()
If (flag - 3) = 0 Then
flag = 0
Else
If flag = 0 Then
Image4.Picture = Image1.Picture
Else
If flag = 1 Then
Image4.Picture = Image2.Picture
Else
If flag = 2 Then
Image4.Picture = Image3.Picture
End If
flag = flag + 1
End If
End Sub

Private Sub Timer1_Timer()
If (flag - 3) = 0 Then
flag = 0
Else
If flag = 0 Then
Image4.Picture = Image1.Picture
Else If flag = 1 Then
Image4.Picture = Image2.Picture
Else If flag = 2 Then
Image4.Picture = Image3.Picture
End If
flag = flag + 1
End If
End Sub

Private Sub Timer1_Timer()
If (flag - 3) = 0 Then
flag = 0
Else
If flag = 0 Then
Image4.Picture = Image1.Picture
Else
If flag = 1 Then
Image4.Picture = Image2.Picture
Else
If

编译错误:块IF没有END IF 块if没有end if什么问题？？？在Excel中用vb编辑宏有问题，请高手帮忙，系统显示没有End If块 vb高手看一下这十几行源码，为什么一执行就显示：“编译错误：end select没有select case” C++编译错误 unexpected end of file found 求助 if end if -Shall I sit at this end of the boat or____ end?-If you keep still,you can sit at___ end. 关于IF 。。。THEN。。END。。IF End If什么意思 I cherish the hope that if I cling to the end,I will be amply rewarded by life