(1)VB 用随机函数产生20个两位数的整数,存于4行5列的二维数组中,并求出其中的最大元素及它的行、列坐标,将数组按行(矩阵形式)输出到窗体,最大元素及行、列下标输出在数组的下方.
(2)编一个将二进制数转换成十进制的函数TranBtoD(str$).将函数分别放在标准模块和窗体模块中,在窗体中编写调用程序,输入、输出结果分别使用文本框,程序界面自定.
(3)编写一个通用过程josc,功能是求1~50的偶数平方和与奇数平方和之差.
(4)利用函数过程,计算s=m!/(n!(m-m)!)的值
麻烦各位VB高手不吝赐教!
人气:470 ℃ 时间:2020-08-18 03:04:24
解答
第一题:Option base 1Private Sub Form_Click()Dim a(4,5) as integer ,i as integer ,j as integer ,s as integerdim a_ave as singlerandomizefor i=1 to 4for j =1 to 5a(i,j)=int(91*rnd+10)print Format(a(i,j...
推荐
猜你喜欢
- 你对“一部好书,的确能抓住生命,或赋予生命以活力”这句话的理解
- 一个扇形的展开图如图所示,它的圆心角为120度 底面圆的半径为一,则该圆锥的体积.
- 看雪 赵丽宏
- You place 84 moles of hydrogen gas in a balloon of volume 2.4 m3,and find t
- 联系上下理解句子""然而,就在他拥抱老人,老人循声回过头来的一刹那,他看着老人那双眼睛,心里会想什么?
- He persuaded the dealer to open the box in which it happened to be.这句话box后面的in是什么用法
- 小明要用一根长72厘米长的铁丝做一个长10厘米,宽3厘米的长方体框架,这个框架的高是多少
- 已知一个两位数,它的十位数比个位数字大1,若交换个位上的数字与十位上的数字,得到的新数比原数小9求这个数