在vb.net中以编程方式创建文本框时设置字体大小

时间:2015-11-03 00:28:46

标签: vb.net

我使用Visual Studio 2015社区在vb.net中编程。我正在使用下面的代码以编程方式创建一个文本框。我的问题是 - 如何在创建框时设置文本字体大小。我环顾四周,发现下面的星号之间的代码,但我得到一个编译错误,说Font是模棱两可的。对于使用f作为Font语句的第一个Font以及下一行中New之后的Font,会发生这种情况。我对vb中的编程非常陌生,并且非常感谢你能给予的任何帮助。感谢。

    tbnum.Location = New System.Drawing.Point(30, tvposition)
    tbnum.Size = New Size(45, 20)
    '********************
    Using f As Font = tbnum.Font
        tbnum.Font = New Font(f.FontFamily, f.Size + 2, f.Style)
    End Using
    '********************
    tbnum.Text = panposition.ToString
    tbnum.Name = "tbnum" + panposition.ToString
    tbnum.AllowDrop = True
    tbnum.TabStop = False
    tbnum.TextAlign = HorizontalAlignment.Right
    tbnum.BackColor = ColorTranslator.FromHtml(myYellow)
    tbnum.ReadOnly = True
    tbnum.Enabled = False
    Controls.Add(tbnum)

1 个答案:

答案 0 :(得分:1)

您获得的错误意味着您有两个名为Font的类。您是否使用包含名为Font的类的任何库?

在所有情况下,要消除歧义,请使用完整的班级名称,即System.Drawing.Font,如下所示:

Using f As System.Drawing.Font = tbnum.Font
    tbnum.Font = New System.Drawing.Font(f.FontFamily, f.Size + 2, f.Style)
End Using