题目内容

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(1 To 100)As Integer For i=1 T0 100 arr(i)=Int(Rnd* 7 ) Next i Max=arr(1) Min=arr(1) For i=1 To 100 If 8 Then Max=arr(i) End If If 9 Then Min=arr(i) End If Next i MsgBox Max MsgBox Min End Sub 程序运行后,单击命令按钮,将产生100个1000以内的随机整数,放入数组arr中,然后查找并先后使用消息框输出这100个数中的最大值和最小值,请将程序补充完整。 假定有以下函数过程: Function Fun(S As String) As String Dim s1 As String For i=1 To len(S) s1=Ucase(Mid(S,i,1))+s1 Next i Fun=s1 End Function 则Str2=Fun("abcdefg")的输出结果为______。

查看答案
更多问题

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(1 To 100)As Integer For i=1 T0 100 arr(i)=Int(Rnd* 7 ) Next i Max=arr(1) Min=arr(1) For i=1 To 100 If 8 Then Max=arr(i) End If If 9 Then Min=arr(i) End If Next i MsgBox Max MsgBox Min End Sub 程序运行后,单击命令按钮,将产生100个1000以内的随机整数,放入数组arr中,然后查找并先后使用消息框输出这100个数中的最大值和最小值,请将程序补充完整。 以一个或多个表以及一个或多个查询为基础创建 ______,将需要的数据集中在一起。用户只需在查询中设定 ______ ,而查询便将符合条件的记录提取出来,作为窗体和报表的 ______。

在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程: Private Sub Command1_Click() Dim arr(1 To 100)As Integer For i=1 T0 100 arr(i)=Int(Rnd* 7 ) Next i Max=arr(1) Min=arr(1) For i=1 To 100 If 8 Then Max=arr(i) End If If 9 Then Min=arr(i) End If Next i MsgBox Max MsgBox Min End Sub 程序运行后,单击命令按钮,将产生100个1000以内的随机整数,放入数组arr中,然后查找并先后使用消息框输出这100个数中的最大值和最小值,请将程序补充完整。 有如下用户定义类型及操作语句: Type Student No As String Name As String Age As Integer End Type Dim Stu As Student With Stu .No="200801001" .Name="高强" .Age=23 End With 执行MsgBox Stu.Name后,消息框输出结果是______。

西藏的发展 由于西藏地处“世界屋脊”(Roof of the World),自然条件恶劣,也由于几百年落后的封建农奴制社会(feudal serfdom)形成的各种社会历史条件的限制,西藏在全国还属于欠发达地区。但是,过去60年的发展已经极大地改变了其昔日贫穷落后的面貌,西藏人民生活水平大大提高。社会经济的发展极大地丰富了西藏人民的物质文化生活。2000年,西藏全区各族人民已基本摆脱贫困,实现温饱。部分群众生活达到了小康水平。随着人民生活逐步富裕,冰箱、彩电、洗衣机等消费品进入了越来越多寻常百姓家。

在设计程序时,应采纳的原则之—是______。

A. 程序结构应有助于读者理解
B. 不限制go to语句的使用
C. 减少或取消注解行
D. 程序越短越好

答案查题题库