单项选择题
窗体中有文本框Text1、Text2和Text3。运行时在Text1中输入整数m,在Text2中输入整数n(m
A.k = IIf(m Mod 2 = 1, m, m + 1)
B.k = IIf(m Mod 2 <> 1, m, m + 1)
C.k = IIf(m Mod 2 > 1, m, m + 1)
D.k = IIf(m Mod 2 < 1, m, m + 1)
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
在窗体中变量m对应的文本框为Text1, 运行 按钮Command1对应的事件代码如下:Private Sub Command1_Click() Dim result As String m = Val(Me!Text1) result = For k = 1 To m For n = 1 To k + m - 1 If n < m - k + 1 Then result = result & Else result = result & * End If Next n result = result + Chr(13) Next k MsgBox result, , 运行结果 End Sub单击运行按钮后,输入m的值为5,程序的运行结果是
A.由星号组成的高为5的等腰三角形
B.由星号组成的高为5的等腰梯形
C.由星号组成的边长为5的平行四边形
D.由星号组成的边长为10的平行四边形
点击查看答案&解析
单项选择题
在窗体中有文本框Text1和Text2。运行程序时,在Text1中输入整数m(m>0),单击Command1 运行 按钮,程序能够求出m的全部除1之外的因子,并在Text2显示结果。例如,18的全部因子有2,3,6,9,18,输出结果为 2,3,6,9,18, ;28的全部因子为2,4,7,14,28,输出结果为 2,4,7,14,28 。事件代码如下:Private Sub Command1_Click() m = Val(Me!Text1) resule = For k = 2 To 【 】 If m Mod k = 0 Then result = result & k & , End If Next k Me!Text2 = resultEnd Sub程序【 】处应填写的语句是
A.m
B.k < m
C.k <= m
D.m - 1
点击查看答案&解析
相关试题
窗体中有文本框Text1、Text2和Text3。运...
窗体中有文本框Text1、Text2和Text3。运...
窗体中有文本框Text1。运行程序,输入大于...
窗体中有文本框为Text1和Text2。运行程序...