13518219792
VB.net与VB不同。
成都创新互联公司是一家专业提供茫崖企业网站建设,专注与成都做网站、网站制作、成都外贸网站建设、H5建站、小程序制作等业务。10年已为茫崖众多企业、政府机构等服务。创新互联专业网站建设公司优惠进行中。
VB.net已经有专门绘图的类。
可以定义笔刷然后用Drawing类中的方法绘制。
Private Sub DrawEllipse()
Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)
Dim formGraphics as System.Drawing.Graphics
formGraphics = Me.CreateGraphics()
formGraphics.DrawEllipse(myPen, New Rectangle(0,0,200,300))
myPen.Dispose()
formGraphics.Dispose()
End Sub
Private Sub DrawRectangle()
Dim myPen As New System.Drawing.Pen(System.Drawing.Color.Red)
Dim formGraphics as System.Drawing.Graphics
formGraphics = Me.CreateGraphics()
formGraphics.DrawRectangle(myPen, New Rectangle(0,0,200,300))
myPen.Dispose()
formGraphics.Dispose()
End Sub
DrawMode 属性：返回或设置一个值，以决定图形方法的输出外观或者 Shape 及 Line 控件的外观。
语法：object.DrawMode [= number]
DrawMode 属性语法包含下面部分：
部分 描述：object 对象表达式，其值是“应用于”列表中的一个对象。
Number 整型值，指定外观，“设置值”中有详细描述。
Private Sub Form_Load
DrawWidth = 10 ' 设置 DrawWidth.
End Sub
Private Sub Form_Click ()
Static M As Integer ' 当前 DrawMode 的设置值.
ForeColor = QBColor(Int(Rnd * 15)) ' 选择一种颜色.
M = ((M + 1) Mod 16) + 1 ' 使 DrawMode 小于或等于 16.
DrawMode = M ' 设置 DrawMode.
扩展资料：
有些属性可以在设计时通过属性窗口来设置，不用编写任何代码；而有些属性则必须通过编写代码，在运行程序的同时进行设置。可以在运行时读取和设置取值的属性成为读写属性，只能读取的属性成为只读属性。
在 Visual Basic.NET程序设计中，对象中还可以包含头，手，腿，脚等部位，其中的每个部位又可以单独作为作为被研究的对象。在 Visual Basic.NET程序设计中，整个应用程序就是一个对象，应用程序中又包含着窗体（Form），命令按钮（Command），菜单（Menu）等对象。
参考资料来源：百度百科-Visual Basic
改成：
For i As Integer = 0 To buffer.Length - 1
checksum = checksum Xor Asc(buffer(i))
Next
