题目

小明编写了一个VB程序,功能如下:输入一个不超过10000的整数,若该数的各位数字之积是其各位数字之和的倍数,则输出“Yes”,否则输出“No”。 程序运行时,在文本框Text1中输入一个整数,单击“判断”按钮Command1后,在标签Label3中显示判断结果。程序运行界面如下图所示。 (1) 在设计程序界面时,要清空标签Label3中的显示内容,应修改该标签的属性。 (2) 实现上述功能的VB程序如下,请在划线处填入合适代码。 Private Sub Command1_Click()     Dim x As Integer, h As Integer, k As Integer     x = Val(Text1.Text)     h = 0     k=1     Do While x > 0         h = h + x Mod 10         k=         x = x \ 10     Loop     IfThen         Label3.Caption = “Yes”     Else         Label3.Caption = “No”     End If End Sub (3) 运行该程序,在文本框Text1中输入1234,单击“判断”按钮,显示的判断结果为。 答案: 【1】Caption 【1】k * (x Mod 10)【2】k Mod h = 0 【1】No
信息技术 试题推荐
最近更新