|
网站首页
|
业界新闻
|
小组
|
威客
|
人才
|
下载频道
|
博客
|
代码贴
|
在线编程
|
编程论坛
|
登录
注册
短消息
我发表的主题
我参与的主题
我收藏的贴子
我上传的附件
我下过的附件
编辑个人资料
我的博客
用户控制面板
搜索
道具
恢复默认风格
碧海青天
秋意盎然
棕红预览
粉色回忆
蓝雅绿
紫色淡雅
青青河草
e点小镇
橘子红了
红红夜思
水晶紫色
雪花飘飘
新年快乐
风格
短消息
论坛展区
帮助
编程论坛
→
开发语言
→
『 VB6论坛 』
→ 初学者请教如何改变字体大小
我的收件箱(0)
欢迎加入我们,一同切磋技术
用户名:
密 码:
共有
946
人关注过本帖
标题:
初学者请教如何改变字体大小
只看楼主
加入收藏
lhj050530
等 级:
新手上路
帖 子:4
专家分:0
注 册:2013-8-27
结帖率:
100%
楼主
收藏
已结贴
√
问题点数:20 回复次数:11
初学者请教如何改变字体大小
如图,我想通过选择组合框里的数字来改变字体大小,程序如下,但是运行不了?新手请教。
Private Sub Combo1_change()
Text1.FontSize = Val(Combo1.Text)
End Sub
图片附件: 游客没有浏览图片的权限,请
登录
或
注册
搜索更多相关主题的帖子:
如何
2013-09-11 13:16
举报帖子
使用道具
赠送鲜花
风吹过b
等 级:
贵宾
威 望:
364
帖 子:4947
专家分:30084
注 册:2008-10-15
第
2
楼
收藏
得分:5
Text1.Font.Size = Val(Combo1.Text)
授人于鱼,不如授人于渔
早已停用QQ了
2013-09-11 14:17
举报帖子
使用道具
赠送鲜花
lhj050530
等 级:
新手上路
帖 子:4
专家分:0
注 册:2013-8-27
第
3
楼
收藏
得分:0
回复 2楼 风吹过b
试了还是不行,只有组合框里输入数字的时候可以改变他字体大小,但是用选取的方法没有改变?
2013-09-11 18:26
举报帖子
使用道具
赠送鲜花
亵渎魔鬼
等 级:
新手上路
帖 子:10
专家分:5
注 册:2013-9-10
第
4
楼
收藏
得分:5
回复 3楼 lhj050530
它的事件你搞错了,是click事件,不是change事件
2013-09-11 20:55
举报帖子
使用道具
赠送鲜花
chen3523
等 级:
贵宾
威 望:
33
帖 子:223
专家分:1165
注 册:2013-2-12
第
5
楼
收藏
得分:5
Private Sub Combo1_Click()
Text1.Font.Size = Combo1.Text
End Sub
我试了可以改变的
[
本帖最后由 chen3523 于 2013-9-12 17:15 编辑
]
调试失败3次后,关机睡觉,当醒来时多有收获。
2013-09-11 21:07
举报帖子
使用道具
赠送鲜花
亵渎魔鬼
等 级:
新手上路
帖 子:10
专家分:5
注 册:2013-9-10
第
6
楼
收藏
得分:0
回复 5楼 chen3523
这个就要具体问题具体分析了
2013-09-11 21:12
举报帖子
使用道具
赠送鲜花
bczgvip
等 级:
贵宾
威 望:
66
帖 子:1310
专家分:5312
注 册:2009-2-26
第
7
楼
收藏
得分:5
你确定那是ComboBox 而不是 ListBox ?
2013-09-11 22:31
举报帖子
使用道具
赠送鲜花
亵渎魔鬼
等 级:
新手上路
帖 子:10
专家分:5
注 册:2013-9-10
第
8
楼
收藏
得分:0
当代码像这样的时候
Private Sub Combo1_Change()
Text1.FontSize = Val(Combo1.Text)
End Sub
是在combo1中输入数字,text1的字体大小改变
当代码是这样时
Private Sub Combo1_Click()
Text1.FontSize = Val(Combo1.Text)
End Sub
是用选择的方法改变text1.fontsize
2013-09-12 09:44
举报帖子
使用道具
赠送鲜花
lhj050530
等 级:
新手上路
帖 子:4
专家分:0
注 册:2013-8-27
第
9
楼
收藏
得分:0
回复 7楼 bczgvip
是comboBOX
2013-09-12 11:07
举报帖子
使用道具
赠送鲜花
lhj050530
等 级:
新手上路
帖 子:4
专家分:0
注 册:2013-8-27
第
10
楼
收藏
得分:0
回复 8楼 亵渎魔鬼
是的,但我要实现两种方式都能改变,应该怎么写?
2013-09-12 11:09
举报帖子
使用道具
赠送鲜花
12
1/2页
1
2
快速回复:
初学者请教如何改变字体大小
数据加载中...
关于我们
|
广告合作
|
编程中国
|
清除Cookies
|
TOP
|
手机版
编程中国
版权所有,并保留所有权利。
Powered by
Discuz
, Processed in 0.025092 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved