设抛物线y=x²+8x-k的顶点在x轴上，则k的值为[ ]

A.-16

B.16

C.-8

D.8

在窗体中使用一个文本框(名为n)接受输入的值，有一个命令按钮run，事件代码如下：
Private Sub run_Click()
result=" "
For i=1 To　Me!n
For j=1 To Me!n
result=result+"*"
Nextj
result=result+Chr(13)+Chr(10)
Next i
MsgBox result
End　Sub
打开窗体后，如果通过文本框输入的值为4，单击命令按钮后输出的图型是( )。