原创力文档- 1、本文档共6页，可阅读全部内容。
- 2、原创力文档（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
- 3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。
查看更多
精品文档
实验题目 VB.NET 环境和可视化编程基 小组合作 否
础
姓名 班级 学 号
一、实验目的
1、了解 VB.NET系统对计算机软、硬件的要求。
2、掌握启动与退出 VB.NET的方法。
3、掌握建立、编辑和运行一个简单的 VB.NET应用程序的全过程。
4、掌握常用控件文本框、标签、命令按钮、图片框的使用。
二．实验环境
VB.NET和相关硬件
三、实验内容与步骤
1、 创建一个“ windows 应用程序”类型的应用程序，要求在屏幕
上显示“欢迎学习 VB.NET”，在文本框中输入你的姓名，在标
签中显示输入的姓名。
2、 编一个程序，在文本框中统计该窗口上鼠标单击的次数。
3、 对窗体三个事件过程（ Load、Click 、DoubleClick ）编程，三
个事件中装入不同的图片。
按钮、字号、内容和格式的复制练习。
四、实验过程与分析
一、
Public Class 一_1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
。
1 欢迎下载
精品文档
TextBox2.Text = TextBox1.Text
If TextBox1.Text = Then
MsgBox( 请输入姓名 , 0)
TextBox1.Focus()
End If
End Sub
Private Sub 一_1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
End Sub
End Class
二、
Public Class 一_3
Sub 一_3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles
MyBase.Click
TextBox1.Text = Val(TextBox1.Text) + 1
End Sub
End Class
。
2 欢迎下载
精品文档
三、
Public Class 一_4
Private Sub 一_4_Load(ByVal sender As System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
Me.Text = 装入窗体
Me.BackgroundImage = Image.FromFile( 一 -4a.jpg)
Me.BackgroundImageLayout = ImageLayout.Stretch
End Sub
Sub 一_4_Click(ByVal sender As System.Object, ByVal e As System
文档评论（0）