2023年V B 操作题第一套.pdfVIP

2023年VB操作题第一套

试题一：（30分）

用VB编制一种程序，初始界面如图1,文框显示程序运行输入的文（文框有垂直滚动

条，文为红色）。程序运行时可通过复选框对文字形进行设置，效果如图2,只有当文

框内容非空时“结束”按钮才有效，单击“结束”按钮结束程序运行。

0字体效果■回

请您留下宝贵意见

VB

程序设计

厂加粗p-HS结束|

图1图2

操作规定：

1.4（分）创立一种原则EXE工程，将其窗体文献和工程文献分别以testl.frm.testl.v

bp为文献名保留到考生文献夹下。

2.（12分）参照图1和图2完毕界面设计:按表添加有关对象并设置有关日勺属性：

表1每（个属性1分，共12分）

对象名属性属性值对象名属性属性值

Form1caption字体效果Labe11name1abl

Labe11caption请您留下宝Textlnametxt1

贵意见

Text1multilinetrueTextlscrol1ba2

rs

TextlforecolorHOOO000FCheckcaptio加粗

F1n

Command1namecmdlCheck2caption斜体

Commandlcaption结束Commaenabledfalse

ndl

3.（1）4（分）编写合适的事件2（分）：只有当文框内容非空时“结束”按钮才有效。

不（用能VB函数）代（码2分）

（2）4（分）单击“加粗”复选框时，文框中的文字显示加粗效果；否则取消；

（规定不能用IF语句来实现）事〔件2分，一条代码2分）

（3）4（）单击“斜体”复选框时，文框中的文字显示斜体效果，否则取消。

规（定不能用IF语句来实现）事（件2分，一条代码2分）

4.2（分）保留窗体文献和工程文献，生成可执行文献testl.exe保留到试题目录下的“试

题一”文献夹。

PrivateSubCheckl_C1ick（）

txtl.FontBold=Nottx11.FontBold

EndSub

PrivateSubCheck2_Click（）

txt1.Font11