2012-02-20 25 views

回答

0

创建事件:nameslider_valueChanged和圆形的价值。

SAnios是滑块控件的名称

Private Sub sAnios_ValueChanged(sender As Object, 
           e As RoutedPropertyChangedEventArgs(Of Double)) 
    If Not IsNothing(sAnios) Then   
     sAnios.Value = FormatNumber(sAnios.Value, 0) 
    End If 
End Sub 

If Not IsNothing是加载应用程序时,以防止出现错误。