189 8069 5689

增大文本框vb.net vb文本框里文字放大代码

在VB中,怎么设置文本框的大小和位置?

在VB中添加TextBox控件到窗体可:

创新互联建站专注于沧州网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供沧州营销型网站建设,沧州网站制作、沧州网页设计、沧州网站官网定制、小程序定制开发服务,打造沧州网络公司原创品牌,更为您提供沧州网站排名全网营销落地服务。

用工具箱绘制控件

1.单击要绘制的控件的工具—此时是“文本框”。

2.将指针移到窗体上。该指针变成十字线,如图 2.3 所示。

3.将十字线放在控件的左上角所在处。

4.拖动十字线画出适合您要的控件大小的方框。(拖动的意思是按住鼠标左键用鼠标指针移动对象。)

5.释放鼠标按钮。控件出现在窗体上。

在窗体上添加控件的另一个简单方法是双击工具箱中的控件按钮。这样会在窗体中央创建一个尺寸为缺省值的控件;然后再将该控件移到窗体中的其它位置。

调整大小、移动和锁定控件

注意出现在控件四周的小矩形框称作尺寸句柄;下一步可用这些尺寸句柄调节控件尺寸。也可用鼠标、键盘和菜单命令移动控件、锁定和解锁控件位置以及调节控件位置。

调整控件的尺寸,请按照以下步骤执行:

1.用鼠标单击要调整尺寸的控件。

选定的控件上出现尺寸句柄。

2.将鼠标指针定位到尺寸柄上,拖动该尺寸柄直到控件达到所希望的大小为止。

角上的尺寸柄可以调整控件水平和垂直方向的大小,而边上的尺寸柄调整控件一个方向的大小。

3.释放鼠标按钮。

- 或 -

用 SHIFT 键加上和箭头键调整选定控件的尺寸。

要移动控件,请

用鼠标把窗体上的控件拖动到一新位置。

- 或 -

用“属性”窗口改变 Top 和 Left 属性。

选定控件后,可用 CTRL

键加箭头键每次移动控件一个网格单元。如果该网格关闭,控件每次移动一个像素。

VB.net中如何在代码中设置文本框字体的大小

Private Sub RadioButton1_CheckedChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged

Dim a As FontStyle

a = Me.TextBox1.Font.Size

Dim b As Single = a * 10

Me.TextBox1.Width = Me.TextBox1.Width * 10

Me.TextBox1.Font = New System.Drawing.Font("PMingLiU ", b, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(136, Byte)) '放大10倍,若仅10号字体,则将b改为10

End Sub

在vb.net怎样利用代码修改文本框的大小

以下代码添加到你需要触发的事件里:

1,把你的textbox的Multiline改成True(如果此处不修改你后面修改大小的时候只能修改width,而不能修改height),如果希望自动修改height,你的字体也要修改

2,添加这句代码(假设你要修改大小的textbox就是textbox1):

TextBox1.Location = New System.Drawing.Point(5, 20) '5, 20是你定义的针对窗体左上角点的X和Y位置

textbox1.size= New System.Drawing.Size(500, 600)‘500, 600是你自己定义的宽(width)和高(height)

3,或者直接写成:

TextBox1.Multiline = True’允许修改多行文本框

TextBox1.Location = New Point(5, 20) '5, 20是你定义的针对窗体左上角点的水平X和垂直Y位置

TextBox1.Size = New System.Drawing.Size(500, 600)‘500, 600是你自己定义的宽(width)和高(height)

vb里怎么让单击后文本框扩大,同时文本框内的文字按照规定要求扩大N倍

1、打开Visual

Basic

6.0软件,新建一个标准exe工程,在窗体上添加一个Text控件和一个Command控件,Text1的文本在窗体创建时内容为"Visual

Basic",Command的Caption属性值为"放大3倍";

2、双击窗体和双击Command进入代码编辑窗口,编写代码如下:

Private Sub Command1_Click()

Text1.Width = 3 * Text1.Width

Text1.Height = 3 * Text1.Height

Text1.Font.Size = 3 * Text1.Font.Size

End Sub

Private Sub Form_Load()

Text1.Text = "Visual Basic"

End Sub

3、点击运行或者按下F5按键,运行工程,点击"放大3倍"按钮,可以看到text1文本框被放大的同时,字体也被放大相同的倍数。

点击按钮前:

点击按钮后:


当前名称:增大文本框vb.net vb文本框里文字放大代码
文章地址:http://jkwzsj.com/article/dopojcp.html

其他资讯