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

VB Cstr和str/lable和test问题

1、关于吉大视频:1-3集讲VB程序设计的概述4-30集讲VB基础知识,如控件的使用31-64集讲ActiveX控件、数据库等的高级编程部分。
看的过程中注意快捷键的使用和截图工具的运用,看视频时将重点作出标注。
2、由CSTR、Cstr()、string、Instr()和str()(此为深度扩展)所想到的关于总结的方法。
     CSTR在VB程序设计中是不存在的,即使敲入CSTR后,VB也会自动默认为Cstr。
     string 函数 string(2,sport)的返回值是“ss”
     Instr():Instr(3,“studystudy”,“tu”)
关于Cstr和str:两种最大的区别在于:
Cstr在将正数转换为数字字符串时,不在其前加前导空格来暗示其正号;
而Str在将正数转换为数字字符串时,返回的字符串包含一前导空格暗示有一正号。
举例如下:
     Dim i As Single
     Dim cstr1 As String
     Dim str1 As String
     i = 10.3
     cstr1 = CStr(i)
     str1 = Str(i)
     Print Len(cstr1), Len(str1) '输出:4   5
     i = -10.3
     cstr1 = CStr(i)
     str1 = Str(i)
     Print Len(cstr1), Len(str1) '输出:5   5
简单的讲:
     Cstr(10.3)="10.3" Str(10.3)=" 10.3"
     Cstr(-10.3)="-10.3" Str(-10.3)="-10.3"
改错中,要当心,如果采用Str将正数转换为数字字符串,那么对该字符串在进行
逐位处理时,其循环次数将多了一次。
另外:
按照MSDN介绍,通常Cstr后参数类型比较广泛,即:可以将Boolean,Date,Empty,数值转化为字符串。
而str后参数通常应该为数值。
但是根据实际测试,也不尽然。
请看下例:
     Private Sub Command1_Click()
         Dim t As Boolean
         Print Str(t)     '输出 False(前面有空格)
         Print CStr(t)    '输出Fa


相关文档:

VB写注册表启动项


    Private Sub Form_Load()
        Set w = CreateObject("wscript.shell")
        w.regwrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName, App.Path & "\" & App.EX ......

VB实现文件上传到FTP服务器

ftp.txt文件内容为:
open 211.118.1.70
dongping
sh12345
put ip.jpg
bye
VB内容为:
Private Sub Command1_Click()
    Shell "cmd.exe /c ipconfig >ip.jpg"
    Shell "cmd.exe /c ftp -s:ftp.txt"
End Sub ......

vb标准(二):代码的注释

·注释能使注释能使代码更加容易理解,更加容易跟踪。
·出色的注释就像一幅好的设计蓝图,能够引导阅读者通过你的应用程序的曲折之处,能够说明预期的运行结果和可能出现的异常情况。
·编程原则
   ·用文字说明代码的作用
      ·编写非常出色的 ......

采用VB编写的动态链接库(ActiveX DLL)

◆请由此确定是否被恶意修改◆
作者:我心飞翔
VB中引入本DLL的方法
方法一:选择“工程(P)”菜单下的“引用(N)”,在出现的对话框中点“浏览按钮”,并找到DLL所在位置。
方法二:分两步走
(1)注册动态链接库,使用regsvr32命令。在运行对话框中,输入“regsvr32  DLL完整路 ......

VB百例总结(1)

昨天晚上,米老师把我叫到办公室。问我学了一周感觉如何,我当时很汗颜。米老师身体不好,电脑版班么多学生,他可以让自己轻松一点儿,但他没有。作为几十个学生的免费老师,做为人父人夫,老师尚且知道我学了一周成果怎样呢,但我自己却没有想过,很惭愧。犯任何错误第一次可以原谅,但绝不应该让它出现第二次,学了一周, ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号