请输入或粘贴题目内容
搜题
拍照、语音搜题，请扫码下载APP
题目内容
（请给出正确答案）
程序功能：
求1到100以内的奇数，单击"计算"按钮后，首先清除列表框中原先的内容，然后显示结果，单击"退出"按钮后退出表单。表单文件名为Frm03.scx。
要求：
(1)窗体命名为frm03.scx(表单备注文件不能删除)
(2)窗体的标题为：求100以内的奇数
(3)命令按钮"计算"(名称为command1),"退出"(名称为command2)
(4)列表框名称为list1
(5)判断一个数是否为奇数使用语句“i%2＜＞0”，即i除2不等于0
(6)列表框中增加一项使用语句“additem(str(i))”
(7)要求使用for循环语句
(8)退出表单用release语句
答案
更多“奇数表100以内”相关的问题
第5题
以下程序的功能是 : 输出 100 以内 (不含 100) 能被 3 整除且个位数为 6 的所有整数，请填空。
main()
{ int i,j;
for(i=0; 【 1 3 】 ;i++)
{ j=i*10+6;
if(【 1 4 】 )continue;
printf(" ％ d ",j);
}
}
第6题
要求以下程序的功能是计算：s=1+1/2+1/3+…+1/100。
程序运行后输出结果错误，导致错误结果的程序行是（）。
A.s=1.0；
B.
C.S=S+1/n；
D.
第7题
在窗体上画两个标签和一个命令按钮，其名称分别为Labell、Label2和Command1，然后编写如下程序： Private Sub func(L As Label，ByVal a As Integer) L.Caption="1234" a=a*a End Sub Private Sub Form_Load() Label1.Caption="ABCD" Label2.Caption=10 End Sub Private Sub Command1_Click() a=Val(Label2.Caption) Call func(Labell，A)Label2.Caption=a End Sub 程序运行后，单击命令按钮，在两个标签Label1和Label2中显示的内容分别是 ______。
A．ABCD和10
B．1234和100
C．ABCD和100
D．1234和10
第8题
在窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程： Private Sub Form. Load() List1.AddItem "Item 1" List1.Addltem "Item 2" Listl.Addltem "Item 3" End Sub Private Sub Command1 Click() Listl.List(Listl.ListCount)="AAAA" End Sub 程序运行后，单击命令按钮，其结果为
A．把字符串“AAAA”添加到列表框中，但位置不能确定
B．把字符串“AAAA”添加到列表框的最后(即“Item3”的后面)
C．把列表框中原有的最后一项改为“AAAA”
D．把字符串“AAAA”插入到列表框的最前面(即“Item 1”的前面)
第10题
单击分类汇总工作表窗口左边的分级显示区中的按钮“1”，实现的功能是（）。
A.显示列表中所有的详细数据
B.显示列表中列标题和总计结果
C.只显示列表中列标题和总计结果
D.什么都不显示
