在窗体上画一个名称为Command1的命令按钮，一个名称为Label1的标签，然后编写如下事件过程:
procedure TForm1.Button1Click(Sender: TObject);
var s,i,x: Integer;
begin
s := 0 ;
For i:=1 To 15 Do
Begin
x := 2*i-1;
IF x Mod 3=0 Then
s := s+1
end;
Label1.Caption := IntToStr(s);
End;
问点击Command1的命令按钮后，Label1标签显示数值为：（ ）
A、5
B、15
C、20
D、25