先上个双击的 单击的你自己写下吧 我有事Private Sub Form_DblClick()Form1.ClsForm1.FontSize = 22Form1.ForeColor = vbBlueForm1.Font = "隶书"Print "欢迎学习VB程序设计!"End Sub
窗体的onClick事件响应单击,从这儿写代码让文字显示黑体并居中;窗体onDbClick事件响应双击