下列科技成就在历史上出现的先后顺序是

①望、闻、问、切4种诊病方法问世②《伤寒杂病论》成书③用麻做纸

④把圆周率的数值计算到小数点后第7位数字[ ]

A．①②③④

B．③②④①

C．①③②④

D．④②③①

在窗体中添加一个命令按钮、一个标签和一个文本框，并将文本框的Text属性置空，编写命令按钮Command1的Click事件代码：
Private Function fun(x As Long)As Boolean
If x Mod 2=0 Then
fun=True
Else
fun=False
End If
End Function
Private Sub Command1_Click()
Dim n As Long
n=Val(Text1.Text)
p=IIf(fun(n),"奇数","偶数")
Label1.Caption=n & "是一个"& p
End Sub
程序运行后，在文本框中输入20，单击命令按钮后，标签中的内容为( )。

A．20是一个奇数

B．20

C．20是一个偶数

D．2