[填空题] 以下程序判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以 5余3,除以7余4,则输出;否则,将焦点定位在文本框Text中,选中其中的文本。 Private Sub
28 查阅
[填空题] 以下程序判断从文本框Text1中输入的数据,如果该数据满足条件:除以3余2,除以 5余3,除以7余4,则输出;否则,将焦点定位在文本框Text中,选中其中的文本。 Private Sub Command1_Click()x=Val(Text1.Text)If 【9】 Then Print xElse Text1.SetFoeus Text1.SetStart=0End If End Sub
参考答案: