已阅读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. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- GB 37241-2025可燃性粉尘惰化安全规范
- GB 6376-2025拖拉机噪声限值
- GB/T 16006-2025碘缺乏病消除
- 2025广东机电职业技术学院招聘事业编制工作人员16人(第三批)考试笔试备考题库及答案解析
- 武胜县华封镇社区专职网格员招募备考题库及答案详解(名校卷)
- 四川铁道职业学院2025年公开选调工作人员参考考点题库及答案解析
- 安徽涂山旅游开发有限公司招聘4人备考考点试题及答案解析
- 2026中国民生银行兰州分行全球校园招聘备考题库附答案详解(培优b卷)
- 2026“梦想靠岸”招商银行北京分行校园招聘备考题库附答案详解(研优卷)
- 2025年六安霍邱县石店镇选聘村级后备干部8人备考题库附答案详解(完整版)
- 餐饮签协议合同范本
- 国际货运合伙合同协议书
- 人工智能技术应用专业调研报告
- JJG 1201-2024数字式轮胎压力表
- 老年运动与二十四节气(老年运动保健课件)
- 民族医药学概论智慧树知到期末考试答案章节答案2024年云南中医药大学
- (正式版)HGT 22820-2024 化工安全仪表系统工程设计规范
- 处方点评与不合理用药分析
- 传热学第四版课后习题答案(杨世铭陶文铨)2
- GB/T 43566-2023中小学人造草面层足球场地
- 2023北京东城区初二上期末考语文试卷及答案
评论
0/150
提交评论