- ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：コードの添削お願いします(変数エラー)）
コードの添削お願いします(変数エラー)
このQ&Aのポイント
- 変数エラーが発生するコードの添削をお願いします。
- コード内に変数エラーがあります。どこが問題か教えてください。
- 変数のエラーが出るコードの添削をお願いします。
noname#233045
- Visual Basic
- 回答数2
- ありがとう数2
- みんなの回答 （2）
- 専門家の回答
質問者が選んだベストアンサー
直して再掲します。 Formに配置したテキストボックスの名前が TextBox ではなく TextBox1 では？ また、 テキストボックスに埋まっている文字列の取得と 評価の順番が逆と思います。 つまり、 Option Explicit Private Sub CommandButton1_Click() Dim myStr As String myStr = TextBox1.Value If myStr <> "" Then Label1.Caption = LTrim(myStr) Label2.Caption = RTrim(myStr) Label3.Caption = Trim(myStr) Else MsgBox "終了" End If End Sub
その他の回答 (1)
- HohoPapa
- ベストアンサー率65% (455/693)
回答No.1
Formに配置したテキストボックスの名前は TextBox ではなく TextBox1 では？ また、 テキストボックスに埋まっている文字列の取得と 評価の順番が逆と思います。 つまり、 Option Explicit Private Sub CommandButton1_Click() Dim myStr As String myStr = TextBox.Value If myStr <> "" Then Label1.Caption = LTrim(myStr) Label2.Caption = RTrim(myStr) Label3.Caption = Trim(myStr) Else MsgBox "終了" End If End Sub
質問者
お礼
有難うございます
お礼
有難う御座います。 納得です。