编译错误缺少子程序

‘壹’ 编译错误：子程序或函数未定义

代码中不存在cmbfield_click这个过程。你在当前窗体代码中搜索一下cmbfield_click，如果只找到两个就是错的，你在窗体中双击cmbfield这个下拉列表框，输入代码（具体要输入什么代码就只有你才知道了）。如果这个过程是不必要的，那么你把那两个cmbfield_click删掉即可。

其实我可以百分百肯定你的代码中没有cmbfield_click这个过程，因为它后面那个click的第一个c是小写的，而正常情况下，VB会自动将其格式化为大写字母的，就像下面那个cmdclear_Click

‘贰’ VB编译时提示“编译错误：子程序或函数未定义。” 错误代码就是 Execute 求各位大神帮助。。。

Execute
这个函数你没有定义
就是这个意思

‘叁’ VB缺少子程序

【方名】丁香浸液治口腔溃疡。

【出处】朱安文

【组成】丁香10～20克。

【方诀】

【功用】

【主治】口腔溃疡。

【用法】用开水浸泡入水杯中，2小时后，变成棕色药液。涂于溃疡处，每日8～10次。治疗2～3天即可痊愈。

【禁忌】

发病原因尚不清楚,可能与内分泌障碍,胃肠功能紊乱,肠道寄生虫病,病毒感然,变态反应,局部刺激等因素有关,临床上常与其失眠,便秘,疲劳,精神紧张,月经周期等相伴发.进来多认为是一种自身免疫性疾病.祖国医学则认为主要由"心脾有热"所致.这是口腔粘膜病中最常见的溃疡性损害,具有周期性复发的规律.一般是一个或数个溃疡,分散在口腔内各个部位,同时也会伴有头疼发热,淋巴肿大等症状.这是口腔粘膜病中最常见的溃疡性损害,具有周期性复发的规律.
局部治疗：应用消炎防腐药物是治疗口腔粘膜任何溃疡和糜烂的重要方法,除烧灼法外均可酌情选用.
1.止痛剂：常用的表面麻醉剂有0.5%达克罗宁溶液,一般可在进食前涂布止血.令外撒覆苯海拉明等抗过敏药物也可产生止痛作用.
2.含漱剂：0.1%高锰酸钾,0.1%利凡诺尔,复方硼酸液,0,02-0,04%洗必太等.
3.散剂：冰硼散,锡类散,撒覆或吹覆患处,每日数次.
4.也可用口腔溃疡贴.
全身治疗则要辩证施治.如实热选用凉膈散,虚热选用六味地黄汤等.
另外辛辣刺激性食品要避免食用.同时可适当口服VC.VB等.

您好：
现代医学认为，复发性口腔溃疡首先与免疫有着很密切的关系。有的患者表现为免疫缺陷，有的患者则表现为自身免疫反应，也就是由于各种因素，使人体正常的免疫系统，对自身组织抗原，产生免疫反映，而引起组织的破坏而发病。其次是与遗传有关系，在临床中，复发性口腔溃疡的发病，有明显的家族遗传倾向，我们常常看到，父母一方或多方若患有复发性口腔溃疡，那么，他们的子女就比一般人更容易患病。另外，复发性口腔溃疡的发作，常常还与一些疾病或症状有关，比如消化系统疾病胃溃疡，十二指肠溃疡，慢性或迁延性肝炎，结肠炎等，另外贫血，偏食，消化不良，腹泻，发热，睡眠不足，过度疲劳，精神紧张，工作压力大、月经周期的改变等等。随着一种或多种因素的活跃、交替、重叠就出现机体免疫力下降，免疫功能紊乱，也就造成了复发性口腔溃疡的频繁发作。
治疗：口腔溃疡的病因较复杂，临床治疗要根据不同的诱因，针对性地治疗，才能获得好的疗效。如：解除精神紧张的压力、镇静、安眠、戒烟、酒等；有消化道疾患的要治疗相应的疾病，增加机体的抵抗力，对于溃疡局部，可采用局部涂擦止痛，消炎，促进愈合的药物。如：鱼肝油糊剂，强的松糊剂，养阴生肌散，溃疡膏等，或者在进食前局部涂擦局麻药，以减轻疼痛。
口腔溃疡在很大程度上与个人身体素质有关，要想完全避免其发生可能性不大，但尽量避免诱发因素，仍可降低发生率。
1、注意口腔卫生，避免损伤口腔黏膜，避免辛辣性食物和局部刺激。
2、保持心情舒畅，乐观开朗，避免事情和着急。
3、保证充足的睡眠时间，避免过度疲劳。
4、注意生活规律性和营养均衡性，养成一定排便习惯，防止便秘。

