所有关于我对vb code的疑问都会在此写下...请大家留意...

jaklim

头像被屏蔽

0 主题	0 好友	1611 积分

禁止发言

发消息

12^#

发表于 2008-7-27 12:09 PM |只看该作者

提示: 作者被禁止或删除内容自动屏蔽

0 主题	0 好友	60 积分

Rank: 2 Rank: 2

发消息

13^#

发表于 2008-8-1 08:33 PM |只看该作者

哇...刚刚考完试啊...
累啊...
不过谢谢你们提供资料...

0 主题	0 好友	60 积分

Rank: 2 Rank: 2

发消息

14^#

发表于 2008-8-1 08:41 PM |只看该作者

普通的除...
如果txt1 和 txt2 的 text 放空...
就代表无限大的意思对吧...
可是酱会 overflow...
有什么解决方法吗...

0 主题	0 好友	60 积分

Rank: 2 Rank: 2

发消息

15^#

发表于 2008-8-1 08:47 PM |只看该作者

原帖由 goodhermit95 于 2008-7-27 09:30 AM 发表
输入分数框 = textbox1
显示分数 = label1.text
探测按钮 = Button1
Private Sub button1_click()
If textbox1.text = Int(80~100) Then
label1.text = "Your Rank Is -A-"
ElseIf textbox1.tex ...

这个code 有问题...
syntax error~

0 主题	0 好友	60 积分

Rank: 2 Rank: 2

发消息

16^#

发表于 2008-8-1 08:53 PM |只看该作者

回复 #11 goodhermit95 的帖子

还有你的code有严重问题...
应该是 label1.caption 而不是 label1.text...
还有在 int(80~100)...
它讲有问题...

Anything~~!

2 主题	2 好友	621 积分

青铜长老

Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7 Rank: 7

发消息

17^#

发表于 2008-8-1 09:30 PM |只看该作者

输入分数框 = textbox1
显示分数 = label1.caption
探测按钮 = Button1
Private Sub button1_click()
x=val(textbox1.text)
  If 100>=x>=80 Then
label1.caption= "Your Rank Is -A-"
  ElseIf 79>=x>=60 Then
Label1.caption = "Your Rank Is -B-"
  ElseIf 59>=x>=40 Then
Label1.caption = "Your Rank Is -C-"
  ElseIf 39>=x=20 Then
Label1.caption = "Your Rank Is -D-"
  ElseIf 19>=x>=0 Then
Label1.caption = "Your Rank Is -E-"

  End If
End Sub

已有 1 人评分	积分	收起理由
goodday	+ 1	感谢分享

总评分: 积分 + 1 查看全部评分

0 主题	0 好友	60 积分

Rank: 2 Rank: 2

发消息

18^#

发表于 2008-8-4 04:38 PM |只看该作者

有什么办法可以按一下 textbox
然后 textbox 的字就 highlight 起来吗？

goodday

13 主题	0 好友	2113 积分

白金长老

Rank: 10

发消息

19^#

发表于 2008-8-4 05:05 PM |只看该作者

原帖由 goodhermit95 于 2008-7-27 09:30 AM 发表
输入分数框 = textbox1
显示分数 = label1.text
探测按钮 = Button1
Private Sub button1_click()
If textbox1.text = Int(80~100) Then
label1.text = "Your Rank Is -A-"
ElseIf textbox1.tex ...

你的码永远不会到 100 full mark

在第一个已出去了

goodday

13 主题	0 好友	2113 积分

白金长老

Rank: 10

发消息

20^#

发表于 2008-8-4 05:08 PM |只看该作者

原帖由 电脑@白痴 于 2008-8-1 08:53 PM 发表
还有你的code有严重问题...
应该是 label1.caption 而不是 label1.text...
还有在 int(80~100)...
它讲有问题...

他是 vb.net 的你是vb6 的
哈哈你很勤力叻有试的