Question

我有一个问题。我已经在课堂上用VB Express 2015做了三个多月了。如果在表单中放置轨迹栏和文本框，则可以在文本框中显示轨迹栏的值。

你可以这样做，以便它反过来？如果在文本框中键入一个值，它是否适用于滑块的位置？

（我一直在努力寻找两个下午，没有找到一个直接的解决方案，它让我感到恼火。每个老师都不知道，我只是想知道如何解决这个问题。）

谢谢：）

Answer 1

这样的事情应该这样做：

Private Sub TextBox_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged
    Dim value As Integer
    If Int32.TryParse(TextBox1.Text, value) Then
        TrackBar1.Value = value
    Else
        'something was entered into the textbox that is not an integer
    End If
End Sub

当文本框的内容发生变化时，我们会尝试查看输入的值是否为整数。如果是，我们将TrackBar值设置为此值

Answer 2

如果您感兴趣，这是代码

 Private Sub TextBox_TextChanged(sender As Object, e As EventArgs) Handles TextBox.TextChanged
    Try
        TrackBar.Value = Convert.ToInt32(TextBox.Text)
    Catch ex As Exception
    End Try
    TrackBar_Scroll(sender, e)
End Sub

文本框值进入轨迹栏

2 个答案: