VB中如何让UPDOWN控件每次按0.1递增,每按一下值加0.1

[simon545]

VB中如何让UPDOWN控件每次按0.1递增,每按一下值加0.1

[Mangafan]

这个你应该在代码做一个转换.

'定义变量
Dim pvfValue As Single

'随便设置一下控件属性
VScroll1.SmallChange = 1
VScroll1.LargeChange = 5
VScroll1.Max = 100
VScroll1.Min = 0

演示过程
Private Sub VScroll1_Change()    
    pvfValue = VScroll1.Value / 10
    Debug.Print "Current value = "; pvfValue
End Sub

[Tiger_Zhao]

不要指定 BuddyControl 和 BuddyProperty。

Private Sub UpDown1_Change()
    Text1 = UpDown1.Value / 10
End Sub

[meiZiNick]

不会,帮顶

[knowledge_Is_Life]

好像没那么简单,呵呵.