1）在名称为Form1的窗体上绘制一个文本框，名称为Txt1，字体为“宋体”，文本框中的初始。。。

1）在名称为Form1的窗体上绘制一个文本框，名称为Txt1，字体为“宋体”，文本框中的初始内容为“二级VisualBasic”；再绘制一个命令按钮，名称为Cmd1，标题... 1）在名称为Form1的窗体上绘制一个文本框，名称为Txt1，字体为“宋体”，文本
框中的初始内容为“二级Visual Basic”；再绘制一个命令按钮，名称为Cmd1，标题为“改
变字体为楷体”。请编写适当事件过程，使得在运行时，单击命令按钮，则把文本框中文
字的字体改为楷体，如图50-1所示。展开

 我来答

1个回答

#合辑# 面试问优缺点怎么回答最加分？

wu_kang_lin
推荐于2017-12-15 · TA获得超过170个赞

知道小有建树答主

回答量：490

采纳率：50%

帮助的人：311万

我也去答题访问个人页

关注

展开全部

改变字体的核心代码给你，其它自己搞定

Private Sub Form_Load()
Command1.Caption = "直接调用WinRAR并传递参数"

Combo1.AddItem "宋体"
Combo1.AddItem "楷体"
Combo1.AddItem "黑体"
Combo1.AddItem "华文中宋"

End Sub

Private Sub Combo1_Click()
Text1.Font = Combo1.Text '这里就是了。
Text1.FontSize = 20: Text1.Height = TextHeight(Text1.Text) + 100: Text1.Width = Len(Text1.Text) * 2000
End Sub