口疮(口腔溃疡)是一种最常见的口腔粘膜疾病，在人群中患病率一般认为超过10％，可以发生于男女老幼，以中青年最多见。
口疮是一种以周期性反复发作为特点的口腔粘膜局限性溃疡损害，可以自愈，可发生于口腔粘膜的任何部位，以唇、颊、舌部多见，严重者可以波及咽部粘膜。不少患者随着病程的延长，溃疡面积增大，数目增多，疼痛加重，愈合期延长，间隔期缩短等，影响食和说话。
对口腔溃疡的治疗方法虽然很多，但基本上都是对症治疗，目的主要是减轻疼痛或减少复发次数，但不能完全控制复发，所以预防本病尤为重要。
平常应注意保持口腔清洁，常用淡盐水漱口，戒除烟酒，生活起居有规律，保证充足的睡眠。坚持体育锻炼，饮食清淡，多吃蔬菜水果，少食辛辣、厚味的刺激性食品，保持大便通畅。妇女经期前后要注意休息，保持心情愉快，避免过度疲劳，饮食要清淡，多吃水果、新鲜蔬菜，多饮水等等，以减少口疮发生的机会。
溃疡治疗简方14则

鸡蛋：鸡蛋打入碗内拌成糊状，绿豆适量放陶罐内冷水浸泡十多分钟，放火上煮沸约1.5分钟(不宜久煮)，这时绿豆未熟，取绿豆水冲鸡蛋花饮用，每日早晚各一次，治疗口腔溃疡效果好。
六神丸：取六神丸1支(30粒)碾碎成粉，加2毫升凉开水浸透成稀糊液备用。用前先清洁患者口腔，然后用细长棉签蘸上六神丸液涂于溃疡面，以餐前1~15分钟用药为佳，每天3次，睡前加用1次。一般用药5分钟即可起到止痛效果。小溃疡1。2天可痊愈，溃疡面较大者5天痊愈。

云南：白药用云南白药外敷口腔溃疡创面，一日2次，一般2~3天痊愈。

全脂奶粉：选用全脂奶粉，每日2至3次，每次一汤匙，加少许白糖，开水冲服，晚间休息前冲服效果更佳。一般2天溃疡症状即可消失。

西瓜：西瓜半个，挖出西瓜瓤，挤取汁液，瓜汁含于口中，约2～3分钟后咽下，再含新瓜汁，反复数次。

维生素C：将维生素C药片1~2片压碎，澈于溃疡面上，闭口片刻，每日2次。

甲氰咪胍：将甲氰咪胍1～2片研成细末，用棉签蘸药粉涂于溃疡面上，10分钟内不要饮水，每日2次。

六味地黄丸：口服六味地黄丸每日2～3次，每次6～8克。

浓茶：我国明代药典《本草纲目》称：“茶苦而寒，最能降火……火降则上清矣，”据研究，茶含单宁，具有收敛作用，浓茶漱口可促使口腔溃疡愈合。

庆大霉素：用消毒棉签蘸取庆大霉素4万单位2毫升注射液轻涂口腔内溃疡面，数分钟后再涂一次，每日4次，即三餐后和睡前，漱口后涂上药液，一般2～3日即愈合。

西红柿：西红柿汁含口中，每次含数分钟，一日多次。

柿霜：从柿饼上取柿霜，用开水冲服或加入粥中服用。

芭蕉叶：采鲜芭蕉叶适量，将其用火烤热贴敷于口腔溃疡处，每日2～3次。

95％乙醇：用棉签沾上95％乙醇，轻压口腔溃疡点，并轻轻转动棉签除去溃疡面上的腐败组织，每天2～3次，每次20～30秒。治疗口腔溃疡，绝大多数在2—3天愈合

口腔溃疡食疗方

