字典翻译 问答 其它 几道VB题1编程题：.从键盘上输入20个数放入一个一维数组中,并输入数组各元素的值,然后将数组中20个元素的最大值和最小值求出并显示在窗体上.2执行如下程序段：Dimx%Privatecommand1_click()x=x+
问题标题：
几道VB题1编程题：.从键盘上输入20个数放入一个一维数组中,并输入数组各元素的值,然后将数组中20个元素的最大值和最小值求出并显示在窗体上.2执行如下程序段：Dimx%Privatecommand1_click()x=x+
问题描述：

几道VB题

1编程题：.从键盘上输入20个数放入一个一维数组中,并输入数组各元素的值,然后将数组中20个元素的最大值和最小值求出并显示在窗体上.

2执行如下程序段：

Dimx%

Privatecommand1_click()

x=x+1

printx%,y%

EndSub

Privatecommand2_click()

Staticy%

Y=y+1

X=x+1

EndSub

单击三次command2后单击command1,输出结果是——,——

就这么点分了.太少了不好意思

刘文滨回答：
　　第1题：PrivateSubCommand1_Click()Dimv(1To20)AsDoubleDimvMaxAsDoubleDimvMinAsDoubleDimiAsLongFori=1To20v(i)=Val(InputBox("请输入第"&i&"个数：","数据输入",0))NextvMax=v(1)v...
点击显示
其它推荐
热门其它推荐
  • 其它
    •