If (Check1) Then
Do
DoEvents
Call Track_123_Read
Text1.Text = Temp1
Text2.Text = Temp2
Text3.Text = Temp3
Form1.StatusBar1.SimpleText = "Read Success"
Loop
Else
Call Track_123_Read
Text1.Text = Temp1
Text2.Text = Temp2
Text3.Text = Temp3
End If主要是Do
DoEvents
........
Loop
怎么转换?
Do
DoEvents
Call Track_123_Read
Text1.Text = Temp1
Text2.Text = Temp2
Text3.Text = Temp3
Form1.StatusBar1.SimpleText = "Read Success"
Loop
Else
Call Track_123_Read
Text1.Text = Temp1
Text2.Text = Temp2
Text3.Text = Temp3
End If主要是Do
DoEvents
........
Loop
怎么转换?
begin
DoEvents
Call Track_123_Read
Text1.Text = Temp1
Text2.Text = Temp2
Text3.Text = Temp3
Form1.StatusBar1.SimpleText = "Read Success"
end
我觉得是
if thenelseend if是一个结构
doloop是一个结构,但是我觉得少了个布尔类型的条件