|登录 |注册

查看: 2240|回复: 6
打印 上一主题 下一主题

VB2010 Express 关于textbox的数字输入问题求救!

[复制链接]
oreeee
2011-12-20 04:47 PM
本帖最后由 oreeee 于 2011-12-20 04:49 PM 编辑

自学到这里却卡住了:

Exercise

Put two textboxes on your form. The first box asks users to enter a start position for a For Loop; the second textbox asks user to enter an end position for the For loop. When a button is clicked, the programme will add up the numbers between the start position and the end position. Display the answer in a message box. You can use this For Loop code

For i = startNumber To endNumber

answer = answer + i

Next i

Get the startNumber and endNumber from the textboxes.


我是这样编写的:

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim i As Integer
        Dim startnumber As Integer
        Dim endnumber As Integer

        startnumber = startnumber.text
        endnumber = endnumber.text

        For i = startnumber To endnumber
        Next i

        MsgBox(i)

    End Sub
End Class

问题就出在textbox那里。

=.=

Help!



*Exercise提取于 http://www.homeandlearn.co.uk/NET/nets3p2.html
buzZsk
2011-12-20 04:55 PM
回复 1# oreeee


你的textbox换掉名就可以了。。
integer叫startnumber
textbox也叫startnumber
有conflict哦
wert123
2011-12-20 05:16 PM
你把你的string(text 里) convert 去 int 先... 不然不可以的...
oreeee
2011-12-20 05:19 PM
回复  oreeee


你的textbox换掉名就可以了。。
integer叫startnumber
textbox也叫startnumber{:4_41 ...
buzZsk 发表于 2011-12-20 04:55 PM



    谢谢!!!
oreeee
2011-12-20 05:27 PM
你把你的string(text 里) convert 去 int 先... 不然不可以的...
wert123 发表于 2011-12-20 05:16 PM



  关于:string(text 里) convert 去 int  的不解。

这是在textbox的properties 转换的吗?
还是怎样的?

请大大给予帮助。
buzZsk
2011-12-20 06:01 PM
回复 5# oreeee


integer不用换也可以
只要你不打alphabet就没有事
聖賢
2011-12-20 07:08 PM
本帖最后由 聖賢 于 2011-12-20 07:13 PM 编辑

  1.   Dim i As Integer
  2.         Dim startnumber As Integer
  3.         Dim endnumber As Integer
  4.         Dim total As Integer
  5.             total = 0
  6. startnumber = cint(startnumber.text)
  7.         endnumber = cint(endnumber.text)
  8. For i = startnumber To endnumber
  9.         total = total + i
  10.         Next

  11. msgbox(total)
复制代码
您需要登录后才可以回帖 登录 | 注册

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

GMT+8, 2025-3-10 11:21 PM , Processed in 0.106817 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.
回顶部