For j = 0 To Screen.FontCount - 1
 Combo1.AddItem Screen.Fonts(j)
Next j


上面是个加载字体的代码.   请问Screen.FontCount后面为什么要加上- 1呢,教程里的解释是第一个字体名的索引值为0,第二个为1,总数量就是减去1,我不明白为什么总数量就是减去1呢.   


另外我的VB中InputBox函数必须用上左边上边参数,否则对话框输入区显示的是乱码.

谢谢!!

我还是不太明白

是不是说screen.fonts是从0开始数,而screen.fontcount是从1开始数.

感谢版主!  总于搞定了.