问题描述:
[填空]
下列程序段实现的功能为:在文本框中输入一个整数,然后判断该整数的奇偶性。请完成相应的程序代码。 Private Sub Command1_Click()Dim x AS Integer x=Val(Right (Text1.Text,2))If x Mod 2=0 Then Labe11.Caption=“偶数” Else Labe11.Caption=“奇数” End If Text1.SetFocus End Sub Private Sub Text1_KeyPress(KeyAscii As Integer)If [10] ThenKeyAscii=0 End Sub
参考答案:查看无
答案解析:无
☆收藏
答案解析:无
☆收藏
- 我要回答: 网友(216.73.216.96)
- 热门题目: 1.()是窗体上用于显示数据、执 2.在窗体中有一个标签Lb1和一 3.组合问,由组合的基本性质可知
