帮忙做一个VB的题目 20

设计一个可动态修改的界面,程序实现:运行时,单击“添加”按钮在现有文本框和标签的右侧添加一个新的文本框和一个新的标签,如果宽度不足以容纳新的控件,则自动加宽,单击“删除”... 设计一个可动态修改的界面,程序实现:运行时,单击“添加”按钮在现有文本框和标签的右侧添加一个新的文本框和一个新的标签,如果宽度不足以容纳新的控件,则自动加宽,单击“删除”按钮删除最右侧的文本框和标签,并缩减多余的窗体宽度,如果删除到最后一组的控件还单击“删除”按钮,则用消息框提示“不能再删除”,单击“逆序显示”按钮,将文本框的内容显示在标签中。

图片我无法发,描述下,第一行为1个设计的文本框,Text1(0),后面用数组控件在运行时候显示出来的,第二行位Label1(0)和上面一样。第三行三个command,"添加"删除"和"逆序显示"。
我写了
Private Sub Command1_Click()
Load Text1(Text1.UBound + 1)
With Text1(Text1.UBound)
.Visible = True
.Left = Text1(Text1.UBound - 1).Left + 500
End With

Load Label1(Label1.UBound + 1)
With Label1(Label1.UBound)
.Visible = True
.Left = Label1(Label1.UBound - 1).Left + 500
End With

End Sub

Private Sub Command2_Click()

Unload Text1(Text1.UBound)
Unload Label1(Label1.UBound)
End Sub

添加和删除的部分,其中自动加宽的自动缩减多余的窗体宽度不会,还有删除到剩下最后一组还单击删除提示“不能在删除”不会以及逆序显示那个不会。
逆序显示就是第一行比如文本框显示1,2,3,4,5,6,7,则Label那行就显示7,6,5,4,3,2,1.。。

字比较多,但是我真的不会,我觉得我们的教材不好,出的作业是课本内容里面不足以提供的。

谢谢了
展开
 我来答
factor_hg
2011-10-30 · TA获得超过1425个赞
知道小有建树答主
回答量:1444
采纳率:0%
帮助的人:419万
展开全部
窗体宽度减去(或者加上)控件的宽度就行啦
for i=Label1.UBound to 0 step -1
Load Label1(i)
next
这不就逆序了吗
匿名用户
2011-10-30
展开全部
......
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式