vb.net获取字号 vba 获取文件名

visual basic 2005中代码 “Label1.Font.Size = 15”在运行时提示“Size属性为只读”是怎么回事?

在VB.NET中,对象的字体、字号、样式等是通过Font属性设置的。总体格式是“ Object.Font = New Font(字体, 字号, 字形)”。例如:

在久治等地区,都构建了全面的区域性战略布局,加强发展的系统性、市场前瞻性、产品创新能力,以专注、极致的服务理念,为客户提供做网站、成都网站制作 网站设计制作按需定制,公司网站建设,企业网站建设,品牌网站制作,全网整合营销推广,成都外贸网站建设,久治网站建设费用合理。

Label1.Font = New Font("宋体", 15, FontStyle.Underline)

Label1.Font = New Font("字体", 15, FontStyle.Regular)

Font.Size是只读属性,只能用于获取字号。例如:

Dim iSize As Int32 = Label1.Font.Size

vb.net 获取textbox指定字符

Dim s() As String = TextBox1.Text.Split("/".ToCharArray)

For i As Integer = 0 To s.Length - 1

MsgBox("第" i.ToString "个字串:" s(i))

Next

在vb.net如何获取特位置的字符

首先找到第五行,就是找vbcrlf,然后找第三个数,就是找逗号

有两种办法,一种是纯字符串处理的办法,另一种是使用数组的办法,两种方法都很简单

纯字符串处理的办法适用于任何情况下,而使用数组因性能问题,只适用于源字符串不太大的情况下

使用数组的办法:

'所有字符串

Dim dString As String = "" '请为字符串赋值

Dim dLines = dString.Split({vbCrLf}, StringSplitOptions.None)

'至少有三行才能向下执行

If dLines.Length 3 Then Return

'获取第三行

Dim dRow = dLines(2).Split(","c)

'至少有4列才能向下执行

If dRow.Length 4 Then Return

'获取第4列

Dim dValue = dRow(3)

'dValue就是想要的数据

vb.net 字体设置

给点提示吧,已粗体为例(完全是我自己的方法,不知别人是怎么做的):

'先获取选择的字体信息(字体、大小、样式。。。)

Dim currentFont As System.Drawing.Font = RichTextBox1.SelectionFont

'在重新定义某种样式的时候,不丢失其他信息

RichTextBox1.SelectionFont = New Font(currentFont.FontFamily, currentFont.Size, FontStyle.Bold)

vb.net怎么提取字符串?

在VB中是这样的,没学过VB.net,你变换一下就可以了

按你说的,用用Left,Right和Mid

Option Explicit

Private Sub Command1_Click()

Dim Num(2)

Num(0) = Val(Left(Label1.Caption, 2))

Num(1) = Val(Mid(Label1.Caption, 3, 1))

Num(2) = Val(Right(Label1.Caption, 2))

MsgBox "Num(0)="  Num(0)  vbCrLf  "Num(1)="  Num(1)  vbCrLf  "Num(2)="  Num(2)

'如果想测试是不是可以计算,可以用这一句

'MsgBox "Num(0)+1="  Num(0) + 1  vbCrLf  "Num(1)+1="  Num(1) + 1  vbCrLf  "Num(2)+1="  Num(2) + 1

End Sub

Private Sub Form_Load()

Label1.Caption = "12345"

End Sub

有问题请追问,满意请采纳!

计算机VB.net中怎样把代码编辑器窗口里的字的字号 变大

工具-- 选项-- 环境-- 字体和颜色

剩下的自己看对话框吧!^_^


名称栏目:vb.net获取字号 vba 获取文件名
文章源于:http://scyanting.com/article/dodosod.html