蜜汁含漱法：可用10％的蜜汁含漱，能消炎、止痛、促进细胞再生。
蜂蜜疗法：将口腔洗漱干净，再用消毒棉签将蜂蜜涂于溃疡面上，涂擦后暂不要饮食。15分钟左右，可用蜂蜜连口水一起咽下，再继续涂擦，一天可重复涂擦数遍。
硫酸锌疗法：服用硫酸锌片或12％硫酸锌糖浆，成人每次40－80毫克，1日3次，一般连用5－7天即可痊愈。
木耳疗法：取白木耳、黑木耳、山楂各10克，水煎、喝汤吃木耳，每日1－2次，可治口腔溃疡。
可可疗法：将可可粉和蜂蜜调成糊状，频频含咽，每日数次可治口腔发炎及溃疡。
白菜根疗法：取白菜根60克，蒜苗15克，大枣10个，水煎服，每日12次，可治口腔溃疡。
菜籽疗法：取白萝卜籽30克、芥菜籽30克、葱白15克，放一起捣烂，贴于足心，每日1次，可治口腔溃疡。
苹果疗法：取1个苹果（梨也可以）削成片放至容器内，加入冷水（没过要煮的苹果或梨）加热至沸，待其稍凉后同酒一起含在口中片刻再食用，连用几天即可治愈。
核桃壳疗法：将30－50克核桃熬水两次，每天早晚各服1次。
口腔溃疡可能隐匿各种疾患三周不愈必须详查
口腔内小溃疡几乎所有人都患过，大多由外伤引起。伦敦大学东曼牙科研究所Scully教授指出，口腔溃疡若历时3周而未治愈，必须找出原因。
约20％人群罹患常见的复发性口腔溃疡，呈圆或椭圆形，境界清晰。80％的患者溃疡直径在5mm以下，历时7～14日而愈，较大的溃疡少见，而且需数周或数月治愈，且残留瘢痕。另外，还有分类为疱疹性溃疡，则需1个月治愈。
据日本《医学论坛报》(2001年6月7日)报道，口腔溃疡的病因不明，部分患者发病原因同紧张、外伤、戒烟、月经、食物过敏有关。无特殊检查法，只能依赖典型症状和疾病史诊断。但决不能因此而忽视鉴别诊断。应想到除铁、叶酸、VitB12不足外，还应考虑有无慢性炎症性肠病、艾滋病感染、中性粒细胞减少等免疫障碍。另外，还应除外白血病、红斑性狼疮、Behcet病(见图)等全身性疾病和皮肤病。抗癌药和抗甲状腺药也可能产生口腔溃疡。
单发的慢性溃疡应怀疑口腔癌。小儿周期性发热、咽炎、手足口病和传染性单核细胞增多症时，口腔溃疡也可作为伴随症状出现。
Scully教授指出，口腔溃疡的治疗可用洗必泰或口含氢化可的松糖衣片，一天4次涂用去炎松软膏，如症状无改善应考虑全身给皮质类固醇。
溃疡治疗简方14则
口腔溃疡虽不是什么重病，但却给患者的生活时时带来不便与痛苦。这里为大家介绍简方14则：
鸡蛋鸡蛋打入碗内拌成糊状，绿豆适量放陶罐内冷水浸泡十多分钟，放火上煮沸约1.5分钟(不宜久煮)，这时绿豆未熟，取绿豆水冲鸡蛋花饮用，每日早晚各一次，治疗口腔溃疡效果好。
六神丸取六神丸1支(30粒)碾碎成粉，加2毫升凉开水浸透成稀糊液备用。用前先清洁患者口腔，然后用细长棉签蘸上六神丸液涂于溃疡面，以餐前1~15分钟用药为佳，每天3次，睡前加用1次。一般用药5分钟即可起到止痛效果。小溃疡1。2天可痊愈，溃疡面较大者5天痊愈。
云南白药用云南白药外敷口腔溃疡创面，一日2次，一般2~3天痊愈。
全脂奶粉选用全脂奶粉，每日2至3次，每次一汤匙，加少许白糖，开水冲服，晚间休息前冲服效果更佳。一般2天溃疡症状即可消失。
西瓜西瓜半个，挖出西瓜瓤，挤取汁液，瓜汁含于口中，约2～3分钟后咽下，再含新瓜汁，反复数次。
维生素C将维生素C药片1~2片压碎，澈于溃疡面上，闭口片刻，每日2次。
甲氰咪胍服将甲氰咪胍1～2片研成细末，用棉签蘸药粉涂于溃疡面上，10分钟内不要饮水，每日2次。
六味地黄丸口服六味地黄丸每日2～3次，每次6～8克。
浓茶我国明代药典《本草纲目》称：“茶苦而寒，最能降火……火降则上清矣，”据研究，茶含单宁，具有收敛作用，浓茶漱口可促使口腔溃疡愈合。
庆大霉素用消毒棉签蘸取庆大霉素4万单位2毫升注射液轻涂口腔内溃疡面，数分钟后再涂一次，每日4次，即三餐后和睡前，漱口后涂上药液，一般2～3日即愈合。
西红柿西红柿汁含口中，每次含数分钟，一日多次。
柿霜从柿饼上取柿霜，用开水冲服或加入粥中服用。
芭蕉叶采鲜芭蕉叶适量，将其用火烤热贴敷于口腔溃疡处，每日2～3次。
95％乙醇用棉签沾上95％乙醇，轻压口腔溃疡点，并轻轻转动棉签除去溃疡面上的腐败组织，每天2～3次，每次20～30秒。治疗口腔溃疡，绝大多数在2—3天愈合
口腔溃疡有三种类型
口腔溃疡反反复复的发作，医学上称其为“复发性口腔溃疡”。其复发时间长短与口腔溃疡病史长短有密切关系，病史短时，可以几个月或一年发病一次；病史长时，可以一个月发病一次，或口腔溃疡新旧病变交替出现。一般情况下10天左右可自愈，不留疤痕。
复发性口腔溃疡，是口腔粘膜病中最常见的疾病，反复发作但又有自限性，局部表现为孤立的、圆形或者椭圆形溃疡。
临床上分为三种类型：复发性轻型口腔溃疡，复发性口炎性口腔溃疡，复发性坏死性粘膜腺周围炎。
维生素可治疗口腔溃疡
不论是单发性或慢性的口腔溃疡，维生素B2、B6等维生素B群都是有疗效的。甚至有人服用B群才经过一个晚上，口腔溃疡就消失的干干净净。
维生素B2不足时，会引发口角炎、眼睛充血和肛门溃烂等，特别是在皮肤和黏膜上出现症状。维生素B6和脂肪的代谢有关，B6不足时会引起脂漏性皮肤炎。另外泛酸和生物素等维生素B群(B
1除外)在相互的影响下，对于预防和治疗口腔溃疡也都有所帮助。
口腔溃疡的原因
口腔溃疡发生的部位多见于口腔粘膜及舌的边缘，常是白色溃疡，周围有红晕，十分疼痛，特别是遇酸、咸、辣的食物时，疼痛更加厉害，以致美味佳肴都不愿品尝。虽是口腔小疾，却令人痛苦不堪，甚至坐卧不宁，寝食不安，情绪低落。
大多数医生认为，口腔溃疡与以下因素有关：
消化系统疾病及功能紊乱：如腹胀、腹泻或便秘等情况。
内分泌变化：有些女性患者往往在月经期发生，可能与体内雌激素量下降有关。
精神因素：有的患者在精神紧张、情绪波动、睡眠状况不佳的情况下发病，可能与植物神经功能失调有关。
遗传因素：如父母双方均患有复发性口腔溃疡时，其子女约有80—90％患病，若双亲之一患此病时，其子女约有50—60％患病。
其他因素：如缺乏微量元素锌、铁、叶酸、维生素B12等，可降低免疫功能，增加复发性口腔溃疡发病的可能性。
口腔溃疡为什么老复发
为什么会出现口腔溃疡的复发性呢，其病因目前尚不十分明确，但有很多因素可以直接导致口腔溃疡的发生：细菌、病毒等微生物的感染；营养不良、维生素缺乏；消化系统疾病如肠胃溃疡炎症、便秘、腹泻等的影响；微量元素缺乏，如缺铁、叶酸、B12以及锌等；内分泌失调；精神、神经因素，如工作劳累、精神紧张波动、神经功能紊乱失调等。
有些女性每逢经期或行经前后就会出现口腔溃疡，用药治疗只能暂时缓解，下月行经时依然如故地出现，疼痛难忍，与此同时，还常伴有口干、心烦、易怒和大便干结等令人烦恼的症状。临床研究发现，月经期出现口腔溃疡主要是由于体内黄体酮水平增高而雌激素（孕酮等）的水平降低所致。
口腔溃疡常发很危险
口腔溃疡是日常生活中的常见症状，一个人的一生中都或多或少地碰到过。通常，口腔溃疡经过休息、饮食调节、保持大便通畅等可以自愈，部分患者仅需局部用药或服用数帖中药而痊愈，一般不会对全身产生严重不良后果。
但是如果一个或数个口腔溃疡反复发作甚至此起彼伏，疼痛难忍或伴有其它部位的溃疡（如外阴溃疡），则要高度重视，因为这种复发性溃疡很可能是一种免疫病——白塞氏病的警示信号。
白塞氏病又叫白塞氏综合征或眼、口、生殖器综合征。临床上以口腔溃疡、生殖器溃疡、虹膜睫状体炎三联症较常见。其中眼部症状多样，可表现为视力模糊、视力减退、眼球痛、畏光流泪、异物感及飞蚊症等，严重者可导致失明。此外还有后针眼反应等。如果缺乏对疾病的整体认识，就医时可能会把各个症状分别向不同专科的医生叙述，常常会出现“头疼医头、脚疼医脚”的局面，丧失接受最佳治疗方案的机会。
白塞氏病自古就有，男女均可发病，可见于各个年龄，以35岁后多见，其发生、发展与免疫功能异常密切相关。中医称之为“狐惑”，且指出“蚀于喉为惑，蚀于阴为狐”。本病的发生与肝肾不足、气阴亏虚、外感湿热等密切相关，久之，湿热与气血相搏，湿、毒、淤相互胶结，致本病反复发作，迁延难愈。
多年来，根据中医的传统理论和临床实践，对白塞氏病的急性发作期和缓解期，依照不同的症型，分别采取清热解毒、清利湿热、解毒通脉、益气养阴、补益肝肾等治法，结果表明中医不仅可以控制溃疡的反复发作，而且可以调节免疫功能。
此外，根据该病病灶小、病位浅的特点，运用锡类散、冰硼散、黄柏和细辛研末局部吹敷，金银花、甘草等煎汤漱口，野菊花、地肤子、苦参等煎汤坐浴熏洗。临床实践证明予中药外用及中药内服治疗白塞氏病，溃疡的发作频率、发作个数及疼痛程度多数能在一个月左右得到缓解，继续给予数月中药治疗可进一步控制病情。
除了药物治疗外，平时要注意保护口腔卫生，多吃蔬菜、水果，少吃烧烤油炸和油腻食物，不吃辛辣及热性食品如辣椒、生葱、生姜、大蒜、烟、酒、羊肉等，忌劳累，保持心情愉快和大便通畅。
体内缺铁缺锌也易长溃疡
口腔溃疡是口腔粘膜最容易患的疾病，其发病率在口腔疾病中仅次于龋齿和牙周病，占第三位。
体内缺铁缺锌也会造成溃疡。
复发性口腔溃疡属于多基因遗传病。当身体出现胃肠功能紊乱、月经失调，体内缺乏铁、锌等微量元素，精神紧张，劳累或感冒时，都会诱发口腔溃疡，所以单用维生素B2治疗无效。目前，还没有根治此病的药物。
患了口腔溃疡，可多吃富含维生素、蛋白质、纤维素类的新鲜食物，注意劳逸结合，去除诱发因素以减少复发。
治疗口腔溃疡小偏方
⑴取鲜苦瓜160克（干品80克），开水冲泡，代茶饮。1日1剂。一般连用3～5日可显效。
⑵.每日晚饭后用温开水漱净口腔，取一勺蜂蜜，原汁的最好，敷在溃疡表面，含1~2分钟，然后咽下，重复2~3次，连续治疗2~3天可痊愈。
⑶每天取核桃壳10只左右，用水煎汤口服，一日3次，连续3天，就可治愈口腔溃疡。
⑷采八九个带花萼的小月季花，捣烂，加一小杯蜂蜜调成糊状，涂口疮患处，一般3~5次即愈。
⑸将维生素C药片1~2片压碎，涂于溃疡面上，闭口片刻，每日2次。
⑺选用全脂奶粉，每日2~3次，每次一汤匙，加少许白糖，开水冲服。晚间休息前冲服效果更佳。一般2天溃疡症状即可消失。
⑻取六神丸1支(30粒)碾碎成粉，加入2毫升凉开水浸透成为稀糊液备用。用药时先清洁口腔，然后用干净的棉签蘸上六神丸液涂于溃疡表面，以餐前10~15分钟用药为佳，每日3次，睡前加用1次。一般用药5分钟即可达到止痛效果，进餐无疼痛，增进食欲。小溃疡1~2天可痊愈；多发性溃疡用药3天痊愈。
原料]绢豆腐1盒，生菜2棵，猪肉糜30克，松仁末30克。
[调料]番茄酱15克，辣椒酱5克，糖5克，醋3克，盐o.5克，汤100克，味精1克，生粉25克，清油25克(实耗)。
[操作程序l
1．豆腐倒扣在墩板上，切成1厘米厚的片，摊在盘中，上撒盐、味精，静置10分钟左右(使调味渗透到里边)；生菜洗净，掰开叶片摊在盘中。
2．油锅烧热，豆腐放干生粉中拍上粉，入锅炸成金黄色，捞出放在生菜上排齐。
3倒去锅中油，留底油，入肉糜炒散后加番茄酱、辣椒酱，炒香，再加盐、糖、醋、汤、味精，烧开后勾芡，淋点明油，放入松仁末，成番茄辣椒酱，浇在豆腐上即成。
[特色点评]外香内嫩、酸甜带辣。此菜因价格低、色泽艳、口味佳等优点，成为豆腐系列中的一款流行菜。
[要领提示]干生粉要拍得稍厚些，炸时油温与时间要掌握好。番茄辣椒酱也可作为蘸料跟着上席。

ss26，你好！首先祝你早日恢复健康！我来给你谈谈“口腔溃疡”。
一、建议首先应进行自我心理调节，去除有害精神因素。情绪不良的人应善于自解烦恼，宽容自慰，与人和睦共处，生活乐观。
其次是饮食调节。饱餐过度与口疮有不解之缘，尤其是消化不良者，应限食或少量多餐进易消化，富含维生素的食品，不可偏食，多吃蔬菜水果，注意营养搭配。注意保持口腔卫生。早晚刷牙，饭后漱口，已有溃疡者，应用薄荷含片或1／5000的呋喃西林液漱口。
二、西医用药。当口腔溃疡发生时，局部可用洗必泰漱口液，或复方硼砂漱口液等含漱，每日3--5次，每次10毫升，含5--10分钟后吐弃。再用口腔溃疡消炎薄膜，剪成溃疡面大小，贴于溃疡上，待其自然化解。或用0.5％达克罗宁溶液少许以棉签蘸取后涂于溃疡上，也可用珠黄散加青黛散混合后的粉剂涂于溃疡面，可收敛止痛，有助于愈合。金霉素眼膏少许，涂于溃疡面，也有止痛，促进溃疡愈合的疗效。
三、中医认为，要改善复发性口腔溃疡应注意排便通畅、睡眠充足，尤其是大便通畅是复发性口腔溃疡治疗过程中不可缺少的治疗法。应多吃新鲜水果和蔬菜可以清理肠胃，同时由于口腔溃疡也可能因缺乏维生素B2引起，可多吃蔬菜和小麦胚芽，并补充维生素C和锌。
四、以下介绍几则成功治愈“口腔溃疡”的食疗药膳：
1）蜜汁口漱--可用10％的蜜汁含漱，能消炎、止痛、促进细胞再生。
2）蜂蜜涂咽--将口腔洗漱干净，再用消毒棉签将蜂蜜涂于溃疡面上，涂擦后暂不要饮食。15分钟左右，可用蜂蜜连口水一起咽下，再继续涂擦，一天可重复涂擦数遍。
3）硫酸锌服--服用硫酸锌片或12％硫酸锌糖浆，成人每次40--80毫克，1日3次，一般连用5--7天即可痊愈。
4）木耳山楂--取白木耳、黑木耳、山楂各10克，水煎、喝汤吃木耳，每日1--2次，可治口腔溃疡。
5）可可蜜糊--将可可粉和蜂蜜调成糊状，频频含咽，每日数次可治口腔发炎及溃疡。
6）菜根蒜枣--取白菜根60克，蒜苗15克，大枣10个，水煎服，每日12次，可治口腔溃疡。
7）萝卜芥籽--取白萝卜籽30克、芥菜籽30克、葱白15克，放一起捣烂，贴于足心，每日1次，可治口腔溃疡。
8）苹果热酒--取1个苹果(梨也可以)削成片放至容器内，加入冷水(没过要煮的苹果或梨)加热至沸，待其稍凉后同酒一起含在口中片刻再食用，连用几天即可治愈。
9）核桃壳水--将30--50克核桃熬水两次，每天早晚各服1次。
五、在发病较重情况下可考虑做全身治疗：
1）在溃疡发作时，补充维生素B1、B2、B6及维生素C，可提高机体的自愈能力。
2）抗生素类药。当溃疡有继发感染时，可适当服用抗生素类药。
3）调整免疫功能的药。在溃疡数目多，不断复发时，可考虑使用。如用肾上腺皮质激素，一般中小剂量，短疗程。也可在医师指导下辩证施治服用中药，可服用调整免疫功能的药物如人参、黄芪、冬虫夏草，灵芝、六味地黄丸、补中益气丸等，提高免疫功能后可以减少复发。
以上回答如果满意，请不要辜负我的一片好意，及时点击“采纳为答案”。

‘肆’ vb编译错误:子程序或函数未定义

• VB子程序或函数未定义是设置错误造成的，解决方法为： 1、先绘制一个命令按钮，双击命令按钮进入代码窗口。 2、首先定义一个变体变量。 3、输入一个数字，并使用ABS函数。 4、然后写输出Print语句。5、然后点击按钮测试。

‘伍’ VB中提示缺少子程序、函数或属性，是怎么回事

你有许多错，自己对比一下：

Private Sub Command1_Click()
Dim i, a, b, c As Integer
For i = 1 To 10
a = Val(InputBox("请输入自然数", "窗口"))
If a Mod 2 Then
b = b + 1
Else
c = c + 1
End If
Next
Debug.Print "b ="; b, "c ="; c
End Sub

‘陆’ VB：缺少子程序、函数或属性是怎么回事

Option Explicit
'定义修改下类型更好
Private Type zg
zgh As Integer
xm As String * 3
gz As Integer
End Type

Dim a(0 To 4) As zg, i%

Private Sub command1_click()
i = i + 1
If i > 4 Then MsgBox "最多可存放5人的数据": Exit Sub
With a(i)
.zgh = Val(Text1)
.xm = Text2
.gz = Val(Text3)
End With
Text1 = "": Text2 = "": Text3 = ""
End Sub

Private Sub Command2_Click()
Dim i%, j%, t As zg
Picture1.Cls
For i = 0 To 3
For j = i + 1 To 4
If a(i).gz > a(j).gz Then t = a(i): a(i) = a(j): a(j) = t
Next j
Next i

For j = 0 To 4
Picture1.Print a(j).zgh; a(j).xm; a(j).gz '这里“：”改成“；”
Next j
End Sub

'复制下
'可以执行了。。。

‘柒’ VB系统提示 编译错误：子程序或函数未定义！ 为什么

Select Case botton.Index
应该是Select Case Button.Index吧

‘捌’ 求问VBA编程中出现错误：缺少子程序、函数或属性

部分代码有误，修正参考如下：
Public Sub 自动记录调查数据()
Dim temp As Integer
Dim count As Integer
temp=Sheets("数据表").[A1].CurrentRegion.Rows.count
count = temp - 3 '
Sheets("问卷").Select
Range("A50:H50").Select
Selection.Copy '
Sheets("数据表").Activate
Rows(temp + 1).Select
ActiveSheet.Paste
Cells(temp + 1, 13).Value = count + 1
Sheets("问卷").Select
Application.CutCopyMode = False
MsgBox "记录已成功保存，谢谢！", vbOKOnly, "确定"
End Sub
希望能帮上忙！

‘玖’ VB 程序一运行就提示缺少子程序、函数或属性

print
"圆的面积为："
:
s
把冒号改成分号，为
print
"圆的面积为："
;
s
下边那一句也一样
冒号用来分隔一行中的几条语句，用冒号的话，编译器会把变量s解释为过程，当然就出错了