JBTALKS.CC

标题: VB2010 Express 关于textbox的数字输入问题求救！ [打印本页]
作者: oreeee    时间: 2011-12-20 04:47 PM
标题: VB2010 Express 关于textbox的数字输入问题求救！
本帖最后由 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 编辑

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

  13. msgbox(total)
复制代码




欢迎光临 JBTALKS.CC (https://jbtalks.my/) Powered by Discuz! X2.5