后台-插件-广告管理-首页/栏目/内容广告位一(PC) |

一:试验目的:1 利用vb程序设计语言制作随机图形2 利用vb程序设计语言制作动画二:实验内容: 1先进行界面分布和相应的属性设置 2编写代码如下: 1,Private Sub Command1_Click()Timer1。
Enabled = TrueTimer1。Interval = 100End SubPrivate Sub Command2_Click()Form1。
ClsEnd SubPrivate Sub Command3_Click()Timer1 = FalseEnd SubPrivate Sub Timer1_Timer()Form1。 Circle (Int(Rnd * 8000), Int(Rnd * 8000)), Int(Rnd * 800)FillStyle = Int(Rnd * 7)FillColor = QBColor(Int(Rnd * 15))Line (Int(Rnd * 8000), Int(Rnd * 8000))-(Int(Rnd * 8000) 1000, Int(Rnd * 8000))End Sub2,Public TopBottom, LeftRight As StringPrivate Sub Form_Click() If Timer1。
Enabled = False Then Timer1。Enabled = True Else Timer1。
Enabled = False End IfEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer) Select Case KeyAscii Case 61 Timer1。 Interval = 10 Case 45 Timer1。
Interval = 100 End SelectEnd SubPrivate Sub Form_Load() TopBottom = "0" LeftRight = "0"End Sub。
VB编程中网格控件的选用及使用方法 内容提要: The software of visual basic developed by Microsoft corporation is becoming one of the main develop tools at today。
As it's remarkable peculiarity, the Grid control has very great practical and active use。 This topic discusses how to use the grid control of VB to develop pratical software and how to use it conveniently and simply。
微软公司的面对对象的程序开发软件VB(Visual Basic)日益成为当前所流行的主流开发工具。作为其显著的特色之一,VB所提供的网格类控件,在实际的数据库管理系统的开发过程中具有很大的实用性和灵活性。
本文旨在讨论在使用VB的实际开发过程中,如何有选择的使用VB所提供的网格类控件以及如何方便、简洁的去使用。 关键词汇: Component-Based Development Virtual Data Management Spread's Calc Engine 构件开发 虚拟数据管理 计算引擎 随着基于构件开发(Component-Based Development)技术的发展,供开发者使用的软件构件越来越多,单就VB中可使用的网格类控件也有许多种。
网格类控件常用在数据库管理系统的开发中,用来直观地显示表或视图的二维关系,在对数据的操作上,有些控件也提供了很多便捷的方法。 同样是完成这些显示和操作数据的功能,面对各式各样的控件,选择那种来达到目的,成了软件开发者必须考虑的问题。
唯有选择了一个好的控件,才能提高开发效率,增强软件的功能,达到事半功倍的效果。 下面,本人根据自己长期以来积累的实际经验,总结出以下几点网格控件的选用应考虑的方面: 第一,要考虑控件的实际功能。
功能强、接口多的控件可以增强应用软件的质量,也可减少编程工作量,当然,这要结合应用需求来定,并不是功能越多越好。提供的功能多了,控件本身就很大,占好几兆空间,增加了程序的冗余代码。
另外,一些功能闲置,灵活性太强也可能导致最终用户不易掌握使用。 第二,控件的稳定性要强。
作为应用程序的基石,不应选用那些控件本身容易出错,补丁(patch)太多的版本。 第三,控件的易用性要高。
选用那些属性配置合理,事件触发机制明晰流畅,易于设计和使用,项目组中的程序员都容易接受掌握的控件。 以下简要介绍几种网格类控件的特点,以供选用。
Grid控件: Grid控件可显示简单的二维表格,不用和数据库直接连接,具有滚动条、行头、列头等特性,运行时可用鼠标调整行列的宽度,可用于浏览数据,若想对数据进行编辑,需结合TextBox控件,或采取其他变通方法。 下面所示画面即为日本东京社会调查研究所开发的《要员管理系统》中硬件管理部分的画面。
画面中的下部即为Grid控件,定义其名称为GrdHardComp。使用时,要首先在下图所示的属性窗口中定义其行列数,控制条格式,字体大小,填充格式,鼠标模式等特性。
然后,可以动态的划分其间距: GrdHardComp。ColWidth(0) = GrdHardComp。
Width * 1 / 6 GrdHardComp。ColWidth(1) = GrdHardComp。
Width * 5 / 24 GrdHardComp。 ColWidth(2) = GrdHardComp。
Width * 1 / 6 GrdHardComp。ColWidth(3) = GrdHardComp。
Width * 1 / 6 GrdHardComp。C olWidth(4) = GrdHardComp。
Width * 3 / 24 GrdHardComp。ColWidth(5) = GrdHardComp。
Width * 1 / 6 GrdHardComp。ColWidth(6) = GrdHardComp。
Width * 1 / 6 Private Hards() As M_Hard 定义其标题: GrdHardComp。 Row = 0 ' GrdHardComp。
Col = 0 GrdHardComp。FixedAlignment(GrdHardComp。
Col) = 2 GrdHardComp。Text = "构成番号" GrdHardComp。
Col = 1 GrdHardComp。 FixedAlignment(GrdHardComp。
Col) = 2 GrdHardComp。Text = "构成机器区分"① … … 在数据向Grid中写入或取出时,为了便于大量的数据同时,简便地写入与修改,可以定义一个类型。
如下: Type M_Hard Number As String OrderNum As String MachKind As String MachKindName As String … … End Type (其中Number等均为要输入的图示条目) ;Private Hards() As M_Hard Hards(),此时就作为数据的传输变量,进行Grid与TextBox之间的数据传输。 数据向类内写入: If HardComp。
RecordCount > 0 Then HardComp。MoveFirst Do Until HardComp。
EOF ReDim Preserve Hards(H%)// H%为记数变量。 Hards(H%)。
OrderNum = HardComp![ OrderNum]//输入编号 Hards(H%)。MachKind = HardComp![ MachKind]//种类 Hards(H%)。
MachKindName = HardComp![ MachKindName]//分类名 Hards(H%)。 MachName = HardComp![ MachName]//名称 … … loop HardComp。
MoveFirst 类内数据向Grid内写入: GrdHardComp。Row = H% + 1//记录数统计 GrdHardComp。
Col = 0 GrdHardComp。Text = " " & Hards(H%)。
OrderNum GrdHardComp。Col = 1 GrdHardComp。
Text = " " & Hards(H%)。MachKind GrdHardComp。
Col = 2&nb sp;GrdHardComp。Text = " " & Hards(H%)。
MachKindName GrdHardComp。Col = 3 GrdHardComp。
Text = " " & Hards(H%)。MachName GrdHardComp。
朋友您好!我只会做登录窗口: 用VB编写登录窗口,其具体方法如下: 界面设计: 打开“VB6。
0”,出现“新建工程”对话框,选择“标准EXE”单击“打开”即可新建一个工程。新建一个工程后,VB自动生成了一个窗体,其默认的名称是Form1,且显示的标题也是Form1,显然与我们要编写的程序不符。
我们可以更改这些设置,方法是:点击Form1窗体,在右边的属性窗口中的“名称”后输入“Denglu”(在后面讲的Denglu就是指的这个窗体),在“Caption”后输入“登录窗口”。窗体设置好后,我们便可以将控件放置到这个窗体中去了。
“登录窗口”中主要用到的是TextBox(文本框)控件,该控件主要是用于接收用户输入的文字并显示出来。 在该程序中我们便可以使用TextBox控件接收用户输入的信息来判断是否是合法的用户。
另外,我们还将用到Label(标签)控件及CommandButton(命令按钮)控件。Label控件用来显示“用户名”及“密码”标题;CommandButton控件用来设计“确定”及“取消”按钮。
下面我们将这些控件放置到窗体中:在工具箱中选择“Label”控件,在窗体中拖动鼠标直到一定的大小,然后在属性窗口中的“Caption”属性后为输入“用户名”,然后在其下方再拖动一个Label控件,将Caption的值改为“密码:”;在工具箱中选择“TextBox”控件,在“用户名”后拖动一个TextBox控件,用同样的方法在“密码:”后拖动一个TextBox控件,然后在“属性窗口”中将Text的值改为空(即删除默认的Text1),为了不显示出用户输入的密码,我们将第二个TextBox控件的PasswordChar属性设置为*,这样在用户输入密码时显示的就是*了;在工具箱中选择“CommandButton”控件,将其拖动到窗体的下方(一共两个),分别设置其Caption属性为“确定”和“取消”。 调整好这些控件的位置后即可完成界面的设计。
程序代码: 该程序的主要目的是要判断输入的用户名是否合法,所以我们首先编写判断用户名的程序代码。双击“确定”按钮,添加如下的程序代码:(黑体部分为系统自动生成的代码,楷体为注释) Private Sub Command1_Click() ′判断是否输入了用户名 If Text1。
Text=″″ Then ′如果Text1为空,即没有输入用户 MsgBox ″请输入用户名!″,vbOKOnly+vbCritical,″错误″ Exit Sub ′退出这个过程 Else ′如果输入了用户名 If Text1。Text=″软件世界″ And Text2。
Text=″12345″ Then ′如果输入的用户名是″软件世界″且密码为″12345″ MsgBox ″你是合法用户,欢迎进入!″,vbOKOnly+vbInformation,″欢迎进入″ Else ′如果不是″软件世界″或密码不是″12345″ MsgBox ″用户名或密码错误!″,vbOKOnly+vbCritical,″错误″ Text1。 Text=″″ Text2。
Text=″″ ′清空Text1及Text2控件中的文本内容,让用户重新输入 End If End If End Sub 在这一段代码中,我们使用了If…Then…Else…End If。这是一个条件判断语句,If Text1。
Text=″″ Then这句代码则是判断Text1是否为空,如果为空,这个条件就成立,则执行Then后的语句,如果Text1不为空,则这个条件不成立,程序将会跳到Else处,执行Else后的语句。 程序测试: 现在我们可以单击“F5”键来运行这个程序,看看其运行效果。
直接单击“确定”按钮,将会弹出一个对话框;在“用户名”后输入“软件世界”,“密码:”后输入“12345”,再单击“确定”按钮,此时便会出现一个“欢迎进行”的信息框。怎么样,一个属于自己的“登录窗口”就制作好了。
----------------- 由于时间关系,我没有排版,有点乱,不好意思~~。
4.实习报告目的锻炼自己的动手能力,将学习的理论知识运用于实践当中,反过来检验书本上理论的正确性。
将自己的理论知识与实践融合,进一步巩固、深化已经学过的理论知识,提高综合运用所学过的知识,并且培养自己发现问题、解决问题的能力,加强对市场营销过程的认识。扩展资料 更广泛的直接接触社会,了解社会需要,加深对社会的认识,增强对社会的适应性,将自己融合到社会中去,培养自己的.实践能力,缩短我们从一名大学生到一名工作人员之间的思想与业务距离。
为以后进一步走向社会打下坚实的基础。 了解公司部门的构成和职能,整个工作流程,从而确立自己在公司里最擅长的工作岗位。
为自己未来的职业生涯规划起到关键的指导作用。 培养学生理论结合实际,从实际出发,发现问题分析问题和提出解决方法的能力,训练学生从事专业技术工作及管理工作所必须的各种基本技能和实践动手能力。
5.求一篇VB实训报告范文一周实训时间转瞬即逝,在这段短暂的时间里,为了完成一个不起眼的小程序,我们可以说是绞尽脑汁,终于,在不懈的奋斗下,在老师的帮助下,在辛勤的努力下,在党和国家的呼唤和号召下,这个伟大的程序终于让我这个无产阶级分子征服了! 我们的实训是一段万分艰苦的摸索的过程,其艰苦比得上红军两万五的长征,在跌打滚爬中,我屡败屡战,屡战屡败,终于成功的那一刹那,我潸然泪下,这是辛苦劳动的成果啊!!这是革命的果实啊!!这是新一代劳动人民传世之作啊!! 程序本身并不是十分麻烦,事实上,就我这个平常上课不听老师讲课,一直在下面搞小动作,考试是靠临阵磨枪来搞定的没有意志没有毅力没有实力没有英文水平的只有曾经做过的两个小例子的没有思想觉悟的小学生都能在短短的第二天基本完成,但是老师告诉我,得意和骄傲是身为程序员的不可饶恕的罪行,做为一个好的程序员,他必须是有不懈追求的精神,精益求精的追求,不断完善的理念,对理想崇高的追求,终于,在一次又一次的被退回的过程中,我终于明白了一个人生的至理——没有最好,只有更好,没有最复杂,只有更复杂,没有最后的难题,只有下一个难题,没有一文不值,只有一钱不值…… 如果说第一天是摸索,第二天是创业,第三天是完善,第四天就是革命了!一个又一个的问题在我的脑细胞下伏首称臣,一个又一个枷锁被我斩断,一坐又一坐高山被我征服,在欢庆胜利的喜悦的同时,我看着下面依然在不懈的奋斗中的同胞姐妹们,心里叫一个爽……不,心里叫一个着急啊!!不能只沉迷于自己一时的胜利而骄傲,不能只沉迷于自己的国家的解放,还有千千万万的穷苦百姓还在水深火热中挣扎哀号,我们不能将共产主义发扬到全世界的每一个角落,那么革命就依然没有成功!为了彻底将编程的恐惧从广大劳动人民的心中扫荡出去,我毅然决定放下心中的坚持,放开门户之见——历史证明,闭关锁国是没有出路的,只有交流和共享才是王道啊!!——将自己的一点点浅薄的智慧和简陋的经验传输给依然在编程战线上不懈努力的广大战友们!路漫漫其修远兮,让我们携手共进,开创美好的明天!! 实训结束在即,但是学习的路途依然漫长,学海无涯苦做舟,书山有路勤为径,我们必须发扬老一辈无产阶级革命分子的不怕苦不怕累不怕精神疲惫的大无畏精神,为了能够超日赶美,成为新一代中国程序员而努力!! 日本的程序员是相当可怕的,他们的野心昭然若揭,在现在中国的游戏市场上到处可以看到他们的名字——square-enix,capcom,namco,hudson……小日本的野心就是在文化上冲击我们中国伟大的华夏文明,看着现在的中国的孩子们在电视机和电脑前迷恋的样子(包括我自己),我的心在滴血啊!!我的灵魂在怒吼啊!!我们中国难道就不能反击了吗?就要苦苦在挨打吗?不!!我们也有过仙剑奇侠传的伟大的过去(虽然比不过人家的FF,DQ),我们也有过金山居和大富翁!我们不怕死不怕累不怕精神疲惫,誓要把小日本的精神侵略阻挡在国门外!!不,我们还要反侵略!!啊,伟大的祖国…… 美国的程序员也是相当可怕的,别的不说,终极BOSS比尔·盖吃的大名大家都应该知道吧?这小样凭ms-dos发家,windos现在是世界垄断性的程序了,这小子的野心还不止如此,对中国大陆的侵略早在1995年就开始了!!这小样在欧美和亚洲都有一批铁了心追随他的死硬顽固拥有邪恶势力的同盟和追随者,EA,UBISOFT等就是其中的佼佼者,同志们,我们不能再软弱下去了,否则国门将破,我等华夏儿女将伦为他们番帮蛮夷的打工仔啊!!现实危机刻不容缓,国家兴亡匹夫有责,皮之不存毛将焉附…… 总而言之言而总之,程序员之路是一条漫长而艰辛的道路,从我做起,前人植树后人乘凉,让我们从现在开始就努力吧!。
6.vb计算机毕业设计的实习报告应该怎么写实习的目的和要求
实习目的:
毕业实习是一个重要的综合性实践环节,旨在培养学生综合运用所学知识和技术,针对具体应用问题,进行分析、设计和解决问题的能力,拓展学生的知识面,练习和掌握新而实用的开发技术,为毕业设计做好技术准备和课题调研等工作。按规范化方法逐步完成毕业设计工作。
实习要求:
在实习中要全面做好自己的本职工作,要当日事当日做完,还要进行本专业外的知识的学习,与同学进行知识的互相学习,对不懂的内容及时向老师进行请教,最终达到实践与学习的同步进行,对知识的温新巩固和对新知识的吸取。三七毕业设计网上有完整的,你可以去看看!
7.VB实训感想我个人认为,学vb有点不知怎么说的感觉,甚至是一种说不出的感觉。
虽然有时候感到那样的感觉,但是一种崇高的敬意在黑暗中油然而生,让人感到一片光明,啊,多美好的感觉啊,所以就产生了这样的感觉。多么奇妙的感觉啊,它真是让人捉摸不透。它时常像个良师益友,但有时却像咆哮的狮子。
让人在莫明的欣慰中获得某种自然而然的成就感,或者在彷徨和无助中渐渐感到失落,甚至让人恨它。
啊,也许这就是生活吧,因为你不能企图拥有,但却又舍不得放弃。但是如果,稍微理智一点的话,我们应该学会享受这个即不能拥有又不能放弃的过程,正如某个哲学家所说,生活的本质就是过程。或者是一种在路上的感觉。
只要不断跌倒,然后不断的爬起,等到头破血流的那种程度的时候,那时侯,也许,你会说:“我终于会了一点vb”,啊,这就是生活的本质吧。
多么奇妙的感觉,让人犹如在云端漫步一般,一切都是显得那么的飘飘然。幸福的感觉霎时间填充着饱受创伤的心灵。
但是一种莫明的失落感渐渐取代幸福,因为,你不可能一点小小的进步便沾沾自喜,因为,要走的路还很长,vb可不是你轻易就精通了的。因为,在学习的道路上,永远不会有一个结果让人说,够了,因为我已经完全会了。不,学习是一条没有止境的道路。只有不断的学习,才能不断进步。
以上言论不代表本人立场,如有雷同,纯属巧合。
附:如果是需要演讲的,就请加下面几句
谢谢大家,今天获得这样的殊荣,我想哭,但是在哭之前我已学会如何不哭。(笑)首先,我要谢谢评委对我在工作上的认可和支持,谢谢
然后,啊,我要谢谢我的父母,是他们多少年来在默默对我的关系和鼓励,才使我登上这荣耀的讲台,感谢他们
然后,我还要感谢在我身边一直默默支持着我的人,感谢他们
然后流下感动的眼泪………………