vb6.0中如何在文本框输入文字?
怎样写个程序是连续点击“放大”则文本框内字体NBA连续放大?我写的代码为什么上面显示错误缺少语句,PrivateSub放大_Click()text1fontsize=te...
怎样写个程序是连续点击“放大”则文本框内字体NBA连续放大?我写的代码为什么上面显示错误缺少语句,
Private Sub 放大_Click()
text1 font size=text1 font size+2
End Sub求正确写法。 展开
Private Sub 放大_Click()
text1 font size=text1 font size+2
End Sub求正确写法。 展开
5个回答
2011-08-31
展开全部
设计状态下在TEXT属性中输入文字!
运行时直接文本框就输入文字就可以了!
通过代码输入的话
text1.text="VB程序设计" 这样写!
运行时直接文本框就输入文字就可以了!
通过代码输入的话
text1.text="VB程序设计" 这样写!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Text1.FontSize = Text1.FontSize + 2
一点问题没有! 你不会少了“.”吧?我刚刚试了,一点问题没有
一点问题没有! 你不会少了“.”吧?我刚刚试了,一点问题没有
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
正确写法。另外,在控件命名的时候尽量少使中文,这样省得切换输入方法。
Private Sub 放大_Click()
text1.font.size=text1.font.size+2
End Sub
Private Sub 放大_Click()
text1.font.size=text1.font.size+2
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
public A as integer "全局变量
Private Sub 放大_Click()
static A as integer
text1 fontsize=A
End Sub
Private Sub Form_Load()
A=5 "字体初始值
End Sub
Private Sub 放大_Click()
static A as integer
text1 fontsize=A
End Sub
Private Sub Form_Load()
A=5 "字体初始值
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
只要TEXT的ENABLE的属性为TRUE就能写的吧
Text1.FontSize = Text1.FontSize + 2要点的
Text1.FontSize = Text1.FontSize + 2要点的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询