在VB中将消息显示为表

时间:2013-04-05 14:03:36

标签: vb.net

我是编程新手,我必须设计一个项目作为我的Uni项目的一部分......我几乎已经完成了70%的设计,但是想以桌子形式进行按摩。

我应该有数据库??? ...如何将其链接到消息??

我的代码是

 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If TextBox1.Text = Nothing Then MessageBox.Show("Please, Find Your Calories First")
        If TextBox1.Text > "2400" Or TextBox1.Text > "2300" Then MessageBox.Show("What should I write here????")
我应该有数据库???

2 个答案:

答案 0 :(得分:0)

不确定你的意思是什么......但不管怎么说......

您应该从按钮单击中抽象代码,这样您就可以在另一个事件上重复使用它。你只需创建一个新子,然后点击按钮就可以调用它

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

    CaloriesChecker()

End Sub

这是您的方法重写为case语句,整数变量“calories”已分配给您的文本框,这将确保您可以评估该数字。

使用案例陈述,您可以为卡路里设定界限....对不起,我不确定你的意思是表。

Private Sub CaloriesChecker()

    Dim calories As Integer = TextBox1.Text
    Dim message As String

    Select Case calories
        Case ""
            message = "Please, Find Your Calories First"
        Case Is > 2300
            message = "whatever you want to say"
    End Select

    messagebox.show(message)

End Sub

答案 1 :(得分:0)

除了显示消息之外,您还需要一个数据库来填写用餐点

+-----------+-------------------+
| Meal Type |    Calories       |
+-----------+-------------------+
| Bread     |     XXXXXX        |
|  ......   |     ..........    |
+-----------+-------------------+

这样的事情,因为它会使用户容易输入,甚至不需要他们输入他们的卡路里。每次他们选择用餐时,文本框都会自动从用户选择的值中获​​取值(卡路里)。

为什么我这样建议?因为并非您的程序的每个用户都知道确切的卡路里。所以最好是创建一个包含它的数据库。

问:如果他们的餐不包含在数据库中怎么样? A:然后你应该按一下按钮来调用新表格,以便用户添加新的膳食和卡路里

这不是你想要的吗? 还有关于你的代码

If TextBox1.Text = Nothing Then MessageBox.Show("Please, Find Your Calories First")
        If TextBox1.Text > "2400" Or TextBox1.Text > "2300" Then MessageBox.Show("What should I write here????")

我认为对于那些希望他/她的节目能够被其他人喜爱的PROGRAMMER来说,这是最好的策略。因为如果他们很难找到它,他们会觉得这个程序难以使用然后无聊,然后删除。不是吗?

所以,最好的新数据库。关于计算,您可以将按钮计算为真正的卡路里,作为消费者的年龄或体重等等,以达到您想要的最佳状态