【正文】
If If xi = 0 And yi = 0 And f = 0 And g 0 Then Print amp。 n amp。 amp。 jvx amp。 amp。 停止 amp。 amp。 k amp。 amp。 xi amp。 amp。 jvy amp。 GoTo wz2 End If If xi = 0 And yi = 0 And f 0 And g = 0 Then Print amp。 n amp。 amp。 jvx amp。 amp。 amp。 amp。 amp。 amp。 amp。 amp。 jvy amp。 amp。 停止GoTo wz2 End IfEnd IfPrint amp。 n amp。 amp。 jvx amp。 amp。 jrx amp。 amp。 k amp。 amp。 xi amp。 amp。 jvy amp。 amp。 jry amp。 amp。 m amp。 amp。 yiwz2: If xi = 0 Then f = f 1End IfIf yi = 0 Then g = g 1End IfIf xi = 0 And yi = 0 Then ci = ci 1 If ci = 0 Then GoTo wz3 End IfEnd IfIf = True Then If a c And b d And k = 1 Then jvy = jvy 1 ElseIf a c And b d And m = 1 Then jvx = jvx + 1 ElseIf a c And b d And k = 1 Then jvy = jvy + 1 ElseIf a c And b d And m = 1 Then jvx = jvx 1 End IfEnd IfIf = True Then If a c And b d And k = 1 Then jvy = jvy + 1 ElseIf a c And b d And m = 1 Then jvx = jvx 1 ElseIf a c And b d And k = 1 Then jvy = jvy 1 ElseIf a c And b d And m = 1 Then jvx = jvx + 1 End IfEnd IfIf = True Then If a c And b d And k = 1 Then jvy = jvy + 1 ElseIf a c And b d And m = 1 Then jvx = jvx 1 ElseIf a c And b d And k = 1 Then jvy = jvy 1 ElseIf a c And b d And m = 1 Then jvx = jvx + 1 End IfEnd IfIf = True Then If a c And b d And k = 1 Then jvy = jvy 1 ElseIf a c And b d And m = 1 Then jvx = jvx + 1 ElseIf a c And b d And k = 1 Then jvy = jvy + 1 ElseIf a c And b d And m = 1 Then jvx = jvx 1 End IfEnd If (4500 + 300 * ai, 4500 bi * 300)(4500 + 300 * (ai + k), 4500 (bi + m) * 300)ai = ai + kbi = bi + mGoTo wzww3: = = = = = ww5: ans = MsgBox(出錯(cuò)了,寄存器位數(shù)偏小,請(qǐng)輸入, 48, 提示信息) = ww4:wz3:End SubPrivate Sub 清除_Click() = = = = = = False = False = False = FalseEnd SubPrivate Sub 退出_Click()EndEnd Sub七、軟件運(yùn)行效果仿真1 進(jìn)入2 第三象限 3第 二象限 4 第四象限 5 第一象限及錯(cuò)誤提示八、課程小節(jié)通過(guò)此次課程設(shè)計(jì),使我更好的掌握了有關(guān)數(shù)字積分法一二三四象限順、逆圓插補(bǔ)計(jì)算方面的知識(shí),在設(shè)計(jì)過(guò)程中雖然遇到了一些問(wèn)題,但經(jīng)過(guò)一次又一次的思考和詢(xún)問(wèn),終于找出了原因所在,也暴露出了前期我在這方面的知識(shí)欠缺和經(jīng)驗(yàn)不足。實(shí)踐出真知,通過(guò)親自動(dòng)手制作,使我們掌握的知識(shí)不再是紙上談兵。過(guò)而能改,善莫大焉。在課程設(shè)計(jì)過(guò)程中,我們不斷發(fā)現(xiàn)錯(cuò)誤,不斷改正,不斷領(lǐng)悟,不斷獲取。最終的檢測(cè)調(diào)試環(huán)節(jié),本身就是在踐行“過(guò)而能改,善莫大焉”的知行觀。這次課程設(shè)計(jì)終于順利完成了,在設(shè)計(jì)中遇到了很多問(wèn)題,最后在同組的伙伴們的指導(dǎo)下,終于游逆而解。在今后社會(huì)的發(fā)展和學(xué)習(xí)實(shí)踐過(guò)程中,一定要不懈努力,不能遇到問(wèn)題就想到要退縮,一定要不厭其煩的發(fā)現(xiàn)問(wèn)題所在,然后一一進(jìn)行解決,只有這樣,才能成功的做成想做的事,才能在今后的道路上劈荊斬棘,而不是知難而退,那樣永遠(yuǎn)不可能收獲成功,收獲喜悅,也永遠(yuǎn)不可能得到社會(huì)及他人對(duì)你的認(rèn)可!課程設(shè)計(jì)誠(chéng)然是一門(mén)專(zhuān)業(yè)課,給我很多專(zhuān)業(yè)知識(shí)以及專(zhuān)業(yè)技能上的提升,同時(shí)又是一門(mén)講道課,一門(mén)辯思課,給了我許多道,給了我很多思,給了我莫大的空間。同時(shí),設(shè)計(jì)讓我感觸很深。使我對(duì)抽象的理論有了具體的認(rèn)識(shí)。通過(guò)這次課程設(shè)計(jì),我掌握了數(shù)字積分法插補(bǔ)的基本原理,運(yùn)算過(guò)程,特點(diǎn)及其應(yīng)用,并了解改進(jìn)數(shù)字積分插補(bǔ)質(zhì)量的措施。九、參考文獻(xiàn)[1] 《數(shù)控技術(shù)》 趙玉剛,宋現(xiàn)春 主編,北京,機(jī)械工業(yè)出版社,2010[2] 《機(jī)床數(shù)控技術(shù)》 杜國(guó)臣,王士軍 主編,北京,北京大學(xué)出版社,2010[3] 《Visual Basic軟件設(shè)計(jì)教程》 江志文 主編,廣州,中山大學(xué)出版社,2003[4] 《深入淺出Visual Basic 6軟件設(shè)計(jì)》 松橋工作室,北京,中國(guó)鐵道工業(yè)出版社,2004[5] 《算法分析與設(shè)計(jì)技術(shù)》 馬紹漢 主編,北京,科學(xué)出版社,2001[6] 《數(shù)字控制機(jī)床》 廖效果,朱啟逑 主編,湖北,華中理工大學(xué)出版社,2003