VB编写焦点切换程序员文本框
VB编写焦点切换程序.在一窗体上创建一文本框,并设置好它们的tabindex属性,然后使用sendkeys语句编写文本框控件的keypress事件。运行时,当按下回车键后...
VB编写
焦点切换程序.在一窗体上创建一文本框,并设置好它们的tabindex属性,然后使用sendkeys语句编写文本框控件的keypress事件。运行时,当按下回车键后,控件的
焦点将自动切换。 展开
焦点切换程序.在一窗体上创建一文本框,并设置好它们的tabindex属性,然后使用sendkeys语句编写文本框控件的keypress事件。运行时,当按下回车键后,控件的
焦点将自动切换。 展开
2个回答
2015-05-05
展开全部
您好,尿酸超过正常值一般来说要考虑是痛风可能.这是一个代谢性疾病.如果不控制会导致全身各系统都会出现问题.
治疗包括:饮食治疗应避免进食含高嘌呤饮食.动物内脏,骨髓,海味等含嘌呤最丰富;鱼虾类,肉类,豌豆,菠菜等亦含有一定嘌呤;水果,蔬菜,牛奶,鸡蛋等则不含嘌呤.宜多饮水,以利于血尿酸从肾脏排出.药物方面可选用降低血尿酸的药物如别嘌呤醇,可使用非留体类抗风湿药如消炎痛,布洛芬等,缓解关节疼痛症状.
痛风的症状一般是半夜或清晨急性发作,有发热、头痛、口干口苦关节红肿热痛等症状,早期多累及足跟、指、趾等中小关节,晚期可见关节肿大、畸形、僵硬、耳轮、指间、指掌处呈现黄白色痛风或破溃形成瘘管。可以服用碳酸氢钠片,偏高较多的,用苯溴马隆.对血尿酸水平持续超过500的,则要考虑使用别嘌醇.痛风急性发作时,只能用秋水仙碱镇痛,平时轻微的疼痛,则可以用吲哚美辛,扶他林软膏.饮食控制和多饮水对控制痛风的发作有重要意义.注意避免食用嘌呤含量高的食物.
痛风属于代谢性疾病.
饮食治疗应避免进食含高嘌呤饮食.动物内脏,骨髓,海味等含嘌呤最丰富;鱼虾类,肉类,豌豆,菠菜等亦含有一定嘌呤;水果,蔬菜,牛奶,鸡蛋等则不含嘌呤.宜多饮水,以利于血尿酸从肾脏排出.
药物方面可选用降低血尿酸的药物如别嘌呤醇,可使用非留体类抗风湿药如消炎痛,布洛芬等,缓解关节疼痛症状.
这痛风属于代谢性疾病.如果不控制会导致全身各系统都会出现问题.治疗包括:饮食治疗应避免进食含高嘌呤饮食.动物内脏,骨髓,海味等含嘌呤最丰富;鱼虾类,肉类,豌豆,菠菜等亦含有一定嘌呤;水果,蔬菜,牛奶,鸡蛋等则不含嘌呤.宜多饮水,以利于血尿酸从肾脏排出.药物方面可选用降低血尿酸的药物如别嘌呤醇,可使用非留体类抗风湿药如消炎痛,布洛芬等,缓解关节疼痛症状.
治疗包括:饮食治疗应避免进食含高嘌呤饮食.动物内脏,骨髓,海味等含嘌呤最丰富;鱼虾类,肉类,豌豆,菠菜等亦含有一定嘌呤;水果,蔬菜,牛奶,鸡蛋等则不含嘌呤.宜多饮水,以利于血尿酸从肾脏排出.药物方面可选用降低血尿酸的药物如别嘌呤醇,可使用非留体类抗风湿药如消炎痛,布洛芬等,缓解关节疼痛症状.
痛风的症状一般是半夜或清晨急性发作,有发热、头痛、口干口苦关节红肿热痛等症状,早期多累及足跟、指、趾等中小关节,晚期可见关节肿大、畸形、僵硬、耳轮、指间、指掌处呈现黄白色痛风或破溃形成瘘管。可以服用碳酸氢钠片,偏高较多的,用苯溴马隆.对血尿酸水平持续超过500的,则要考虑使用别嘌醇.痛风急性发作时,只能用秋水仙碱镇痛,平时轻微的疼痛,则可以用吲哚美辛,扶他林软膏.饮食控制和多饮水对控制痛风的发作有重要意义.注意避免食用嘌呤含量高的食物.
痛风属于代谢性疾病.
饮食治疗应避免进食含高嘌呤饮食.动物内脏,骨髓,海味等含嘌呤最丰富;鱼虾类,肉类,豌豆,菠菜等亦含有一定嘌呤;水果,蔬菜,牛奶,鸡蛋等则不含嘌呤.宜多饮水,以利于血尿酸从肾脏排出.
药物方面可选用降低血尿酸的药物如别嘌呤醇,可使用非留体类抗风湿药如消炎痛,布洛芬等,缓解关节疼痛症状.
这痛风属于代谢性疾病.如果不控制会导致全身各系统都会出现问题.治疗包括:饮食治疗应避免进食含高嘌呤饮食.动物内脏,骨髓,海味等含嘌呤最丰富;鱼虾类,肉类,豌豆,菠菜等亦含有一定嘌呤;水果,蔬菜,牛奶,鸡蛋等则不含嘌呤.宜多饮水,以利于血尿酸从肾脏排出.药物方面可选用降低血尿酸的药物如别嘌呤醇,可使用非留体类抗风湿药如消炎痛,布洛芬等,缓解关节疼痛症状.
展开全部
已经做好了,vb2010写的
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox1.KeyPress
If e.KeyChar = Chr(13) Then
TextBox2.Focus()
End If
End Sub
Private Sub TextBox2_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox2.KeyPress
If e.KeyChar = Chr(13) Then
TextBox3.Focus()
End If
End Sub
Private Sub TextBox3_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox3.KeyPress
If e.KeyChar = Chr(13) Then
TextBox4.Focus()
End If
End Sub
Private Sub TextBox4_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles TextBox4.KeyPress
If e.KeyChar = Chr(13) Then
TextBox1.Focus()
End If
End Sub
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询