标题:dim定义函数
只看楼主
Jamin_Wong
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2017-1-19
结帖率:50%
已结贴  问题点数:2 回复次数:5 
dim定义函数
Dim CX, CY, Radius, Limit            'Declare variable.
ScaleMode = 1              '以像素为单位.
CX = ScaleWidth / 2        'X 位置.
CY = ScaleHeight / 2       'Y 位置.
If CX > CY Then Limit = CY Else Limit = CX
For Radius = 0 To Limit          '半径.
Circle (CX, CY), Radius, RGB(Rnd * 255, Rnd * 255, Rnd * 255)

这个dim函数 语句不通,一般会定义为什么类型的函数。
搜索更多相关主题的帖子: dim 定义 函数 Limit 位置 
2017-07-08 16:37
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4912
专家分:29900
注 册:2008-10-15
得分:1 
加上一个 next 后,测试通过。

dim  是用来定义变量 的,不是用来定义函数的。

你有啥问题?

定义过程使用 sub 关键字。
定义函数使用 Function 关键字。


授人于鱼,不如授人于渔
早已停用QQ了
2017-07-08 17:22
Jamin_Wong
Rank: 1
等 级:新手上路
帖 子:17
专家分:0
注 册:2017-1-19
得分:0 
不好意思,打错了,是定义变量,为什么声明定义什么变量,如 dim a as integer, a就是整数型变量。
2017-07-08 18:55
ZHRXJR
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:125
帖 子:1034
专家分:5519
注 册:2016-5-10
得分:1 
Dim CX, CY, Radius, Limit   你声明变量没有声明数据类型,程序自己声明的是变体变量
变体数据变量是根据程序在应用变量时,根据使用情况设定数据类型的。
例如 CX = ScaleWidth / 2 程序应该设定 CX 的数据类型是单精度数据,程序一旦设定了这个变量的数据类型,就不能再重新赋值其他的数据类型
例如 CX = ScaleWidth / 2 ,你后面又 CX = "ABCDE" ,前面是变体变量,后面又是字符串变量,这样数据类型发生变化,会出现错误的。
好的编程习惯是在声明变量时,应该声明数据类型,VB中数据类型比较多,应该尽快熟知。

请不要选我!!!
2017-07-09 11:52
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4912
专家分:29900
注 册:2008-10-15
得分:0 
计算机,只能按人类规定的代码执行。
当一个标识符出现时,计算机不知道这个标识符代表什么,只能在已有的标识符表中去查找,当找不到时,得到的内存地址为0,程序就执行出错了。

VB,是多BASIC继承发展起来的,所以它的数据类型比其他语言更复杂,但更高级一些的数据类型不被支持,这里不讨论。
VB继续了一个最重要的特性,变量(注意,仅仅是单变量)可以不申明就直接使用。这里VB使用了一个 隐含DIM命令而以。
这个特性,有选项可以关闭。一般建议关闭这个,强制变量申明。它会在每个新建的代码窗口最前面生成一条命令。当这个命令不存在时,也可以手动建立。

DIM命令(包含使用PUBLIC等等申明的变量),作用就是建立这个标识符表,告诉计算机,这里有一个变量,需要分配内存,得到一个内存地址,并写到标识表里,
然后后面程序执行(编译)时,发现这个标识符时,就能在标识符表中查找到对应的内存地址。程序就不会出错。


授人于鱼,不如授人于渔
早已停用QQ了
2017-07-09 11:56
心动不语
Rank: 1
等 级:新手上路
帖 子:1
专家分:1
注 册:2017-7-10
得分:1 
大神
2017-07-10 16:29



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-479265-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.121239 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved