如图所示，一个质量为m的圆环套在一根固定的水平直杆上，环与杆的动摩擦因数为μ，现给环一个向右的初速度v₀，如果在运动过程中还受到一个方向始终竖直向上的力F的作用，已知力F的大小F＝kv(k为常数，v为环的运动速度)，则环在整个运动过程中克服摩擦力所做的功(假设杆足够长)可能为(　　)

A．

B．

C．0

D．

在窗体上绘制一个名称为Commandl的命令按钮，然后编写如下程序：
Option Base 1
Private Sub Commandl_Click()
Dim c As Integer,d As Integer
d=0
c=6
x=Array(2，4，6，8，10，12)
Fori=1 To 6
1fx(i)＞c Then
d=d+x(i)
c=x(i)
Else
d=d-c
End If
Nexti
Print d
End Sub
程序运行后，如果单击命令按钮，则在窗体上输出的内容为( )。

A．10

B．16

C．12

D．20