英汉小词典课程设计VB.doc
《英汉小词典课程设计VB.doc》由会员分享,可在线阅读,更多相关《英汉小词典课程设计VB.doc(16页珍藏版)》请在咨信网上搜索。
1、课程设计20 20学年第二学期设计题目 计算机语言程序设计课程设计-英汉小词典 目录20 20学年第二学期11概述31.1程学设计目的31.2 程序的基本功能31.3其它功能31.4 扩展功能32课题的分析42.1Button1查找42.2Button添加42.3Button3修改42.4Button4删除433模板格式说明53.1设计窗体如下:53.2功能模块的划分53.3各控件的属性53.4功能模块的说明(主要流程和代码)64课程设计总结:144.1完成情况144.2遇到的问题及解决145(附录)参考文献151 概述1.1 程学设计目的本次题目的设计的操作与实践是为了使学生了解使用VB 2
2、005程序设计方法,实现面向对象程序设计的相关理论知识和设计技巧,在一定程度上提高面向对象程序设计的综合设计能力,具体掌握的基本能力有以下几方面:l 了解一个英汉小词典开发的全过程。l 熟悉一些常用控件的使用,例如文件列表、标签、文本框、按钮、列表框等。l 熟悉一些常用控件的方法、事件的使用。l 熟悉顺序文件的读写。l 熟悉字符串的处理方法。1.2 程序的基本功能设计程序,左边列表框中的单词表由读取文件英汉小词典.txt得到,选择某单词后,会在上面的文本框中显示相应的内容,并且在右边显示相应的中文解释。1.3其它功能具有搜索、增加、修改、删除等功能。若做过增加、修改、删除,应对英汉词典.txt
3、做相应的修改。1.4 扩展功能在文本框中输入单词时,程序会及时地将已输入的字符开头的所有单词显示在列表框中,供用户浏览;优化搜索算法。2 课题的分析2.1 Button1查找输入单词可以找到对应的中文意思2.2 Button添加添加词典中没有的英语单词及其中文意思2.3 Button3修改修改小词典中错误的单词及其中文意思2.4 Button4删除将单词从小词典中删除3 3模板格式说明3.1 设计窗体如下:图1.1设计窗体3.2 功能模块的划分搜索:在程序中输入单词,可搜索到此单词的中文意思。添加:向小词典中增添没有的单词。修改:修改所选中的单词。删除:删除所选中的单词。3.3 各控件的属性控
4、件 名称属性属性值备注Button1搜索clickForecolor:blackBackcolor: WhiteFont:宋体,9pt,用于搜索英文单词中文意思Button2添加clickForecolor: blackBackcolor: WhiteFont: 宋体,9pt,用于添加英文单词及中文意思Button3修改clickForecolor: blackBackcolor: WhiteFont: 宋体,9pt,修改单词及其中文意思Button4删除clickForecolor: blackBackcolor: WhiteFont: 宋体,9pt,删除单词及其中文意思Form1英汉小词典
5、loadFont:宋体,9pt, Lable1请输入对应的单词Backcolor: WhiteForecolor: blackBoredstyle: Fixed3DFont: 宋体,9pt,Textbox1TextChangedBackcolor: White输入单词Listbox1SelectedIndexChangedclickBorderstyle :fixed3DBackcolor: WhiteForecolor: WindowText显示小词典中单词内容3.4 功能模块的说明(主要流程和代码)3.4.1 Button1 用于当在textbox1中输入一个单词时,Listbox1中该单
6、词所在的位置能被选中,同时在Listbox2中能够显示单词的中文解释图1.2搜索Button2 用于向列表框中添加单词图1.3添加Button3 用于修改列表框中的单词图1.4修改Button4 用于删除列表框中选定的单词图1.5删除3.4.2主要功能模块流程图Button1搜索:单击搜索读取输入textbox1的单词判断输入内容是否为空是否提示textbox1重新输入用循环结构在数组中寻找该元素判断是否存在Msgbox(无此单词)在listbox1显示英文在listbox2显示中文不存在存在Button2添加:单击添加读取inputbox1的单词判断是否为空请重新输入读取inputbox1的
7、内容是否判断是否为空请重新输入将单词添加到listbox1中是否用循环结构判断该单词是否已经存在判断是否存在textbox1.text=Word(i,0)信息提示已存在信息提示添加成功是否在listbox1选择删除单词单词Button3修改:在listbox1选择修改单词修改单词判断单词是否为空提示单词不能为空修改汉语意思是否判断汉语意思是否为空将修改过的单词和意思替换原单词和意思信息提示内容不能为空是 否Button4删除:确定要删除吗是否结束程序删除成功3.4.3程序代码:Public Class Form1 Dim a(), b() As String Private Sub Form1
8、_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim c(1) As String Dim i As Integer FileOpen(1, 英汉小词典.txt, OpenMode.Input) 利用Fileopen()函数打开文件) Do While Not EOF(1) c = Split(LineInput(1), ) 对文本内容利用Split函数按空格分离,放到数组中,并在Listbox中显示 ListBox1.Items.Add(c(0) 向列表框中添加项目
9、ListBox2.Items.Add(c(1) Loop ReDim b(ListBox2.Items.Count - 1) 重新定义数组b() For i = 0 To ListBox2.Items.Count - 1 b(i) = ListBox2.Items(i) Next ReDim a(ListBox1.Items.Count - 1) 重新定义数组a() For i = 0 To ListBox1.Items.Count - 1 a(i) = ListBox1.Items(i) Next ListBox2.Items.Clear() 清空列表框中的项目 FileClose(1) E
10、nd Sub Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim a, b As String 定义字符串变量 a = TextBox1.Text b = Not ListBox1.Items.Contains(a) If TextBox1.Text = Then MessageBox.Show(不能输入空字符,请重新输入) End If ListBox1.Text = a End Sub Private Sub ListB
11、ox1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ListBox1.Click TextBox1.Text = ListBox1.Items(ListBox1.SelectedIndex) 选中Listbox1中的内容,该内容在Textbox1中显示 End Sub Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.S
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 英汉 词典 课程设计 VB
1、咨信平台为文档C2C交易模式,即用户上传的文档直接被用户下载,收益归上传人(含作者)所有;本站仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。所展示的作品文档包括内容和图片全部来源于网络用户和作者上传投稿,我们不确定上传用户享有完全著作权,根据《信息网络传播权保护条例》,如果侵犯了您的版权、权益或隐私,请联系我们,核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
2、文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为仲裁依据,平台无法对文档的真实性、完整性、权威性、准确性、专业性及其观点立场做任何保证或承诺,下载前须认真查看,确认无误后再购买,务必慎重购买;若有违法违纪将进行移交司法处理,若涉侵权平台将进行基本处罚并下架。
3、本站所有内容均由用户上传,付费前请自行鉴别,如您付费,意味着您已接受本站规则且自行承担风险,本站不进行额外附加服务,虚拟产品一经售出概不退款(未进行购买下载可退充值款),文档一经付费(服务费)、不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
4、如你看到网页展示的文档有www.zixin.com.cn水印,是因预览和防盗链等技术需要对页面进行转换压缩成图而已,我们并不对上传的文档进行任何编辑或修改,文档下载后都不会有水印标识(原文档上传前个别存留的除外),下载后原文更清晰;试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓;PPT和DOC文档可被视为“模板”,允许上传人保留章节、目录结构的情况下删减部份的内容;PDF文档不管是原文档转换或图片扫描而得,本站不作要求视为允许,下载前自行私信或留言给上传者【丰****】。
5、本文档所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用;网站提供的党政主题相关内容(国旗、国徽、党徽--等)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
6、文档遇到问题,请及时私信或留言给本站上传会员【丰****】,需本站解决可联系【 微信客服】、【 QQ客服】,若有其他问题请点击或扫码反馈【 服务填表】;文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“【 版权申诉】”(推荐),意见反馈和侵权处理邮箱:1219186828@qq.com;也可以拔打客服电话:4008-655-100;投诉/维权电话:4009-655-100。