Question

VB设计程序,在一个文本框输入一串字符（大于2个）,点击处理按钮取字符串的头,尾各一个显示在标签中

Answer 1

Private Sub Command1_Click()
    Label1.Caption = IIf(Len(Text1) > 2, Left(Text1, 1) & Right(Text1, 1), "")
End Sub
Private Sub Form_Load()
    Text1 = "abcde"
End Sub

Answer 2

Sub Button1_Click() str = Left(Text1.value, 1) & Right(Text1,1) Label1.value = strEnd Sub

Answer 3

private sub command1_click()
label1.caption=left(text1.text,1) & right(text1.text,1)
end sub