下列程序段实现的功能为：在文本框中输入一个整数，然后判断该整数的奇偶性。请完成相应的程序代码。 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-计算机二级-简明问答题库

问题描述：

[填空] 下列程序段实现的功能为：在文本框中输入一个整数，然后判断该整数的奇偶性。请完成相应的程序代码。 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

参考答案：查看无
答案解析：无
☆收藏

上一篇：读FIFO/传感器RAM命令字中，地址自动加1标志位A1和FIFO/传感器RAM地址AAA有效，是指在（）工作方式下有效。下一篇：传统的集合运算包括并、（）、交。

我要回答: 网友(18.223.172.243)
热门题目: 1.通过指定字段的数据类型和宽度 2.有以下程序 main（）{ 3.要想在文本框中显示垂直滚动条

当前位置：百科知识 > 计算机二级

随机题目