VS2017中VB.NET按钮点击事件无响应,代码运行无效求助
解决VS2017 VB.NET按钮点击无反应(MsgBox不显示)的问题
嘿,我瞅了下你的代码,马上就发现问题啦——你根本没把用户输入的文本赋值给变量a,而且连接收输入的控件(比如TextBox)都没在代码里关联上,难怪点击按钮没反应(或者说MsgBox没按预期显示内容)。
咱们一步步来修正:
第一步:先在窗体上添加输入控件
你需要从VS的工具箱里拖一个TextBox控件到Form1上,默认它的名字是TextBox1,这个控件就是用来让用户输入文本的。
第二步:修正按钮点击事件的代码
原代码里的a只是声明了但没赋值,咱们把它关联到TextBox的输入内容,同时优化一下代码的类型安全:
Public Class Form1 ' 最好指定变量类型为String,避免类型问题 Dim inputText As String Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click ' 先获取用户在TextBox里输入的文本 inputText = TextBox1.Text ' 用&拼接字符串比+更安全,避免类型转换错误 MsgBox("You Typed " & inputText & "!") End Sub End Class
为啥原代码不行?
- 变量未赋值:你声明了
Dim a但从来没给它赋值,它默认是Nothing,拼接的时候要么显示空内容,要么可能触发隐性的类型问题,导致MsgBox没按预期弹出。 - 缺少输入关联:你没把用户输入的文本(比如TextBox里的内容)赋值给变量,自然没法把输入内容显示出来。
- 字符串拼接的小坑:VB.NET里
+既可以做加法也可以做字符串拼接,如果变量类型不对容易出错,用&专门用来拼接字符串更稳妥。
现在你再运行程序,在TextBox里输入文本,点击按钮就能看到对应的MsgBox啦!
内容的提问来源于stack exchange,提问作者Tejas
相关产品推荐
相关产品推荐

