在窗体中添加两个文本框(其 Name 属性分别为 Text1 和 Text2 )和一个命令按钮( Name 属性为 Command1 ),然后编写如下两个事件过程: Private Sub Command1_Click() a = UCase$(Text1.Text) + Left$(Text2.Text , 2) Print a End Sub Private Sub Form_Load() Text1.Text = "aB" Text2.Text = "123456" End Sub 程序运行后,单击命令按钮,输出结果为【 1 】