VB笔记.docVIP

1----控制时间的定时器： Private Sub Timer1_Timer() Label1.Caption = Time$ ； Label3.Caption = Date$ End Sub 属性：interval：10 注意：1、Time和$之间不能有空格；2、要加，并设置属性；3、如果要控制时间和公纪年，则需两个。 2----显示按下的按键的ASCII码： Private Sub Form_keypress(keyascii As Integer) If keyascii = 101 Then Print 按下101 End If End Sub 注意：1、在VB中If语句无括号 If keyascii = 101 Then，这和C语言 If（keyascii = 101 不一样； 由 keyascii 读出按键的ASCII码； 写了If不要忘了end if 这和VHDL语言相似； （keyascii As Integer）是将keyascii 定义为常量。 3----一些常用的： Private Sub Form_keypress(keyascii As Integer) ‘按键事件； Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X