易截截图软件、单文件、免安装、纯绿色、仅160KB

VB中的转换函数

Asc 函数
     
返回一个 Integer,代表字符串中首字母的字符代码。
语法:
Asc(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符,则会产生运行时错误。
说明:在非 DBCS 系统下,返回值范围为 0 – 255 。在 DBCS 系统下,则为 -32768 – 32767。
注意:AscB 函数作用于包含在字符串中的字节数据,AscB 返回第一个字节的字符代码,而非字符的字符代码。AscW 函数返回 Unicode 字符代码,若平台不支持 Unicode,则与 Asc 函数功能相同。
每个函数都可以强制将一个表达式转换成某种特定数据类型。
下面这些类型转换函数,看他们的语法如下:
CBool(expression)
CByte(expression)
CCur(expression)
CDate(expression)
CDbl(expression)
CDec(expression)
CInt(expression)
CLng(expression)
CSng(expression)
CStr(expression)
CVar(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。
返回类型
函数名称决定返回类型,如下所示:
函数      返回类型        expression 参数范围
CBool    |   Boolean     |    任何有效的字符串或数值表达式。
CByte    |    Byte         |    0 至 255。
CCur     |   Currency    |    -922,337,203,685,477.5808 至922,337,203,685,477.5807。
CDate    |    Date       |    任何有效的日期表达式。
CDbl     |   Double       |    负数从 -1.79769313486232E308 至 -4.94065645841247E-324;
                                          正数从 4.94065645841247E-324 至 1.79769313486232E308。
CDec&


相关文档:

vb 调用delphi写的dll

delphi中的DLL中的声明原码如下:
这里声明了输出性参数分别为数字与字符类型
library dll1;
uses
  SysUtils,
  Classes;
{$R *.res}
Function mymax(x, y: Integer; out jj: Integer; out abc: PChar): Integer; stdcall;
begin
  jj := x * y;
  abc := PChar(StrPas(abc) + '这是传出的' ......

VB运行DOS命令生成文本文件并打开处理的问题

我用VB执行DOS命令,生成文本文件随即打开
但是由于文本文件生成需要一段时间,
还未等文件生成完毕VB就打开了这个文件
请问如何让程序等待DOS命令执行完毕再打开这个文本文件啊
最好还能加上一个等待的进度条显示文本文件的生成过程
代码如下:
Shell "cmd  /c dir /s /b e:\ dir.txt"
Open "dir.txt" ......

vb 连接Access字符串、vb连接Db2的字符串

DB2ConnectionString
b2str = "Provider=MSDASQL.1;Password=a$sk6G7;Persist Security Info=True;User ID=DBA;Data Source=ConDB2SFXXK"
AccessConnectonString
accessstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DMSJK.mdb;Jet OLEDB:database password=" ......

VB中获得汉字的首音码(包含二级字库)

Option Explicit
'==================================================
' 函数: ReturnSM
'
' 功能: 返回字符串中没个字符的拼音声母第一个字母
'
' 注意: 该函数只能处理3755个常用汉字(B0 - D7)
' 若超出函数的范围将返回常数 ERR_RESULT$
'
' 入口: Str 待处理的字符串
'
Public Function ReturnSM$(ByVal S ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号