|
リストボックス・コンボボックスの書式を指定するには？
キーワード>>Format
| Point ：リストボックスやコンボボックスに日付をリスとにすると選択したとき数字(シリアル値)になってしまうので書式を設定したい。
Private Sub ComboBox1_Change()
With Me
ComboBox1.Text = Format(.ComboBox1.Text, "yyyy年m月d日")
'コンボボックスが選択されたとき、書式を○年○月○日に設定
End With
End Sub
※このコードはコントロールツールボックスのコンボボックスです。
フォームのコンボボックスではありません。
|
当サイトの全ての内容の無断転載等を一切禁止します。
掲載サンプルコードの使用に関して、直接・間接
を問わず生じた一切の損害について如何なる責任も負いません。
Copyright (C) 2000-2001 reizo
All rights reserved.
|
