实验的一net环境和可视化编程基础

《实验的一net环境和可视化编程基础》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、实用标准文案实验题目VB.NET环境和可视化编程基础小组合作姓名班级学号一、实验目的1、了解VB.NE算机软件硬件的要求2、掌握启动退出vb.net的方法3、掌握建立、编辑和运行一个简单的vb.net应运程序的全过程4、掌握常用控件文本框、标签、命令按钮、图片框的使用二．实验环境硬件：一台装有windows系统的计算机软件：MicrosoftVisualStudio2012三．实验内容与步骤5、启动VB.NET，创建一个“Windows应用程序”类型的应用程序，要求：在屏幕上显示“欢迎学习VB.NET”，在文本框中输入你的姓名，在标签中显示输入的姓名。屏幕设计的界面如图所示:精彩

2、文档实用标准文案1.1源代码：PublicClassForm1PrivateSubButton1_Click(senderAsObject,eAsEventArgs)HandlesButton1.ClickLabel2.Text=TextBox1.TextEndSubPrivateSubTextBox1_TextChanged(senderAsObject,eAsEventArgs)HandlesTextBox1.TextChangedEndSubEndClass编一程序，在文本框中统计在该窗口上鼠标的单击的次数，如下图：精彩文档实用标准文案1.2源代码：PublicClassF

3、orm2PrivateSubTextBox1_TextChanged(senderAsObject,eAsEventArgs)HandlesMe.ClickTextBox1.Text=Val(TextBox1.Text)+1EndSubPrivateSubForm2_Load(senderAsObject,eAsEventArgs)HandlesMyBase.LoadMe.TextBox1.Text=0EndSubEndClass1.4、按照例2.2对窗体三个事件过程（Load、Click、DoubleClick）编程，三个事件中装入不同的图片；联系对鼠标Cursor的改变，当装

4、入窗体时，改变为key04.ico图标文件；当双击窗体时，鼠标恢复默认状态；联系对窗体图标Icon、边框线类型FromBorderStyle、最大按钮和最小按钮的改变。精彩文档实用标准文案PublicClass_1PrivateSub_1_Click(senderAsObject,eAsEventArgs)HandlesMe.ClickMe.Text="单击窗体"Me.Size=NewSize(264+10,256+30)Me.BackgroundImage=Image.FromFile("image/2.jpg")EndSubPrivateSub_1_CursorChanged

5、(senderAsObject,eAsEventArgs)HandlesMe.CursorChangedMe.Cursor=NewCursor("key04.ico")Me.Cursor=Cursors.DefaultMe.Icon=NewIcon("mise34.ico")EndSubPrivateSub_1_DoubleClick(senderAsObject,eAsEventArgs)HandlesMe.DoubleClickMe.Text="双击窗体"Me.MaximizeBox=FalseMe.MinimizeBox=FalseMe.BackgroundImage=No

6、thingEndSubPrivateSub_1_Load(senderAsObject,eAsEventArgs)HandlesMyBase.LoadMe.Text="装入窗体"Me.BackgroundImage=Image.FromFile("image/1.jpg")EndSubPrivateSub_1_Resize(senderAsObject,eAsEventArgs)HandlesMe.ResizeMe.Size=NewSize(246+10,256+30)Me.FormBorderStyle=Windows.Forms.FormBorderStyle.Fixed3D

7、精彩文档实用标准文案EndSubEndClass5、按钮、字号、内容和格式的复制练习，效果如下图：输入文本隶书25磅幼圆15磅复制精彩文档实用标准文案1.5源代码：PublicClassForm3PrivateSubLabel1_Click(senderAsObject,eAsEventArgs)HandlesLabel1.ClickEndSubPrivateSubButton1_Click(senderAsObject,eAsEventArgs)HandlesButton1.C