VB能帮我把每句语句的意思解释一下吗
VB能帮我把每句语句的意思解释一下吗
ColNum = 0
Do
txtTestStep = ColNum
For RowNum = 0 To 14 OutputData(RowNum) = TestProfileData(TestNum,ColNum,RowNum + 16)
(TestNum = cboTestType.ListIndex)
Next
Call OUTPUT_TRANSFER(OutputData())
Call WaitTimer(1)
Call INPUT_TRANSFER(InputData())
For RowNum = 0 To 14
If ColNum < 65 Then
TestResult(RowNum) = TestResult(RowNum) Or _
(InputData(RowNum) Xor TestProfileData(TestNum,ColNum,RowNum))
TotalResult = TotalResult Or TestResult(RowNum)
Else
TestResult(RowNum) = TestResult(RowNum) Or _
((InputData(RowNum) Xor TestProfileData(TestNum,ColNum,RowNum)) And (Not TestProfileData(TestNum,ColNum,RowNum)))
TotalResult = TotalResult Or TestResult(RowNum)
End If
Next
ColNum = ColNum + 1
Loop While ColNum