小弟刚开始学习编程,经介绍VB似乎好学一些!买本书看到第三章的习题时不会做了.请前辈帮忙解答,顺便告诉小弟一些学习VB的论坛.有问题的时候可以去查查提些问题,先谢过了!~!
题是这样的:
设计一个程序,添加一个文本框和六个命令按钮.
六个按钮分别是:增大,缩小,下划线,删除线,粗体,斜体.
目的是在文本框输入文字后,每按一次增大或缩小按钮文字就会就增大缩小5磅.
visual basic 6.0一个简单的程序问题
答案:4 悬赏:80
解决时间 2021-02-21 01:46
- 提问者网友:爱你等于作孽
- 2021-02-20 13:40
最佳答案
- 二级知识专家网友:不服输的倔强
- 2021-02-20 14:22
Private Sub Command1_Click()
Text1.FontSize = Text1.FontSize + 5
End Sub
Private Sub Command2_Click()
Text1.FontSize = Text1.FontSize - 5
End Sub
Private Sub Form_Load()
Command1.Caption = "字体增大"
Command2.Caption = "字体缩小"
End Sub
Text1.FontSize = Text1.FontSize + 5
End Sub
Private Sub Command2_Click()
Text1.FontSize = Text1.FontSize - 5
End Sub
Private Sub Form_Load()
Command1.Caption = "字体增大"
Command2.Caption = "字体缩小"
End Sub
全部回答
- 1楼网友:寂寞的炫耀
- 2021-02-20 16:53
设置全局变量干嘛??
用本身控件的属性自己加减不就行了
- 2楼网友:傲娇菇凉
- 2021-02-20 16:46
设置个全局变量 假设为i 当按增大时i+5 减小时i-5 然后改变文本框的字号
- 3楼网友:厌今念往
- 2021-02-20 15:06
假设你的窗体上有一个textbox和label。你输入的数字是正确的。那么:
1)在程序“声明”处声明“dim i as integer”。
2)在界面上拖拽一个timer,interval设置1000,enabled=false。
3)双击timer,事件中写代码:
label1.caption = i
if (i <=0) then
timer1.enabled = false
else
i = i-1
end if
4)双击按钮,事件中这样写:
timer1.enabled = true
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