VB2005環境です。
渡ってきたString型の数字を、スラッシュをつけた上で、
テキストボックスに表示したいと思っています。
具体的には、
Dim YMD as string ="200709"
Me.txtbox1.text=YMD
これだと、200709と表示されてしまいますので、スラッシュを
つけて、2007/09にしたいのです。
Formatを使うのだろうと思い、
Me.txtbox1.text=Format(YMD,"0000/00")
としてみると、エラー。
スラッシュがつくからDateになるのかなと、
Me.txtbox1.text=CDate(Format(YMD,"0000/00"))
でもダメでした。
Formatは、第二引数に指定した形式に直すものだと思っていたの
ですが、String型のデータは直せないのでしょうか…?
問題点と、解決方法を教えていただけないでしょうか。
よろしくお願いします。
No.4ベストアンサー
- 回答日時:
Formatはその第一引数に string 型が来た場合に
自動の型変換を行わないようです。
GotDotNet Japan 掲示板
http://www.microsoft.com/japan/msdn/community/gd …
ということで自前で変換をかければ
Imports System
Imports System.Text
Imports Microsoft.VisualBasic
Module ConvertDateString
Sub Main
Dim YMD as string ="200709"
Dim text
Dim provider As IFormatProvider
text = Format(DateTime.ParseExact(YMD, "yyyyMM", provider), "yyyy/MM" )
Console.Write(text)
End Sub
end Module
2007/09
とできますが
こんなことをするくらいなら正規表現でも使って
文字列として変換した方がよいような気がします。
No.3
- 回答日時:
Me.txtbox1.Text = Format(wStr, "####/##")
No1さんのお礼にも書きましたが、第一引数にString型を
していることから起きているようなんです。
なので、Me.txtbox1.text=Format(YMD,"####/##")とすれば、
メッセージボックスには####/##と出ます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Excel(エクセル) このコードに追記事項の仕方を教えて下さい。 以下のコード内容に出てくる。セルH3が空白の場合、エラー 4 2023/08/03 00:22
- Excel(エクセル) マクロでテキストファイルを読み込んだ際の最終セルにデータと改行が含まれる問題の改善方法 2 2022/03/25 16:50
- Excel(エクセル) エクセルVBA、ファイル名をセルの値で保存の方法を教えてください。 おそれいります。こちらで数々のエ 6 2023/06/30 22:17
- Excel(エクセル) EXCELのグラフを画像(JPG形式)で保存、通常実行がうまく行かない。ステップインはうまく行く 3 2022/08/30 12:06
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
- PHP 文字列を段落で分ける方法を教えて下さい。 2 2023/03/09 10:03
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
実行時エラー'-2147467259(80004005)':
Access(アクセス)
-
VBAのコマンドボタンの文字列の改行方法は?
Visual Basic(VBA)
-
-
4
Integer変数をカラにしたいのですが
Visual Basic(VBA)
-
5
vbaで「/」を削除したい
Excel(エクセル)
-
6
文字列内で括弧を使うには
Visual Basic(VBA)
-
7
スラッシュを固定表示したまま年月日をテキストボックスに入力できるようにするには
Visual Basic(VBA)
-
8
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
9
文字列からタブコードを取り除きたい
Visual Basic(VBA)
-
10
EXCEL VBAで、セルの文字列の前後に文字を入力する方法は?
その他(Microsoft Office)
-
11
exeファイルの中身を見ることは可能ですか?
フリーソフト
-
12
実行時エラー 3265「要求された名前、または序数
Visual Basic(VBA)
-
13
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
14
特定のPCだけ動作しないVBAマクロがあります。その理由は?
Visual Basic(VBA)
-
15
エクセルでマクロを作成してますが、バックスラッシュが入力出来ません。 設定方法等教えて頂けないでしょ
Excel(エクセル)
-
16
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
17
vba 8桁の文字列を日付に変更
Visual Basic(VBA)
-
18
Worksheets メソッドは失敗しました。のエラー処理のやり方
Visual Basic(VBA)
-
19
VBAでの Replace関数で、ワイルドカードは使えないのでしょうか?
Visual Basic(VBA)
-
20
エクセルエラー13型が一致しませんの直し方教えて下さい。
その他(Microsoft Office)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
C#のループでtextboxに値を入れ...
-
VB
-
VBA public変数はどのようなこ...
-
C言語のサフィックスについて
-
Functionの戻り値を配列にした...
-
ユーザーフォームへのデータ入...
-
テキストボックスを空白にする方法
-
チェックボックスを操作できな...
-
他のフォームから別のフォーム...
-
VB.NETでのイベントの途中終了
-
VB2010 TextBoxの数字の表示...
-
検索結果の指定列をリストボッ...
-
コンボボックスからテキストボ...
-
VBAのユーザーフォームで、テキ...
-
EXCEL2010 VBA SelectionChange...
-
VB6でマウスのドラッグで範囲を...
-
ドラゴン曲線を再帰で書く
-
VB.NET)コンボボックスの連動に...
-
【VB.NET】テキストボックスに...
-
レコードセットにnullの場合
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
C#のループでtextboxに値を入れ...
-
String型の値にスラッシュをつ...
-
VB
-
VBA テキストボックスで計算
-
datagridview の任意の行に三...
-
テキストボックスを下から上へ...
-
vb.net 文字コードから漢字へ変換
-
Pythonでのかんたんな物理シミ...
-
C# RichTextBoxについて
-
C# コントロール取得
-
g95プログラムからg++関数を呼...
-
textboxとlabelのコピー
-
VBA public変数はどのようなこ...
-
他のフォームから別のフォーム...
-
エクセルVBAでテキストボッ...
-
VBAでcallで呼び出したsubを終...
-
VB.NETでのイベントの途中終了
-
C言語のサフィックスについて
-
ドラゴン曲線を再帰で書く
-
Functionの戻り値を配列にした...
おすすめ情報