主题：录入窗口功能求教

For i As Integer = 1 To 8

    Dim flag As Boolean =  i <= val(e.Form.Controls("Combobox1").Text)
    e.Form.Controls("Textbox" & i).Visible = flag

    e.Form.Controls("Label" & i).Visible = flag

    e.Form.Controls("Label" & i).Text = e.Form.Controls("Combobox3").Text & i
Next

。。。大师 ，是不是不应该用Combobox这个控件？？

因为这个控件的值 修改以后， Label 1-6的.Text 内容不就都一样了吗？？

应该是多种区分才对  就如同 1级 2级 3级

 

要实现这种功能  应该用什么控件？

应该是有这样的一种控件的 只是我不知道是哪个

 就是可以让使用者 自己编写   Label 1-6 的Text 的

如果实在没有这种功能的控件，，我就只好把Label1-6 也换成TextBox 让使用者分别输入 但是这样显得好简陋。。 

呃，不明白你什么意思。21楼的，就是根据你输入的值，变成不同的名称。

 

如果要自定义，就直接用TextBox

此主题相关图片如下：qq图片20150826222808.png

图中 Label 1-6 的Text 应该是不同的六种  就好像之前那个窗口中的  一级、二级、三级

在这个窗口中之所以加一个Combobox控件，是想让用户自己设置Label 1-6 的Text

比如初级、高级 或者  入门、简单 、提高 这样

 

不直接用TextBox 一个是出于美观问题，第二个，怕使用者搞不清楚

那你就判断Combobox的值，赋值为 一级、二级、三级 或者 初级、高级

 

如果要自己定义，就必须用textbox

我现在瞎尝试 把Combobox1 的Textchanged命令用之前最初编写的

For i As Integer = 1 To e.Form.Controls("Combobox1").Text
    e.Form.Controls("Textbox" & i).Visible = True
    e.Form.Controls("Label" & i).Visible = True
    e.Form.Controls("Label" & i).Text = e.Form.Controls("TextBox12").Text & i
Next

 预览发现当我在TextBox12中输入一种课程如：“识谱”

然后在Combobox1 中任意选择 1 - 6 任意一项之后，结果如下图：

此主题相关图片如下：qq图片20150827105115.png

 

显示出的Label控件中如果能去掉后面的1、2、3、4.。。这些数字，就可以实现我需要的效果了。这几个数字该如何去掉呢？

如果我再增加6个TextBox控件 分别为 7-12

然后我同样用Combobox3的值来判断 这6个控件是否显示

只是需要将Combobox3中的值 与TextBox7-12关联就可以了

但是我又不能自定义Combobox3内容为7-12，因为那样的话除了我别人看不明白是什么意思

所以如果设置一个变量，把Combobox3中的自定义内容=同于 7-12 就可以了吧？？？

那么我应该用怎样的代码来设置变量呢？

 

 

 或者是根据Texbox 1-6 的显示作为判断 7-12 是否显示呢？

汗

 

e.Form.Controls("Label" & i).Text = e.Form.Controls("TextBox12").Text

如果用一个CheckedComboBox控件 多几种选择在下拉菜单中

 

多选后 能作作为字段 跟其他控件的字段 一起组合成 一列内容吗？