精華區beta Visual_Basic 關於我們 聯絡資訊
另外想再請教一個問題 要怎樣限制輸入的字元長度? 小弟我將以下的程式加在等於的Click() 試圖用Len(lblOut.Caption)去抓字元長度 但是沒有成功 先謝了...^^ Private Sub cmdEqal_Click() If LastInput = "數字" Then NumOp = NumOp + 1 End If Select Case NumOp Case 1 Op1 = lblOut.Caption Case 2 Op2 = lblOut.Caption Calculation End Select If LastInput <> "負值" Then LastInput = "運算符號" PreOp = "=" End If a = Len(lblOut.Caption) If a > 20 Then MsgBox "輸入過長" End If End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 220.133.49.48
shenghong:如果把輸出的Label改Text是可以成功 220.133.49.48 01/10
shenghong:但是不知道Label怎麼做?希望高手指點~^^ 220.133.49.48 01/10
kyop: vbCrLf ? 218.163.144.92 01/10
shenghong:換行??? 220.133.49.48 01/10