菜鸟关于界面字体问题

shenbinshuai 2003-10-08 11:30:02
win98下vb编译的exe程序,在另一台win98上运行时,label,text中字体字体很难看,请问有什么办法解决吗?
...全文
54 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
海牛 2003-10-08
  • 打赏
  • 举报
回复
测试机未安装字体!
lisong770818 2003-10-08
  • 打赏
  • 举报
回复
可能是测试机未安装字体
老熊宝宝 2003-10-08
  • 打赏
  • 举报
回复
不要使用任何特殊字体,只用宋体。
为保证这一点,可以在每个From里的Form_Load事件里加上下面的东东。

Private Sub Form_load()
Dim ctl As Control
Dim oFont As StdFont

On Error Resume Next
For Each ctl In Controls
Set oFont = ctl.Font
With oFont
.Name = "宋体"
.Charset = 134
End With
Next
End Sub

注意上面的Charset一定要设。
射天狼 2003-10-08
  • 打赏
  • 举报
回复
你是没安装吧,如果没安装也能运行,你可以将VB6CHS.DLL这个语言包带上就可以了~~
shenbinshuai 2003-10-08
  • 打赏
  • 举报
回复
谢谢各位仁兄!!小弟感激不尽
现在还是人类 2003-10-08
  • 打赏
  • 举报
回复
是字体大小问题,Win2000中的默认的字体大小和98中默认的字体大小不同(系统默认的字体大小),所以如果你在程序中指定字体大小问题就解决了。
IsMe 2003-10-08
  • 打赏
  • 举报
回复
private sub form_load()
dim ctl as control
.....

on error resume next
for each ctl in controls
ctl.font.name="宋体"
next
end sub
tianhao123 2003-10-08
  • 打赏
  • 举报
回复
在程序中设置字体:(不管安在哪台上,都能正确显示!)
with label1.font
.name="宋体"
.size=9
end with
shenbinshuai 2003-10-08
  • 打赏
  • 举报
回复
帮助一下啊,各位仁兄!~~
shenbinshuai 2003-10-08
  • 打赏
  • 举报
回复
可是我都是默认的宋体啊

7,789

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