几种简单操作
任何情况下，按回车键都相当于单击"是"(C1)按钮；按ESC键都相当于单击"否"(C2)按钮(把C1的Default属性设置为"true", 把C2的Cancel属性性设置为"true"
还需在C2的Click事件中使用C1的SetFocus方法。
Private Sub C2_Click()
C1.SetFocus
End Sub
滚动条的刻度值改变文本框的宽度
Private Sub Vsb1_Change()
Text1.width = hs1.Value
End Sub
当使用Tab键选择控制按钮时，焦点从Cmd2上跳过，直接过渡到Cmd3。设置Cmd2的TabStop属性为False。
在图片框的中心画出一个点
图片框Picture1、控制按钮Cmd1，标题为"画点"。(Pset方法的格式为：对象名.Pset (x，y)，其中x，y为点的坐标。x＝Me.Picture1.Width / 2，y＝Me.Picture1.Height / 2)
1 Private Sub Command1_Click()
2 Me.Picture1.PSet (Me.Picture1.Width / 2, Me.Picture1.Height / 2)
3 End Sub
单击Cmd1，按钮移动到窗体的左上角
单击Cmd2，按钮在长度和宽度上各扩大到原来的2倍
1 Private Sub Cmd1_Click()
2 Cmd1.Move 0, 0
3 End Sub
4 Private Sub Cmd2_Click()
5 Cmd2.Width = Cmd2.Width * 2
6 Cmd2.Height = Cmd2.Height * 2
7 End Sub
新建一个工程，在窗体上创建命令按钮，名称为C1。创建一个组合框控件，命名为Com1。程序运行，实现功能单击C1按钮，读取打印机的字体。并在组合框中的列表框中显示第一种字体。
