窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为True和1000。编写如下程序：
Dim n As integer
Private Sub Timer1_Times()
ch=Chr(n+Asc("A"))
LabelCaption=ch
n=n+1
n=n Mod 4
End Sub
运行程序，将在标签中（　　）。

A.不停地依次显示字符“A”，“B”，“C”，“D”，直至窗体被关闭

B.依次显示字符“A”，“B”，“C”，“D”各一次

C.每隔1秒显示字符“A”一次

D.每隔1秒依次显示26个英文字母中的一个