锐客网

  1. 首页 > 生活百科 > it技术 > >

vb.net标尺 vb中怎样用标签显示计算结果

IT技术标尺

VB.NET中，如何取得标题栏的高度有两种方法：
1. Windows.Forms.SystemInformation.CaptionHeight
这个方法取的是系统参数，它表示的标题栏的 蓝条条部分的高度(不包括边框)
2. Me.ClientSize.Height - Me.Height
这种方法 获得的是当前窗体的标题栏加上它的边框的高度 。
通常建议使用第2种方法 。更准确一些 。
比如你的窗体是个没有标题栏的，用第一种方法返回值就 不 准确了 。
VB.NET打印编程问题，打印机为激光打印机 。打印做得不多vb.net标尺，以前做套打时发现，每台打印机定位都不一样，于是每台机子都加vb.net标尺了个偏移设置
我vb.net标尺的做法在白纸上打上一标尺，和一个上下边距为2CM的交叉点，然后用标尺量这2CM的偏移 ， 设置完后，在这台打印机打印时，就给纸张加个偏移量，打印就正常vb.net标尺了 。可能vb.net标尺你的原因和我一样 。
另外也想问你一下，你这个条码是用什么打的 。早先，我用立象的条码打印机打不干胶，很简单，激光打没用过，可能下次我也要用条码打?。乙灿肰B.net 。求教.
VB.NET坐标变换Dim g As Graphics = PictureBox1.CreateGraphics
g.TranslateTransform(2, 2)‘定义原点坐标
g.ScaleTransform(1, -1)’X轴不变vb.net标尺 ， 反转Y轴
以PictureBox1中（2,2）点为新vb.net标尺的原点（0,0）
向右为X轴正方向向上为Y轴正方向
vb.net 制作行标尺左边放一个专门放行数的listbox，根据右边的行数自动生成行号
Private Sub RichTextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RichTextBox1.TextChanged
Dim arr() = RichTextBox1.Text.Split(vbLf)
Dim str As String
str = ""
For i = 1 To arr.Length
str = strivbCrLf
Next
RichTextBox2.Text = str
End Sub
接下来是两个listbox的同步滚动，可以参考这篇文章：
怎样在vb.net的picturebox里画出坐标?。?/h2>自己用GDI 画的无论什么什么尺寸的picturebox都行
不过别太小了o(∩_∩)o
【vb.net标尺 vb中怎样用标签显示计算结果】代码放在哪里自己决定啊
最好是放在 picturebox的resize时间里
每次picturebox大小改变都重画一次坐标
Dim b As New Bitmap(PictureBox1.Width, PictureBox1.Height)
Dim g As Graphics = Graphics.FromImage(b)
g.Clear(Color.White)
Dim p As New Pen(Color.Black)
p.EndCap = Drawing2D.LineCap.ArrowAnchor
g.DrawLine(p, 30, PictureBox1.Height - 30, 30, 30)
g.DrawLine(p, 30, PictureBox1.Height - 30, PictureBox1.Width - 30, PictureBox1.Height - 30)
Dim i As Integer
Dim bs As New SolidBrush(Color.Green)
Dim po As New Point
po.X = 0
po.Y = PictureBox1.Height - 35
For i = 700 To 1000 Step 50
g.DrawString(i, Me.Font, bs, po.X, po.Y)
g.DrawLine(p, po.X28, po.Y5, po.X30, po.Y5)
po.Y -= (PictureBox1.Height - 100) / 6
Next
po.X = 30
po.Y = PictureBox1.Height - 30
For i = 0 To 40 Step 5
g.DrawString(i, Me.Font, bs, po.X, po.Y5)
g.DrawLine(p, po.X, po.Y2, po.X, po.Y)
po.X= (PictureBox1.Width - 100) / 8
Next
PictureBox1.Image = b
vb.net标尺的介绍就聊到这里吧 ， 感谢你花时间阅读本站内容，更多关于vb中怎样用标签显示计算结果、vb.net标尺的信息别忘了在本站进行查找喔 。

    推荐阅读


    上一篇：超融合服务器搭建 超融合服务器功耗低怎么办

    下一篇：直播用什么软件伴唱，直播用什么软件放伴唱