加入收藏  |  在线留言  |  联系我们
首 页    |    医院概况    |    医疗资讯    |    特色治疗    |    名医介绍    |    先进设备    |    就医指南    |    典型病例
  青州眼科医院
 
飞秒激光治疗近视
白内障治疗
儿童斜视弱视治疗
眼底病治疗
角膜及眼表病治疗
青光眼治疗
医学整形美容
医学验光配镜

 

 
 
您现在的位置: 首 页 > 特色治疗 > 关于青光眼
关于青光眼
关于青光眼

青光眼的症状

    青光眼的症状是由于眼压升高、视神经功能障碍引起。如闭角性青光眼发作前常有生气、劳累等诱因,引起眼压急骤升高,出现虹视、眼痛、头痛恶心呕吐、视力下降、眼充血和流泪等症状。

  早期轻微的发作,到明亮处引起缩瞳,即可自行缓解。而开角性青光眼的自觉症状一般轻微,有时完全没有症状。眼压升高极为缓慢,即便眼压升高,也无角膜水肿和疼痛,但视力逐渐下降,常常发生视神经的损害。

  (1)急性闭角青光眼:病人急性期主要症状是感觉剧烈眼痛及同侧头痛、虹视、视糊、严重者仅留眼前指数或光感,常合并恶心、呕吐、发热、寒战及便秘等,少数病人可有腹泻发生。检查时,可发现眼压高、瞳孔散大、眼部充血、角膜水肿、房水混浊、晶体改变、前房变浅、房角闭塞、虹膜萎缩等。
 

  (2)慢性闭角青光眼病人主要症状是或多或少眼部不适,发作性视蒙、虹视,这种发作冬季常见,多在傍晚或午后出现,充分睡眠休息后眼压正常,症状消失,少数人无任何不适,偶尔遮盖健眼发现患眼视力下降甚至失明。检查时有阳性发现。
 

  (3)开角性青光眼主要特点是高眼压下前房角宽而开放,主要症状是头昏、头痛、眼胀或视蒙。眼压初期不稳定,以后渐增高。眼底、视野均有改变。
 

  (4)先天性青光眼是一种胚胎期前房角发育异常,阻碍了房水排出所致的疾病,表现为畏光、流泪及眼睑痉挛、眼压高,检查有阳性发现。
 

  (5)继发性青光眼是一些眼部疾病和某些全身性疾病在眼部出现的合并症,它通过影响房水循环使眼压升高。粘连性角膜白斑、虹膜睫状体炎,外伤性眼内出血、房角挫伤、白内障膨胀期、虹膜新生血管等均可继发青光眼。

青光眼分类

    青光眼分类依据不同,种类可有多样,目前一般根据病因和发病机制分类,分为三大类: 
    1)
先天性青光眼
    2)原发性闭角型青光眼
    3)继发性青光眼

 

 


关闭窗口 〗 〖 打印页面

备案序号: 鲁ICP备05010771号   网站维护:孚尔企划  网站管理   您是第 <% Function Counts(CounterFile) Dim objFSO, objTS Application.Lock Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objTS = objFSO.OpenTextFile(Server.MapPath(CounterFile), 1, True) If Not objTS.AtEndOfStream Then '检查是否到达文件结尾 Counts = CLng(objTS.ReadLine) End If Counts = Counts + 1 objTS.Close Set objTS = objFSO.OpenTextFile(Server.MapPath(CounterFile), 2, True) objTS.WriteLine(Counts) objTS.Close Application.Unlock End Function Function G_Counts(CounterFile) Dim objFSO, objTS, Counts, StrCounts Application.Lock Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objTS = objFSO.OpenTextFile(Server.MapPath(CounterFile), 1, True) If Not objTS.AtEndOfStream Then '检查是否到达文件结尾 Counts = CLng(objTS.ReadLine) End If Counts = Counts + 1 objTS.Close Set objTS = objFSO.OpenTextFile(Server.MapPath(CounterFile), 2, True) objTS.WriteLine(Counts) objTS.Close Application.Unlock StrCounts = CStr(Counts) For i = 1 to Len(StrCounts) G_Counts = G_Counts & "" Next End Function %> <% If Session("Counter") = Empty Then Session("Counter") = G_Counts("jishu.txt") End If %> <%= Session("Counter") %> 位访问者