刑事强制权是为了保证刑事诉讼的顺利进行，由公安机关对犯罪嫌疑人、被告人行使强制权力。下列属于刑事强制权的有( )。

A．对犯罪嫌疑人拘传、取保候审、监视居住

B．依照《刑事诉讼法》的有关规定，对犯罪嫌疑人、被告人实行拘留

C．依照《刑事诉讼法》的有关规定，提请逮捕和执行逮捕

D．依照《刑事诉讼法》的有关规定，决定逮捕

窗体上有一个名为Command1的命令按钮，并有下面的程序：
Private Sub Command1_Click()
Dim arr(5) As Integer
For k=1 To 5
arr(k)=k
Next k
Prog arr()
For k=1 To 5
Print arr(k)
Next k
End Sub
Sub prog(a() as Integer)
n=Ubound(a)
For i=n To 2 Step-1
For j=1 To n-1
if a(j)＜a(j+1) Then
t=a(j):a(j)=a(j+1):a(j+1)=t
End If
Next j
Next i
End Sub
程序运行时，单击命令按钮后显示的是

A) 1 2 3 4 5
B) 5 4 3 2 1
C) 0 1 2 3 4
D) 4 3 2 1 0