vb.netstyle的简单介绍

vb.net字体的粗体斜体同时显示怎么设置

该参数枚举值，采用位运算，那么可以用Or把两者连接起来即可；

New Font(CurrentFont.FontFamily, CurrentFont.Size, FontStyle.Bold Or FontStyle.Italic)

相关问答

Q1: vb.net 代码调整字体大小

看样要重新定义个Font对象，在构造函数中定义它的大小，

With Button1.Font

Button1.Font = New Font(.FontFamily, 34, .Style, .Unit) '参数都用原来字体参数，只有大小改成你需要的。

End With

Q2: vb.net控件的BorderStyle设置为FixedSingle会出现黑线边框,可以更改他的颜色吗 比如改成红色线边框

要么重写这个控件的 OnPaint 事件，判断 BorderStyle 属性为 FixedSingle 的时候自绘其他颜色。

要么不重写，把 BorderStyle 设为 None，直接在这个控件的 Paint 事件里自绘边框，例如：

Private Sub Label1_Paint(sender As Object, e As PaintEventArgs) Handles Label1.Paint

    e.Graphics.DrawRectangle(Pens.Red, New Rectangle(Label1.DisplayRectangle.X, Label1.DisplayRectangle.Y, Label1.DisplayRectangle.Width - 1, Label1.DisplayRectangle.Height - 1))

End Sub

运行效果：

Q3: VB.net如何修改网页中style或者DIV里的元素

在你的工程中引用Microsoft Script Control 1.0 这个COM组件(注意是COM的，不要到.net组件里去找)

然后用下面的方法执行JavaScript:

Dim sc As New MSScriptControl.ScriptControl

sc.Language = "JavaScript" '设置语言种类

sc.AddCode("function TestFunc(){return 'Hello world!'}") '添加脚本代码

MsgBox(sc.Run("TestFunc")) '显示一下那段脚本的返回值（这里你将看到Hello world!字符)

虽然这个人的回答出来了但是没有解决你的问题，以上是我补充的如何使用脚本。

Q4: vb.net，FormBorderStyle，Sizable

solidco2@139.com 发给我看看

看了你的程序，你的程序里面有下面的语句

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize

Me.Size = New Size(400 + 10, 397 + 30)

Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Fixed3D

End Sub

在这里面设置了固定大小410 * 427，而且下面又把 formBorderStyle 设置成了固定大小，所以就不能改变大小了。你可以把这几行删掉或注释掉，就能够resize了。