![[填空题] 以下程序判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以 5余3,除以7余4,则输出;否则,将焦点定位在文本框Text中,选中其中的文本。Private Sub,第1张 [填空题] 以下程序判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以 5余3,除以7余4,则输出;否则,将焦点定位在文本框Text中,选中其中的文本。Private Sub,第1张](/aiimages/%5B%E5%A1%AB%E7%A9%BA%E9%A2%98%5D+%E4%BB%A5%E4%B8%8B%E7%A8%8B%E5%BA%8F%E5%88%A4%E6%96%AD%E4%BB%8E%E6%96%87%E6%9C%AC%E6%A1%86Text1%E4%B8%AD%E8%BE%93%E5%85%A5%E7%9A%84%E6%95%B0%E6%8D%AE%EF%BC%8C%E5%A6%82%E6%9E%9C%E8%AF%A5%E6%95%B0%E6%8D%AE%E6%BB%A1%E8%B6%B3%E6%9D%A1%E4%BB%B6%EF%BC%9A%E9%99%A4%E4%BB%A53%E4%BD%992%EF%BC%8C%E9%99%A4%E4%BB%A5+5%E4%BD%993%EF%BC%8C%E9%99%A4%E4%BB%A57%E4%BD%994%EF%BC%8C%E5%88%99%E8%BE%93%E5%87%BA%EF%BC%9B%E5%90%A6%E5%88%99%EF%BC%8C%E5%B0%86%E7%84%A6%E7%82%B9%E5%AE%9A%E4%BD%8D%E5%9C%A8%E6%96%87%E6%9C%AC%E6%A1%86Text%E4%B8%AD%EF%BC%8C%E9%80%89%E4%B8%AD%E5%85%B6%E4%B8%AD%E7%9A%84%E6%96%87%E6%9C%AC%E3%80%82Private+Sub.png)
[填空题] 以下程序判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以 5余3,除以7余4,则输出;否则,将焦点定位在文本框Text中,选中其中的文本。
Private Sub Command1_Click()
x=Val(Text1.Text)
If 【9】 Then
Print x
Else
Text1.SetFoeus
Text1.SetStart=0
End If
End Sub
正确答案:x mod 3=2 And x mod 5=3 And x mod 7=4
参考解析:本题主要考查如何将文字语言转换成程序语句。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)