这样了 :)Private Sub Command1_Click()
Text1.Text = Month(Me.DTPicker1.Value)End Sub

解决方案 »

  1.   

    用 Format  函数 
    Format text1.text  #???????#自己看 VB 帮助 MSDN 中的Format  函数 有详细介绍
      

  2.   

    Text1.Text = Month(Me.DTPicker1.Value)
    请问那位大哥:DTPicker1.value是什么意思呢
      

  3.   

    q我了是菜的请各位帮帮解释一下,Text1.Text = Month(Me.DTPicker1.Value)
    请问那位大哥:DTPicker1.value是什么意思呢
      

  4.   

    DTPicker是一个日期选择控件
    DTPicker1.value是这个控件当前选定的日期。