Toggle navigation
电子书
题库
会员
中心
登录
注册
首页
Private Sub Form_Click() 窗体上单击后,显示结果为:a=85Select case aCase Is> =60 I=“及格”Case Is> =70 I=“中“Case Is> =80 I=“良”Case else I=“优”End SelectPrint IEnd Sub
正确答案
答案已经隐藏
温馨提示!
为了让小站的题库持续更新下去,目前一部分题目查看答案和解析需要赞助。总题数
18894
!
支付宝支付
余额支付
本文标签:
Private
Sub
Form
Click
窗体
上
单击
后
显示
结果
为
a
85Select
Is
gt
及格
Case
Is
gt
70
I
中
Case
Is
gt
80
I
良
优
End
SelectPrint
IEnd
Sub
上一篇 >
一个窗体单击事件过程如下: Private Sub Form_Click() X = Val(Text1.Text):Y = Val(Text2.Text) If X = 0 Or Y = 0 Then Print "不在任何象限内": Exit Sub If X > 0 And Y > 0 Then Print "IN A" If X > 0 And Y < 0 Then Print "IN D" If X < 0 And Y > 0 Then Print "IN B" If X < 0 And Y < 0 Then Print "IN C"End Sub
下一篇 >
Private Sub Form_Click() 单击窗体,窗体上将会打印出:For i = 1 To 5 Print Tab(8 - i); String(i, Format(i));Next i End Sub
立即
投稿
微信公众账号
微信扫一扫加关注
返回
顶部