www.ndwl.net > 一些VB试题求解

一些VB试题求解

第一题 i mod 10 i label1.caption & vbcrlf p 第二题 1 and c0 then if n mod 2 = 0 then r=left(s,1)+right(s,1) else r=mid(s,n\2,1) end if end if 后面看不太清楚

第一空 变量i,因为下面用的的是第一重循环的变量;第二空 1 因为输出的图形是随着第一重循环的变化而变化的! 也就是: 变量 i =1 的时候 ,输出1个*;变量 i =2 的时候 ,输出2个*,以此类推!

这个没什么难啊,就是控件的一些基本操作。

你要看的懂 我觉得你应该可以写出

1. 在名称为 Form1的窗体上随机产生10个100~200(包括100,200)的正整数,求最大值,最小值和平均值,并显示整个数组的值和结果.运行后如图所示. Dim a(9) As Integer Dim max As Integer Dim min As Integer Dim sum As Integer Private Sub Form_Lo...

这个很容易理解的 按照值传递,就是把变量的真正数值传递给其它变量或函数 按照地址传递,就是把这个值的内存地址传递给变量或函数 例如一个字符变量 A 中保存的值是字符串 12345,在内存中存储的首地址是 58H 按照值传递,就是把字符串 12345 ...

用2个时钟控件,和2个滚动条就可以啦!

Option Explicit Private Sub Command1_Click() Dim h0 As Integer, s As Single, a(1 To 20) As Single, i As Integer a(1) = 100 '第一个扔下的高度 For i = 2 To 20 '每一个数组内数据表示小球行走的一个方向的路程,也就是奇数项是从最高点...

x=5,i=6

第二张盘里是一些实例、素材和一些扩展应用程序或工具,可以不安装的。 当然如果磁盘允许都安装上也是可以的,可以通过一些实例来理解VB的使用,提升自己驾驭VB的能力。

网站地图

All rights reserved Powered by www.ndwl.net

copyright ©right 2010-2021。
www.ndwl.net内容来自网络,如有侵犯请联系客服。zhit325@qq.com