- 7
- 0
- 约1.48万字
- 约 10页
- 2016-10-06 发布于贵州
- 举报
VB考前辅导模试卷四(中等)
VB考前辅导模拟试卷四(中等)
试题1(每小题2分,共8分)
阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。
【程序说明】运行时先在文本框Text1中输入n的值后回车,如果值在[1,10]之间,则清空文本框Text2,并使它获得焦点。然后在在文本框Text2中输入正确的a值后按回车,将以下和式的计算结果S显示在结果文本框Text3中。
【程序】
Dim n As Byte
Private Sub Text1_KeyPress(KeyAscii As Integer)
n = Val(Text1.Text)
If KeyAscii = 13 And (1) Then
Text2.Text =
Text2.SetFocus
End If
End Sub
Private Sub Text2_KeyPress(KeyAscii As Integer)
Dim a As Byte, i As Byte
Dim s As Long, tx As Long
If (2) Then
Exit Sub
End If
a = Val(Text2.Text)
If a 0 Or a 9 Then
Exit Sub
原创力文档

文档评论(0)