24小时热门版块排行榜    

查看: 281  |  回复: 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的回帖

红枫893

木虫 (小有名气)

引用回帖:
2楼: Originally posted by libralibra at 2013-04-19 00:05:28
这代码都写完了,你随便弄个工程,把代码复制过去,f5一下就有答案了

不好意思,我对VB是一点也不懂,就碰到这么两题,有没有人能帮我完成呢?
希望我们可以成为朋友
3楼2013-04-19 19:14:26
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 3 个回答

libralibra

至尊木虫 (著名写手)

骠骑将军

【答案】应助回帖

感谢参与,应助指数 +1
ben_ladeng: 专家考核 2013-04-19 19:27:42
这代码都写完了,你随便弄个工程,把代码复制过去,f5一下就有答案了
matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
2楼2013-04-19 00:05:28
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
信息提示
请填处理意见