UC知道一段代码，当CTypeCBox中的文本为其他时，为什么没有"没有此类型"的显示？
来源：百度知道 编辑：UC知道 时间：2024/05/15 14:08:21
Private Sub CTypeCBox_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CTypeCBox.SelectedIndexChanged
If CTypeCBox.Text = "工资" Then
NETipLabel.Visible = False
NEPInRButton.Checked = True
NEPOutRButton.Checked = False
ENameLabel.Text = "工资来源:"
NEventLabel1.Text = "工资数量:"
NEventLabel2.Text = "备注:"
NEventTBox3.Text = ""
NEventTBox3.Width = 476
NEventLabel1.Visible = True
NEventLabel2.Visible = True
NEventLabel3.Visible = False
NEventLabel4.Visible = False
NEventLabel5.Visible = False
NEventTBox1.Visible = True
NEventTBox2.Visible = True
NEventTBox3.Visible = False
NEventTBox4.Visible = False
If CTypeCBox.Text = "工资" Then
NETipLabel.Visible = False
NEPInRButton.Checked = True
NEPOutRButton.Checked = False
ENameLabel.Text = "工资来源:"
NEventLabel1.Text = "工资数量:"
NEventLabel2.Text = "备注:"
NEventTBox3.Text = ""
NEventTBox3.Width = 476
NEventLabel1.Visible = True
NEventLabel2.Visible = True
NEventLabel3.Visible = False
NEventLabel4.Visible = False
NEventLabel5.Visible = False
NEventTBox1.Visible = True
NEventTBox2.Visible = True
NEventTBox3.Visible = False
NEventTBox4.Visible = False
晕倒……跟你说一声这种东西要用数组的……代码就不看了，你不是有一个Else吗？If的条件为假的话自然进入Else
‘---分割线-----------------
看到了你的问题补充，只好再看一眼代码……好长
突然发现两个ElseIf内容一样。
没什么办法，按F8逐句调试或Debug.Print或Msgbox或Print……总之，跟踪变量看一看，是从哪里出现的问题