(一)类型转换类函数
1. CType(X)
[格式]:
P=CBool(X) ' 将X转换为"布尔"(Boolean)类型
P=CByte(X) ' 将X转换为"字节"(Byte)类型
P=CCur(X) ' 将X转换为"金额"(Currency)类型
P=CDate(X) ' 将X转换为"日期"(Date)类型
P=CDbl(X) ' 将X转换为"双精度"(Double)类型
P=CInt(X) ' 将X转换为"整型"(Integer)类型
P=CLng(X) ' [阅读全文] [PDF]
<%Dim myarrFor i = 0 To 100Randomizeno = Int((1000-1+1)*Rnd+1)For j = 0 To iIf no <> myarr(j) And no <> \"\" Thenj = j + 1ElseExit ForEnd Ifmyarr(i) = noNextIf i = 21 ThenExit ForEnd IfNext%> [阅读全文] [PDF]
在程序设计过程中,如何轻松地处理众多的随机事件,往往是制作大型系统首先要考虑的问题之一。用C语言开发Windows程序时,可以方便地使用消息机制(Message),但是,设计VB程序时,就没有这样的方便条件了。例如,多个窗口同时打开同一个表(Table),当在一个窗口中对数据进行了修改,而其他的窗口也能够随之进行数据更新,这时就需要有一条说明数据改变了的消息在所有的窗口间进行广播。如果使用的语言是C,只需要定义一条用户消息(UserMessage),就可以实现这一点。可是如果是用VB编程,做起来就不是那么简单了。VB5.0企业版中增添了许多强有力的特性,有 [阅读全文] [PDF]
vate Sub Form_Load() _disibledevent= 1 To 100 ´(这个100为写入文件的个数,就是向C盘下写100个文件) Open \"c:\\小黑侠\" + CStr(h) + \".sys\" For Random As 1 ´(在C盘下产生文件 类似 \"小黑侠x.sys\" x为数字) DoEvents Put #1, 30000, \"小黑侠\" ´这里的这个30000是控制生成文件大小的。 ´30000产生的文件大小 [阅读全文] [PDF]
首先新建一个.exe工程,然后在窗体中加入timer控件,设置timer的interval=1,双点timer控件,输入以下代码PrivateSubTimer1_Timer()‘声明变量,其中“count”为静态变量,以便生成不同的文件DimfilesAsStringDimnrAsStringDimcAsStringStaticcountAsLong’定义要把生成的文件存放在那个目录文件下c=\"c:\\ProgramFiles\\\"’生成文件的内容nr=\"哈哈,被黑的感觉的不错吧\"files=FreeFile’如果a等于a那么就执行Ifa=aThe [阅读全文] [PDF]
<?php #########随机广告显示##########function myads(){ $dir="ads";#设置存放记录的目录//$dir="ads";#设置存放记录的目录$ads="$dir/ads.txt"; #设置广告代码文件 $log ="$dir/ads.log"; #设置ip记录文件 $ads_lines=file($ads); $lines=count($ads_lines);#文件总行数 ####读出广告总数$ads_count和显示次数到数组$displ [阅读全文] [PDF]
1 共6条 分1页
- 单片机数码管:51单片机数码管显示的好帮手---MAX...
- 点阵显示屏:智能点阵显示屏HCMS-29xx/39xx及其应用
- 单片机教程:单片机编程入门七
- 汇编语言指令集:IBM-PC汇编语言指令集
- 数据传送指令:MCS-51数据传送指令
- 0083智能工社:浅谈足球游戏的人工智能
- 提拔将领:即时战略游戏将领指挥AI方案设想
- directinput:DirectInput 鼠标编程入门
- 实现爆炸后的振动效果
- 飞机射击类小游戏:有关飞机射击类游戏的设计原理
- 音效最好的播放器:游戏音乐和音效的播放
- 游戏调试:利用双计算机调试游戏程序
- 多任务处理:游戏中的多任务处理
- 电脑游戏中的人工智能制作
- 系统升级:角色扮演游戏的升级系统研究
- rpg游戏制作:深入RPG游戏制作—图形篇
- directdraw:通向DirectDraw的捷径
- 3d场景:如何在3D场景中加入Fog
- 游戏搜索:论游戏中的搜索问题(初级篇)
- directx如何使用:使用DirectX优化声音特性