锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net画图填色 vb画图形

IT技术减小

VB.net中如何画图？VB.net与VB不同 。
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
vb.net 绘图，重绘知识继承（Inherits）控件就可以重写它的属性和方法，图标可以在paint中重绘 ， 用gdi ， 工具主要在drawing和drawing2d中 。
combobox弹出的框增加图标吗？个人看法可能需要得到那个句柄，才可以重绘，但那个好像是一体的 ， 不知道能不能弄到句柄 。
textbox可以自定义高度 。只是以行高度为单位，改变字体大小即可，没必要重写吧 。
我也自学 ， 感觉基础容易学 ， 进阶资料少 。循序渐进也没序可循，基本是在摸索 。
都是想到什么问题，就立下一个目标 ， 然后攻破他，结果可能是尝试几天后，发现目标超出能力范围 。
晦涩是相对的，实践出真知，多动手，基础就好了 。
在vb.net中，paintcanvas里面填满了颜色，我想通过点击一个按钮来完成清除整个画布内容的效果，要用GreateGrahpics函数vb.net画图填色，比如要向 Panel1，填充颜色vb.net画图填色：
Dim g As Graphic=Panel1.CreateGraphics
Dim b as New Brush(Color.Blue)
g.FillRectangle(b,Panel1)
写vb.net画图填色的比较粗，意思就是这样vb.net画图填色的 ， 你可以边看帮助边细细完成
VB.NET：绘图后 ， 如何才能取得所绘图形的颜色值？加入一个TextBox控件,一个Command控件
代码:
Private Declare Function GetPixel Lib "gdi32" (ByVal hDC As Long, ByVal X As Long, ByVal Y As Long) As Long
Private Declare Function GetWindowDC Lib "user32" (ByVal hWnd As Long) As Long
Private Sub Command1_Click()
Dim Color As Long
WindowDC = GetWindowDC(0) '获取屏幕的设备场景
Color = GetPixel(WindowDC, 500, 100) '获指定点的颜色
'分解RGB颜色值
R = (Color Mod 256) '红色
b = (Int(Color \ 65536)) '蓝色
G = ((Color - (b * 65536) - R) \ 256) '绿色
Text1.BackColor = RGB(R, G, b)
End Sub
【vb.net画图填色 vb画图形】关于vb.net画图填色和vb画图形的介绍到此就结束了 ， 不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站 。

    推荐阅读


    上一篇：电脑u盘怎么找到文件，u盘在电脑上怎么查找

    下一篇：YY直播助手软件系统，yy直播小助手