加载中…
个人资料
nicekwell
nicekwell
  • 博客等级:
  • 博客积分:0
  • 博客访问:40,267
  • 关注人气:22
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
相关博文
推荐博文
谁看过这篇博文
加载中…
正文 字体大小:

VB的一些小问题总结

(2013-06-10 13:29:02)
标签:

强制类型转换

移位

图片大小

check

scalemode

it

分类: vb6.0
1、强制类型转换:
    CByte(),CInt(),CLng(),CStr()
2、移位:
    直接乘或者除2^n,注意 / 和 \ 的区别,/ 会保留小数,\ 会舍去小数部分,在移位时记得用 \。
    或者用一下移位函数:
'1.逻辑左移
Public Function SHL(ByVal OPR As Byte, n As Integer) As Byte
Dim BD As Byte
Dim I As Integer
BD = OPR
For i = 1 To n - 1
BD = (BD And &H7F) * 2 '将D7位屏蔽左移,防止字节溢出
Next i
CF = BD And &H80 '判断D7位是否进位
SHL = (BD And &H7F) * 2
End Function

'2.逻辑右移
Public Function SHR(ByVal OPR As Byte, n As Integer) As Byte
Dim BD As Byte
Dim I As Integer
BD = OPR
For i = 1 To n - 1
BD = BD \ 2 '右移
Next i
CF = BD And 1 '判断D0位是否进位
SHR = BD \ 2
End Function
3、Picture把AutoSize设为True后会自适应图像大小,此时图片框的Width和Height都会比实际图片大4个像素。注意是4个像素,如果单位是Twip的话就会大4*15=60。
4、判断Check的选中与否,注意它的Value不是True和False,而要用0、1、2。
5、对于一个窗口而言,改变ScaleMode可以改变窗口里的控件的计量单位,但是窗口本身的Left、Top、Width、Height的单位还是Twip

0

阅读 评论 收藏 转载 喜欢 打印举报/Report
  • 评论加载中,请稍候...
发评论

    发评论

    以上网友发言只代表其个人观点,不代表新浪网的观点或立场。

      

    新浪BLOG意见反馈留言板 电话:4000520066 提示音后按1键(按当地市话标准计费) 欢迎批评指正

    新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 会员注册 | 产品答疑

    新浪公司 版权所有