题目详情
当前位置:首页 > 职业培训考试
题目详情:
发布时间:2023-11-12 03:34:57

[填空题]下列程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并在文本框Text l中输出该数组中各元素的最小值。请填空。 Option Base 1 Private Sub Command1_Click( ) Dim arr1( ) Dim Min As Integer,i As Integer Arr1=Array(12,435,76,-24,78,54,866,43) Min=______ For i=2 To 8 If arr1(i)<Min Then______ Next i Text1=Min End Sub

更多"下列程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找"的相关试题:

[填空题]下面程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并在文本框Text1中输出该数组中各元素的最小值。请依据上述功能将程序补充完整。 Option Base 1 Private Sub Command1_Click( ) Dim arr1( ) Dim Min As Integer,i As Integer arr1=Array(12,435,76,-24,78,54,866,43) Min=______ For i=2 To 8 If arr1(i)<Min Then______ Next i Textl=Min End Sub
[填空题]以下程序的功能是:用Array函数建立一个含有8个元素的数组,然后查找并输出该数组中各元素的最小值。请填空。
Option Base 1
Private Sub Commandl_Click( )
Dimarrl
DimMin As Integer,i As Integer
arrl=Array(12,435,76,-24,78,54,866,43)
Min= [11]
Fori=2 To 8
If arrl(i)<Min Then [12]
Nexti
Print"最小值是:";Min
End Sub

[简答题]以下程序的界面有一个按钮button、一个文本区textA和一个文本框textF。程序运行时,在文本区中输人数字序列,单击按钮,则在文本框中显示数字序列的和。以下是要求你编写的actionPerformed(ActionEvent e)方法的部分代码。
public void actionPerformed(ActionEvent e)
if(e.getSource( )==button)
String s=textA.getText( );double sum=0;
StringTokenizer fenxi=new StringTokenizer(s,",/n");
//请在以下位置编写代码


[填空题]有一个VBA计算程序的功能如下,该程序用户界面由4个文本框和3个按钮组成。4个 文本框的名称分别为:Text1、Text2、Text3和Text4。3个按钮分别为:清除(名为 Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后, 单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1、Text2 和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中;单击 退出按钮则退出。请将下列程序填空补充完整。 Private Sub Command1_Click( ) Me!Text1="" Me!Text2="" Me!Text3="" Me!Text4="" End Sub Private Sub Command2_Click( ) If Me!Text1="" Or Me!Text2="" Or Me!Text3="" then MsgBox "成绩输入不全" Else Me!Text4=(__________ +Val(Me!Text2)+Val(Me!Text3))/3__________ End Sub Private Sub Command3_Click( ) Docmd. __________ End Sub
[填空题]有一个VBA计算程序的功能如下:该程序用户界面由4个文本框和3个按钮组成,4个文本框的名称分别为Text1、Text2、Text3和Text4,3个按钮分别为清除(名为Command1)、计算(名为Command2)和退出(名为Command3)。窗体打开运行后,单击清除按钮,则清除所有文本框中显示的内容;单击计算按钮,则计算在Text1、Text2和Text3三个文本框中输入的3科成绩的平均成绩并将结果存放在Text4文本框中;单击退出按钮则退出。清将下列程序填空补充完整。
Private Sub Command1 Click( )
Me!Text1=""
Me!Text2=""
Me!Text3=""
Me!Text4=""
End Sub
Private Sub Command2_Click( )
If Me!Text1=""Or Me!Text2=""Or Me!Text3=""Then MsgBox"成绩输入不全"
Else
Me!Text4=(______+Val(Me!Text2)+Val(Me!Text3))/3
______
End Sub
Private Sub Command3_Click( )
DocmD______
End Sub

我来回答:

购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
推荐91天
¥36.8
¥80元
31天
¥20.8
¥40元
365天
¥88.8
¥188元
请选择支付方式
  • 微信支付
  • 支付宝支付
点击支付即表示同意并接受了《购买须知》
立即支付 系统将自动为您注册账号
请使用微信扫码支付

订单号:

请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码