Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

2903 / 9994

←次へ　｜　前へ→


	【10356】ＣＳＶファイルの表示方法を変えたい

たつ - 08/5/7(水) 17:47 -


	引用なし

	パスワード

はじめまして、こんにちは。

現在、顧客情報を入力し登録するフォーム『F_顧客』を作成しています。
『F_顧客』内の「CSV出力」のボタンを押すと、フォーム内に入力したデータが
CSVファイルとして出力するロジックを考え中です。

Private Sub CSV出力_Click()
　　'Dim rs As New ADODB.Recordset
　　Dim strSql As String
　　Dim strFile As String

　　If IsNull(日付) Or IsNull(顧客ＩＤ) Or IsNull(原価) Then
　　
　　MsgBox ("未記入があります。")
　　　 DoCmd.CancelEvent
　　　　txtdate.SetFocus
　　　　Exit Sub
　　End If
　　　　　
　　　
strFile = "c:\顧客情報.txt"
　　Open strFile For Output Access Write As #1

　　
　　　　Write #1, _
　　　　CStr(日付); _
　　　　CStr(顧客ＩＤ); _
　　　　CStr(原価); _

　　Close #1 '

End Sub

このロジックではきちんとCSVに出力されるのですが、一つ問題があります。
このフォーム内に日付を入力するテキストボックス「txtdate」に
入力する際は○○/○○/○○（例：08/05/07)と入力し、
ＣＳＶファイルとして出力するデータの日付の表示を○○○○○(例:080507)と表示させたいのですが、今一歩のところでできません。
どこの設定でＣＳＶの表示方法をかえることができるのでしょうか？
どなたかご教授お願いします。

説明がへたくそですみません。

312 hits

▼

【10356】ＣＳＶファイルの表示方法を変えたい たつ 08/5/7(水) 17:47