慧眼辨真伪，下列音节和汉字全对的一组是[ ]

   A．羞涩(xuī shè)      妒嫉(dù ji)         放肆(fàng shì) 

   B．脊梁(jǐ liáng)      荣誉(róng yù)     鼻涕(bí tì) 

   C．山涧(shān jiàn)    湖畔(hú pàn)     瑰玫(méi guí)

运行下面程序代码后，变量J的值为______。
Private Sub Fun()
Dim J as Integer
J=10
DO
J=J+3
Loop While J＜19
End Sub