执行如下语句：
a=InputBox("Today"，"Tomorrow"，"Yesterday"，"Daybeforeyesterday",5)
将显示一个输入对话框，在对话框的输入区中显示的信息是( )。

A．Function f1(By Valn%)
B．Sub f1(n%)As Integer
C．Function f1%(f1%)
D．Sub f1(ByValn%())

A．Private Sub Commandl_Click()
Common Dialog1.DialogTitle="新标题"
Common Dialog1.ShowFont
End Sub
B．Private Sub Commandl_Crick()
CommonDialog1.DialogTifie="新标题"
CommonDialog1.ShowOpen
End Sub
C．Private Sub Commandl_Click()
Common Dialog1.DialogTitle="新标题"
Common Dialog1.ShowClose
End Sub
D．Private Sub Commandl_Click()
CommonDialogl.DialogTitle="新标题"
CommonDialogl.ShowColor
End Sub