如何使用vb.net和sql计算日销售额开发者社区

相关文章推荐

任性的烤面包 · 如果南阳武侯祠更名为“南阳诸葛庐”，你支持吗 ...· 2 月前 ·

苦闷的蚂蚁 · 2023年铁路春运圆满收官，发送旅客达3.4 ...· 7 月前 ·

冲动的野马 · 2020年中国科学院大学人文地理学考研招生情 ...· 1 年前 ·

大鼻子的鸡蛋 · 绝对干货，良心推荐！Windows ...· 1 年前 ·

留胡子的鸵鸟 · 英格兰乙级联赛_英格兰乙级联赛ds_英格兰乙 ...· 1 年前 ·

腾讯云

开发者社区

文档意见反馈控制台

首页 TVP

最新优惠活动

文章/答案/技术大牛

发布

   Dim query = "SELECT SUM(Amount)as sales FROM BillTbl where [BDate] = ? "
        Dim conkey As New SqlConnection(con)
        Dim cmd = New SqlCommand(query, conkey)
        cmd.Parameters.AddWithValue("@BDate", Now.ToString("MM/dd/yyyy"))
        conkey.Open()
        Dim total As Double = Convert.ToDouble(cmd.ExecuteScalar())
        check.Text = total.ToString
        conkey.Close()

Dim query = "SELECT SUM(Amount)as sales FROM BillTbl where [BDate] = cast(current_timestamp as Date)"
Using conkey As New SqlConnection(con), _
      cmd As New SqlCommand(query, con)
    conkey.Open()
    Dim total As Decimal = Convert.ToDecimal(cmd.ExecuteScalar())
End Using

Dim query = "SELECT SUM(Amount)as sales FROM BillTbl where [BDate] = @BDate"
Using conkey As New SqlConnection(con), _
      cmd As New SqlCommand(query, con)

推荐文章

任性的烤面包 · 如果南阳武侯祠更名为“南阳诸葛庐”，你支持吗？_手机搜狐网

2 月前

苦闷的蚂蚁 · 2023年铁路春运圆满收官，发送旅客达3.48亿人次_国家铁路局

7 月前

冲动的野马 · 2020年中国科学院大学人文地理学考研招生情况、分数线、参考书目 ...

1 年前

大鼻子的鸡蛋 · 绝对干货，良心推荐！Windows 端最好用的本地音乐播放器 ...

1 年前

留胡子的鸵鸟 · 英格兰乙级联赛_英格兰乙级联赛ds_英格兰乙级联赛球队推荐-抖音

1 年前

回答 2

Stack Overflow用户