[填空题] 以下程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以 5余2”的条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。 Pr

16 查阅

[填空题] 以下程序段的功能是:从文本框中输入一个数值,如果该数值满足“除以4余1,除以 5余2”的条件,则在窗体上输出文本框中的数值,否则,将焦点定位在文本框中,并清除文本框的内容。请填空。

Private Sub Command1_Click()

x=Val(Text1.Text)

If______Then

Print x

Else

______

Text1.Text=""

End If

End Sub

参考答案:

x Mod 4=1 And x Med 5=2;Tex1.SetFocus

本题考查条件表达式的描述和如何获得焦点。题中的两个条件“除以4余1,除以5余2”关系为并列关系,可以表示为“x Mod 4=1 And x Mod 5=2”,否则Text1获得焦点,Text1获得焦点的方法为:Text1.SetFocus

计算机考试