Question

我正在尝试从VBA升级到VB.NET，因此我通过弄清楚我所做的事情之间的语法差异来学习一些非常基本的东西。到目前为止一切都那么好，但我似乎无法获得一个文本框来更新表单中的显示值。有人想解释我为什么愚蠢吗？我花了一些时间浏览各种各样的interweb东西，但还没有找到任何东西（除非我是愚蠢的，当我看到它时我才明白它）。

这是我到目前为止所拥有的：

sudo bower install

Answer 1

在深入了解视觉工作室的用户界面之后，我能够找到一个更多的乐队帮助＆＃34;分辨率的类型。即使我还没有搞乱SubString函数，这是我的下一个学习步骤，我发现这个选项足以立即解决。如果我找到更好的实现方法，我会回帖给别人看（如果他们关心的话）。

 Private Sub TextBox1_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Block1.Enter
 Dim this As String = Trim$(Mid$(TextBox1.Text, InStr(TextBox1.Text, "&") + 1))
 Dim oldtxt As String = TextBox1.Text
 If InStr(TextBox1.Text, "&") > 0 Then 
      TextBox1.Text = TextBox1.Text.Replace(TextBox1.Text, "End Date Copied" & this)
      Block1.Refresh()
      Clipboard.SetText(this)
      Threading.Thread.Sleep(200)
      TextBox1.Text = TextBox1.Text.Replace(TextBox1.Text, oldtxt)
      Block1.Refresh()
 End If
 End Sub

对于@TEK而言只是一个FYI，这个作品的输入和点击事件完全相同，所以希望下次你尝试帮助别人时你不会被不必要的细节挂掉：）

TextBox值未在click命令上更新

1 个答案: