下列最可能反映红绿色盲的遗传系谱图是[ ]

A．

B．

C．

D．

有如下程序：　　Private Sub Command1_Click()　　　　Dim k As Integer，m As Integer　　　　Dim p As Integer　　　　k=4：m=1　　　　p=PC(k，m)：Print p；　　　　p=PC(k，m)：Print p　　End Sub　　Private Function PC(a As Integer，b As Integer)　　　　Static m As Integer，i As Integer　　　　m=0：i=2　　　　i=i + m + 1　　　　m=i + a + b　　　　PC=m　　End Function　　程序运行后，输出的结果为（ ）。

A．java.awt.panel

B．java.applet.Applet

C．java.awt.frame

D．java.awt.Window