7.1.4 考点4:Cls方法与Move方法
1.Cls方法
Cls方法用于清除通过画图方法画出的图形或者用Print语句打印的信息,并把光标移到对象的左上角(0,0)。这里的对象可以是窗体或图片框,如果省略“对象”则清除当前窗体内的显示内容。本章节内容来自希赛网IT教育研发中心的计算机等级考试用书 《计算机等级考试考点分析、题解与模拟——二级Visual Basic语言》。Cls方法的一般格式为:
对象名.Cls
例如:
Picture1.Cls '清除图片框Picture1内的图形或文本
Cls '清除当前窗体内显示的内容
说明:
如果AutoRedraw=False,则Cls方法不能清除在AutoRedraw为True时所产生的图形和打印的信息。
清除后,当前座标回到对象的左上角。
当窗体的背景是用Picture属性装入的图形时,不能用Cls方法清除,只能通过LoadPicture方法清除。本章节内容来自希赛网IT教育研发中心的计算机等级考试用书《计算机等级考试考点分析、题解与模拟——二级Visual Basic语言》。
2.Move方法
Move方法用来移动窗体和控件,并可改变其大小。Move方法的一般格式如下:
[对象.]Move左边距离[,上边距离][,宽度[,高度]]]
例如:在窗体上画一个文本框和一个图片框,在窗体的单击事件中编写如下代码,改变窗体、文本框和图片框的大小和位置。程序运行后,窗体的单击事件触发前后的结果分别如图7-3和图7-4所示。
Private Sub Form_Click()
Move 800, 800, 4000, 2600
Text1.Move 200, 200, 1500, 1000
Picture1.Move 1800, 200, 1500, 1000
Picture1.Print "Picture1"
End Sub

说明:
Move方法中的“对象”可以是窗体以及除计时器(Timer)、菜单(Menu)之外的所有控件,如果省略“对象”,则表示要移动的是窗体。购书请到希赛网第一书店。“左边距离”、“上边距离”、“宽度”及“高度”均以twip(缇)为单位。
如果“对象”是窗体,则“左边距离”和“上边距离”均以屏幕左边界和上边界为准;
如果“对象”是控件,则以窗体的左边界和上边界为准。
3.TextHeight和TextWidth方法
这两个方法用来辅助设置坐标。其中TextHeight方法返回一个文本字符串的高度值,而TextWidth方法则返回一个文本字符串的宽度值,单位均为twip(缇)。
属性ScaleHeight和ScaleWidth分别用来表示对象的高度和宽度值,它们与方法TextHeght和TextWidth结合使用,可以使字符串居中显示。
属性Height和Width可用来返回或设置窗体、控件、打印机及屏幕的高度和宽度,而Left和Top属性分别用来返回或设置窗体、控件与其左边和顶边的距离,它们的单位均为Twip(缇)。
例如:编写程序,使字符串居中。
Private Sub Form_Click()
FontSize = 16
Sample$ = "China Csai 中国系统分析员"
Print "字符宽/高:", TextWidth(Sample$); TextHeight(Sample$)
x = (ScaleWidth - TextWidth(Sample$)) / 2
y = (ScaleHeight - TextHeight(Sample$)) / 2
CurrentX = x
CurrentY = y
Print Sample$
End Sub
程序运行后,单击窗体,结果如图7-5所示。

例7.1.4 把控件移到相应的位置,并能改变其大小的方法是( )。
A.Cls B.Move C.format D.Tab
答案:B