参考一下下面这段代码：
创新互联公司坚持“要么做到，要么别承诺”的工作理念，服务领域包括：成都网站建设、成都网站制作、企业官网、英文网站、手机端网站、网站推广等服务，满足客户于互联网时代的海兴网站设计、移动媒体设计的需求，帮助企业找到有效的互联网解决方案。努力成为您成熟可靠的网络建设合作伙伴！
‘ 首先picturebox1 加载一张图像
FolderBrowserDialog1.Description = "选择图片文件夹导入图片"
FolderBrowserDialog1.ShowDialog()
path = FolderBrowserDialog1.SelectedPath()
If path = "" Then Return
strSrcFile = Dir(path "\*.tif")
PictureBox1.Image = Image.FromFile(path "\" strSrcFile)
’ 然后再在picturebox1中用graphic画图而不清空原图像
' 建立一个画图对象
Dim g As Graphics = Me.PictureBox1.CreateGraphics
‘ 定义画笔
Dim myPen As System.Drawing.Pen = New System.Drawing.Pen(Color.Blue)
’ 画出矩形框并且填充颜色（颜色保持50%的透明度，使得下面原来的图片背景能看得到）
g.DrawRectangle(myPen, New System.Drawing.Rectangle(50, 50, 30, 20))
g.FillRectangle(New SolidBrush(Color.FromArgb(50, Color.YellowGreen)), New System.Drawing.Rectangle(50, 50, 30, 20))
' 最后释放画图对象
g.Dispose()
效果大致如下图所示：
和其它语言是一样的
写法不同而已
类关键字
在下面的例子中，代码包含了一个关键字End
Class。这是一个新的关键字，使用它的目的是为了在一个源文件中包含多个类，这点正是VB.NET与VB6在创建类区别的精髓所在。每当我们在VB.NET中创建类的时候，我们只是简单地将所有的的代码包含在Class和End
Class
之间。例子代码如下：
Public护鸡篙课蕻酒戈旬恭莫
Class
TheClass
Public
Sub
MyWorks()
End
Sub
End
Class
另外在一个特定的源文件(后缀名为.vb)中,我们可以使用多个Class...End
Class块。
希望能帮到你
For i As Integer = 1 To 15
Controls("TextBox" i).Text = i.ToString
Next
'如果TextBox在GroupBox1中，需要把Controls改成GroupBox1.Controls
VB.NET里所有的类都直接或间接派生自Object类，它是完全面向对象的，使用的所有方法，属性都是由相应对象提供，所以，所有的都是对象。
人类是一个类，你是人，我是人，都是人类的实例(instance)，或称对象(object)。一个类描述一类事物，描述这些事物所应具有的属性，如人有身长、体重、文化程度、性别、年龄、民族等。
一个对象是类的一个实例，它具有确定的属性，如张三(人的实例)身高180，体重70公斤，大学本科，男，21岁，汉族。
人类只有一个，人类的实例可以有无数个。
对象可以被创建和销毁，但类是无所不在的。
例如，桌子是一个类， 人们不断打造各种尺寸和风格(属性)的桌子(桌子的实例)，打造桌子， 又不断毁坏桌子，年复一年，旧的去了，新的又来，但桌子的概念没变，它是一个抽象的概念。应该称它为桌子类，以区别于打造的具体桌子。
