vb 在名称为Form1的窗体上，画1个名称为Label1的标签，其标题为"等级考试"，能根据标题内容自动调整标签的

你在窗体上加一个名为TEXT1的文本框,然后向文本框输入字符看看 Private Sub Form_Load() Label1.Alignment = 2 '注意这行,可以在设计时完成 Label1.AutoSize = True '注意这行,可以在设计时完成 End Sub Private Sub Text1_Change() Label1 = Text1.Text '给你测试的 End Sub