关于字体

Question

请问如何设置VB控件的字体呀.现我有一工程字体为:"MS Sans Serif" 想改为宋体字,要怎么办?

Answer 1

you are a lazy guy.
做个循环吧。

Answer 2

Dim tc As Control
Dim objfrm As formFor Each tc In Me.Controls
  tc.font.name="宋体"
  tc.font.size=8
  tc.font.bold=flase  'true
NextFor Each tc In Me.Controls
  objfrm .font.name="宋体"
  objfrm .font.size=8
  objfrm .font.bold=flase  'true
Next.....

Answer 3

有点错误。你自己顶。我有事情了。Reply off line.