填空题

在有下面一个程序段从文本框中输入数据，如果该数据满足条件，除以6余2，脓以5余3，则输出．否则，特焦点定位在文本框中，并清除文本框的内容。 　　Private Sub Command1_Click( ) 　　　num=Val(Text1．Text) 　　　If【 】Then 　　　　Print num 　　Else 　　　　Text1．Text=" " 　　　　 【 】 　　　End If 　　End Sub

【参考答案】

num Mod6=2 And num Mod 5=3
<上一题 目录 下一题>
热门 试题

单项选择题
下列程序的执行结果为( )。Ptivate Sub Commandl_Click()Dim FirStr As StringFirStr= abcdef Print Pct (FirStr)End SubPrivate Function Pct(xStr As String)As StringDim tempStr As String,strLen As IntegertempStr= strLen=Len(xStr)i=1Do While i＜=Len(xStr)-3tempStr=tempStr + Mid(xStr，i，l) + Mid(xStr，strLen - i+i ，1)i=i + 1LoopPct=tempStrEnd FunCtion
A．void
B．int
C．new
D．long
填空题
把窗体的KeyPreView属性设置为True，并编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode As Integer，Shift As Integer)Print KeyCodeEnd SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print KeyAsciiEnd Sub程序运行后，如果按下B键，则在窗体上输出的数值是【 】和【 】。
相关试题