|登录 |注册

楼主: 电脑@白痴
打印 上一主题 下一主题

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

[复制链接]

回复 #10 goodhermit95 的帖子

goodhermit95
2008-7-27 09:31 AM
如果要 A+A - B+ B- ,依此类推~
提示: 作者被禁止或删除 内容自动屏蔽
电脑@白痴
2008-8-1 08:33 PM
哇...刚刚考完试啊...
累啊...
不过谢谢你们提供资料...
电脑@白痴
2008-8-1 08:41 PM
普通的除...
如果txt1 和 txt2 的 text 放空...
就代表无限大的意思对吧...
可是酱会 overflow...
有什么解决方法吗...
电脑@白痴
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~

回复 #11 goodhermit95 的帖子

电脑@白痴
2008-8-1 08:53 PM
还有你的code有严重问题...
应该是 label1.caption 而不是 label1.text...
还有在 int(80~100)...
它讲有问题...
Anything~~!
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   查看全部评分

电脑@白痴
2008-8-4 04:38 PM
有什么办法可以按一下 textbox
然后 textbox 的字就 highlight 起来吗?
goodday
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
2008-8-4 05:08 PM
原帖由 电脑@白痴 于 2008-8-1 08:53 PM 发表
还有你的code有严重问题...
应该是 label1.caption 而不是 label1.text...
还有在 int(80~100)...
它讲有问题...


他是  vb.net 的 你是vb6 的
哈哈 你很勤力叻 有试的
您需要登录后才可以回帖 登录 | 注册

JBTALKS.CC |联系我们 |隐私政策 |Share

GMT+8, 2026-1-1 07:40 AM , Processed in 0.120636 second(s), 24 queries .

Powered by Discuz! X2.5 © 2001-2012 Comsenz Inc.

本论坛言论纯属发表者个人意见,与本论坛立场无关
Copyright © 2003-2012 JBTALKS.CC All Rights Reserved

Dedicated Server powered by iCore Technology Sdn. Bhd.

合作联盟网站:
JBTALKS 马来西亚中文论坛 | JBTALKS我的空间 | ICORE TECHNOLOGY SDN. BHD.
回顶部