public void VBNetErrorStatementTest()
{
ErrorStatement errorStatement = ParseUtil.ParseStatement <ErrorStatement>("Error a");
}
public void VBNetReDimStatementTest2()
{
ReDimStatement reDimStatement = ParseUtil.ParseStatement <ReDimStatement>("ReDim calCheckData(channelNum, lambdaNum).ShiftFromLastFullCalPixels(CalCheckPeak.HighWavelength)");
}
public void VBNetGotoStatementTest()
{
GotoStatement gotoStmt = ParseUtil.ParseStatement <GotoStatement>("GoTo myLabel");
Assert.AreEqual("myLabel", gotoStmt.Label);
}
public void VBNetEraseStatementTest()
{
EraseStatement eraseStatement = ParseUtil.ParseStatement <EraseStatement>("Erase a, b, c");
}
public void VBNetOnErrorStatementTest()
{
OnErrorStatement onErrorStatement = ParseUtil.ParseStatement <OnErrorStatement>("On Error Goto err");
}
public void VBNetEmptyReturnStatementTest()
{
ReturnStatement returnStatement = ParseUtil.ParseStatement <ReturnStatement>("Return");
Assert.IsTrue(returnStatement.Expression.IsNull);
}
public void VBNetForeachStatementTest()
{
ForeachStatement foreachStmt = ParseUtil.ParseStatement <ForeachStatement>("For Each i As Integer In myColl : Next");
// TODO : Extend test.
}
public void VBNetForNextStatementTest()
{
ForNextStatement forNextStatement = ParseUtil.ParseStatement <ForNextStatement>("For i=0 To 10 Step 2 : Next i");
}
public void AddHandlerTest()
{
AddHandlerStatement addHandlerStatement = ParseUtil.ParseStatement <AddHandlerStatement>("AddHandler Obj.Ev_Event, AddressOf EventHandler");
// TODO : extend tests
}
public void VBNetStopStatementTest()
{
StopStatement stopStatement = ParseUtil.ParseStatement <StopStatement>("Stop");
}
public void VBNetEndStatementInIfThenTest2()
{
IfElseStatement endStatement = ParseUtil.ParseStatement <IfElseStatement>("IF a THEN End");
}
public void VBNetEndStatementTest()
{
EndStatement endStatement = ParseUtil.ParseStatement <EndStatement>("End");
}
public void VBNetForNextStatementWithComplexExpressionTest()
{
ForNextStatement forNextStatement = ParseUtil.ParseStatement <ForNextStatement>("For SomeMethod().Property = 0 To 10 : Next SomeMethod().Property");
}
public void VBNetRaiseEventStatementTest()
{
RaiseEventStatement raiseEventStatement = ParseUtil.ParseStatement <RaiseEventStatement>("RaiseEvent MyEvent(a, 5, (6))");
}
public void VBNetWithStatementTest()
{
WithStatement withStatement = ParseUtil.ParseStatement <WithStatement>("With MyObj : End With");
}
public void VBNetRemoveHandlerTest()
{
RemoveHandlerStatement removeHandlerStatement = ParseUtil.ParseStatement <RemoveHandlerStatement>("RemoveHandler MyHandler, AddressOf MyMethod");
}
public void ResumeStatementTest()
{
ResumeStatement resumeStatement = ParseUtil.ParseStatement <ResumeStatement>("Resume");
}
