方法一:private sub command1_click() form1.cls dim i1 as integer, i2 as integer, i3 as integer, i4 as integer, i5 as integer dim cl**t as string for i1 = 65 to 70 for i2 = i1 + 1 to 70 ...
private sub form_keydown(keycode as integer, shift as integer) me.caption = keycode if keycode = 122 then timer1.interval = 100 timer1.enabled = true end if if keycode = 123 ...