几道VB题
1编程题:.从键盘上输入20个数放入一个一维数组中,并输入数组各元素的值,然后将数组中20个元素的最大值和最小值求出并显示在窗体上.
2执行如下程序段:
Dim x%
Private command1_click()
x=x+1
print x%,y%
End Sub
Private command2_click()
Static y%
Y=y+1
X=x+1
End Sub
单击三次command2后单击command1,输出结果是——,——
就这么点分了.太少了不好意思
人气:218 ℃ 时间:2020-09-08 16:47:27
解答
第1题:Private Sub Command1_Click()Dim v(1 To 20) As DoubleDim vMax As DoubleDim vMin As DoubleDim i As LongFor i = 1 To 20v(i) = Val(InputBox("请输入第 " & i & "个数:","数据输入",0))NextvMax = v(1)v...
推荐
- 如图,计算该图形的面积
- 一块西红柿田地长50米,宽30米,中间有2条1米的小路,这块西红柿田的种植面积是多少
- 已知有一串数:一分之一,负二分之一,二分之二,负二分之一,三分之一,负三分之二,三分之三,负三分之二,
- 若ab≠0,则a/|a|+b/|b|的取值可能有几个,分别是多少
- 绝对值大于二,且小于五的所有整数的积等于多少?
- 《月亮上的足迹写了一件什么事
- (1)以1.3µm波长工作的半导体激光器,能耦合进单模光纤的平均功率为0.5mW.'
- 88分之19是哪两个不同的自然数的倒数之和
猜你喜欢