24小时热门版块排行榜    

查看: 273  |  回复: 2

红枫893

木虫 (小有名气)

[求助] 求助大神帮忙解决一个问题

1,阅读程序
Sub form_click()
a = 10:
b = 15
c = 20
d = 25
Print a; Spc(5); b; Spc(7); c
Print a; Space$(8); b; Space$(5); c
Print c; Spc(3); "+"; Spc(3); d;
Print Spc(3); "="; Spc(3); c + d
End Sub
运行上面的程序,单击窗体,输出结果是( )
2,在窗体上画一个文本框,有如下事件过程:
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char As String
char= Chr(KeyAscii)
KeyAscii = Asc(UCase(char))
Print String(6, KeyAscii)
End Sub
程序运行后,如果在键盘上输入字母“a”,则窗体上显示的结果()
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

希望我们可以成为朋友
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)

骠骑将军

【答案】应助回帖

感谢参与,应助指数 +1
ben_ladeng: 专家考核 2013-04-19 19:27:42

红枫893

木虫 (小有名气)

相关版块跳转 我要订阅楼主 红枫893 的主题更新
信息提示
请填处理意见