Dim f As Boolean
Private Sub Command1_Click()
f = True
End Sub
Private Sub Command2_Click()
If f Then
'运行一个程序
f = False
End If
End Sub
要了解不孕不育的症状有哪些，首先得要知道引起不孕不育的原因是什么。因为不同的原因，表现出来的症状是不一样的，导致不孕不育，有男方的因素，也有女方的因素，可能还有男女共同的因素，所以看症状的时候，首先要明确原因。打个比方引起女性的不孕，原发因素，其实就是不明原因的，可能表现出来的症状，主要是不怀孕，找不出来什么表现。继发性的因素引起来的不孕，就会有一些表现，像输卵管的因素、排卵的因素，还有子宫的因素，表现的症状也不一样。有一些由输卵管疾病，导致的继发性不孕，经常会表现出来小肚子疼、分泌物异常、腰酸痛，还有由多囊卵巢综合征引起来的继发性不孕，可以会出现月经后期、闭经、肥胖、痤疮、男性化的表现。还有因为子宫疾病，导致继发性不孕也会出现，表现出来月经周期异常，可以是周期的缩短，还有经量的增多、经期的延长、不规则的出血，这些最后的结果都是导致了不孕不育。因此，要了解不孕不育的症状，其实更多首先要明确它的原因，当出现症状的时候，就要搞清楚原因是什么，进而去针对性的治疗。
欢迎分享，转载请注明来源：优选云
微信扫一扫
支付宝扫一扫
