甲企业为股份制企业，对工商局作出行政处罚行为不服，下列有权以甲的名义申请行政复议的有：（）

A.股东大会

B.股东代表大会

C.董事会

D.监事会

以下程序的功能是从键盘输入若干个学生的考试成绩，统计并输出最高分和最低分，当输入负数时结束输入。请填空。
Private Sub Command1_Click()
Dim x,amax,amin As Single
x=InputBox("Enter a score")
amax=x
amin=x
Do While______
If x＞amax Then
amax=x
End If
If______Then
amin=x
End If
x=InputBox("enter a score")
Loop
Print "max=";amax,"min=";amin
End Sub