患者头痛,痛处固定,痛如锥刺,舌紫暗,脉细涩,宜诊为()。
A.心脉痹阻证
B.心阳虚证
C.肝阳上亢证
D.瘀阻心脉证
E.瘀阻脑络证
参考答案:E
在窗体上有一个命令按钮,然后编写如下程序: Function Trans(ByVal num As Long) As Long Dim k As Long k=l Do While num k=k * (num Mod 10) num=num\10 Loop Trans=k Print Trans End Function Private Sub Commandl_Click( ) Dim m As Long Dim s As Long m=InputBox("请输入一个数") s=Trans(m) End Sub 程序运行时,单击命令按钮,在输入对话框中输入“789”,输出结果为【 】,在输入对话框中输入“987”输出【 】,在输入对话框中输入“879”,输出结果为【 】。
柱锤冲扩桩法适用于什么地基条件?