none
VB新手的问题 RRS feed

  • 问题

  •  

    VB中滚动条的最大值如何设置成超过32767.

    我写代码text1 = HScroll1 * 10

    为什么text1中的数字仍然不能超过32767呢?

    我才学习VB 希望高手可以多多指点

     

     

    可以给我一个仅有加减乘除的计算器的代码吗?谢谢

    2008年1月30日 15:25

答案

  •  

    因为HScroll1.Value 的类型是Integer,最大值只能到32767

     

    而2个Integer相乘返回的数据类型也是Integer,所以会报溢出错误

     

    解决的方法是改变其中一个值的数据类型

    Code Snippet

    Dim x As Long
    x = HScroll1.Value
    Text1 = x * 10

     

     

    还是建议你先看下书,了解一些基本概念

     

    MSDN光盘带有计算器的代码

    SAMPLES\VB98\Calc
    2008年1月31日 1:11
    版主