




已阅读5页,还剩5页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
Visual Basic -课程设计与心得 班级:计科 107 姓名:张麟树 学号:1004681324 一、实验课题:设计一个能计算 2 阶、3 阶、4 阶行列式的 小软件,运行时先由用户输入行列式的阶数,然后软件自动生 成行列式的输入模板,如用户输入的阶数是 3,则产生 9 个输 入框并排成 3 行 3 列且用两条竖线界定。这里需用控件的动太 加载技术。 二、实验代码: Dim N As Integer Public Function choose(ByVal X As Integer) Do If X = 2 Then With Form1 .Line1.Visible = True .Line2.Visible = True .Line3.Visible = False .Line4.Visible = False .Line5.Visible = False .Line6.Visible = False End With For I = 0 To 3 Form1.Text1(I).Visible = True Next I Exit Do ElseIf X = 3 Then With Form1 .Line1.Visible = False .Line2.Visible = False .Line5.Visible = False .Line6.Visible = False .Line3.Visible = True .Line4.Visible = True End With For I = 0 To 8 Form1.Text1(I).Visible = True Next I Exit Do ElseIf X = 4 Then With Form1 .Line3.Visible = False .Line4.Visible = False .Line1.Visible = False .Line2.Visible = False .Line5.Visible = True .Line6.Visible = True End With For I = 0 To 15 Form1.Text1(I).Visible = True Next I Exit Do Else Call Command1_Click End If Loop End Function Public Function Huanyuan() Dim I As Integer For I = 0 To 15 Form1.Text1(I).Visible = False Next I With Form1 .Line1.Visible = False .Line2.Visible = False .Line3.Visible = False .Line4.Visible = False .Line5.Visible = False .Line6.Visible = False End With End Function Private Sub Command1_Click() Dim I As Integer Call Huanyuan N = InputBox(“请输入阶数( 2、3 或 4):“) For I = 0 To 15 Form1.Text1(I).Text = “ Next I Call choose(N) End Sub Private Sub Command2_Click() Dim val As Integer If N = 2 Then val = Form1.Text1(0) * Form1.Text1(3) - Form1.Text1(2) * Form1.Text1(1) ElseIf N = 3 Then val = Form1.Text1(0) * Form1.Text1(3) * Form1.Text1(8) + Form1.Text1(1) * Form1.Text1(5) * Form1.Text1(6) + Form1.Text1(4) * Form1.Text1(2) * Form1.Text1(7) - Form1.Text1(0) * Form1.Text1(5) * Form1.Text1(7) - Form1.Text1(1) * Form1.Text1(2) * Form1.Text1(8) - Form1.Text1(3) * Form1.Text1(4) * Form1.Text1(6) Else val = Form1.Text1(0) * Form1.Text1(3) * Form1.Text1(8) * Form1.Text1(15) + Form1.Text1(2) * Form1.Text1(7) * Form1.Text1(14) * Form1.Text1(9) + Form1.Text1(1) * Form1.Text1(5) * Form1.Text1(11) * Form1.Text1(12) + Form1.Text1(4) * Form1.Text1(10) * Form1.Text1(6) * Form1.Text1(13) - Form1.Text1(0) * Form1.Text1(10) * Form1.Text1(8) * Form1.Text1(13) + Form1.Text1(1) * Form1.Text1(2) * Form1.Text1(11) * Form1.Text1(14) + Form1.Text1(3) * Form1.Text1(4) * Form1.Text1(6) * Form1.Text1(15) + Form1.Text1(5) * Form1.Text1(7) * Form1.Text1(9) * Form1.Text1(12) End If MsgBox (“结果为: “ & val) End Sub Private Sub Command3_Click() End End Sub 三、实验结果: 选择菜单: 二阶行列式: 三阶行列式: 四阶行列式: 四、心得与体会: 作为一名计算机专业的学生,在接触了 C 语言、数据结构与 C+课程后,对计算机语言有了一定的兴趣,于是在这个学期 我毫不犹豫的选择了 VB 课程(算法与程序设计) 。 VB 程序设计的入门学习并不难,但却是一个十分重要的过程, 因为程序设计思想的形成,以及之前学习积累的经验,很快就对 VB 有了一定的了解。下面就是我这段时间学习的新的与体会。 我认为作为学习程序设计最重要的一点是要注重理解一些重 要的概念.VB 程序设计本身并不复杂,翻开一本程序设计学习的 书籍,看到的无非就是变量,函数,条件语句,循环语句等概念.但要 真正能进行程序设计,需要深入理解这些概念.因此,在 程序入门 阶段还是应该重视概念的学习.我们学习 VB 并没有从正常的途 径,而是通过老师的演示与讲解,了解并学习了这门课程,可 以说 VB 语言相对来说比其他语言简单,从他的语法就可以看 出 其次,自己动手编写程序。程序设计入门阶段要经常自己动 手抄写或编写一些小程序,亲自动手进行程序设计是创造性思维 应用的体现,是培养逻辑思维的好方法.因此一定要多动手编写程 序,而且要从小程序开发开始,逐渐提高写程序的能力.只有不断 的从自己的程序中积累经验,从中进步,才能写出好的程序。 程序设计课是高强度的脑力劳动,不是听会的,也不是看会的,而 是练会的.只有自己动手,编写一些程序,才会有成就感,进而对课 程产生兴趣,学起来才比较从容.动手能力的培养是这门课和以往 课程最大的不同之处.重点放在思路,算法,编程构思和程序实现 上.语句只是表达工具,要求堂上积极思考,尽量当堂学懂,并做到 灵活应用. 编程序不像做其它的事情,写程序之前一定要计划 周详,把所有的可能性都想到,并想好相应的解决方法,不然 思想会很混乱,很容易出现错误。还有就是编程序最重要的其 实是思想,思想确定之后用什么语言或什么方法就简单了,接 下来就是设
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 农村 换届发言稿
- 时间的脚印的课件
- 少儿美术文具课件
- 烧结车间煤气培训
- 厨房消防安全培训
- 车间降本增效培训
- 2025版管件回收利用合同范本
- 2025版叉车车辆租赁合同-智能仓储物流配送解决方案
- 二零二五年度人工智能机器人研发与应用合同
- 2025版合作办学项目学生权益保护合同范本
- DB31/T 375-2022柑橘栽培技术规范
- GB/T 6730.90-2025铁矿石金、银、铂、钯含量的测定电感耦合等离子体质谱法
- (完整版)220kV线路工程架线施工方案
- 肿瘤标志物介绍课件图片
- 社工项目督导协议书
- 雅迪电车购车合同协议
- 2025重庆对外建设(集团)有限公司招聘10人笔试参考题库附带答案详解
- 配网基本知识课件
- 《优化公益传播策略》课件
- 灌装代工合同协议
- 钣金行业公司简介
评论
0/150
提交评论