如何用vb.net 和sql server做一個飯店管理系統(tǒng)

這個要做一個系統(tǒng)的話會很龐大，你要先設(shè)置一個提綱，然后才能在提綱的范圍內(nèi)進行編碼。你的飯店概念是酒店還是單單吃飯的地方。酒店的話就涉及到每個房間是否入住，入住人員的基本資料等等。飯店的話就只要注明吃飯的臺子是否有人在使用便于安排，金額多少等等。

成都創(chuàng)新互聯(lián)公司服務(wù)項目包括吳起網(wǎng)站建設(shè)、吳起網(wǎng)站制作、吳起網(wǎng)頁制作以及吳起網(wǎng)絡(luò)營銷策劃等。多年來，我們專注于互聯(lián)網(wǎng)行業(yè)，利用自身積累的技術(shù)優(yōu)勢、行業(yè)經(jīng)驗、深度合作伙伴關(guān)系等，向廣大中小型企業(yè)、政府機構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案，吳起網(wǎng)站推廣取得了明顯的社會效益與經(jīng)濟效益。目前，我們服務(wù)的客戶以成都為中心已經(jīng)輻射到吳起省份的部分城市，未來相信會繼續(xù)擴大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任！

vb收銀系統(tǒng)查詢

你主表只需要一張.包含收款日期,金額,收款人,桌臺等...

然后再做幾張表,如桌臺表,操作者表.

這樣你在收款的窗體里,用combo控件.把桌臺和操作者添加進去.可以直接選取幾號桌和誰操作的。

從你的主要功能看.你做一個窗體,用listview顯示所有收款數(shù)據(jù).做一個查詢,可以通過日期,收款人,桌臺等進行查詢.然后顯示在這個litview里面.

你要做歷史帳單查詢,用SQL.比如你要查詢兩個日期之間的帳單,用的SQL語句

sql = "select * form 主表 where收款日期 between 第一個日期 and 最后一個日期"

你可以看一下別人做的一個程序源碼

在這個網(wǎng)站還有很多類似的東西.

VB知識，跪求

VB是VB6還是VB.net

VB6還是很好用的，現(xiàn)在網(wǎng)上VB6的程序還是不少的，尤其是幾個經(jīng)典的源碼分享網(wǎng)站。

超市收銀系統(tǒng)也是網(wǎng)上比較多見的系統(tǒng)，vb Delphi c# vc 的都有，屬于比較常見的

祝好運，望采納。

用什么編程語言開發(fā)pos收銀系統(tǒng)好

一樓說出了實際情況，哪種語言熟悉就用哪種---不過有些例外，寫個POS收銀系統(tǒng)，總不會去選擇C或C++吧，除非你有現(xiàn)成的產(chǎn)品代碼

說到正題--以本人三年相關(guān)的開發(fā)經(jīng)驗，首選C#/VB.net，或者其它高級語言

打個廣告，本人有現(xiàn)成的POS收銀系統(tǒng)及所有源碼，完全版權(quán)（呵呵，這個重點強調(diào)一下）可考慮一下合作啊，基于你的需求我來做后繼開發(fā)?或?把源碼給你，你自己后繼開發(fā)都可以，有意向的話聯(lián)系，

vb與excel結(jié)合寫簡單的收銀系統(tǒng)

其實推薦你用數(shù)據(jù)庫比較好，excel做這種效率低（還是可以做的，但是當(dāng)商品數(shù)量越來越大時就會出現(xiàn)問題，或者當(dāng)你錄入信息時失誤就更可怕了），至于數(shù)據(jù)庫你可以直接用Access，其他也可以，只是用Access可以更快捷的把Excel的數(shù)據(jù)轉(zhuǎn)為數(shù)據(jù)庫。

用Excel代碼有點難

Dim xlApp As Excel.Application '定義EXCEL類

Dim xlBook As Excel.Workbook '定義工件簿類

Dim xlsheet As Excel.Worksheet '定義工作表類

Dim UserDataBase(1 To 2000, 1 To 2) As String

Dim UserNum As Integer

Public OpenType As Boolean

Public SumPrice As Single

Private Sub Command1_Click()

UserNum = 1

ExcelFile = App.Path "\\1.xls"

'定義Excel文件路徑

Dim Price As Single

If Dir(ExcelFile) "" Then

Set xlBook = xlApp.Workbooks.Open(ExcelFile) '打開EXCEL工作簿

Do While xlBook.Sheets(1).Range("C" UserNum) ""

If Text1.Text = xlBook.Sheets(1).Range("C" UserNum) Then

Price = CSng(xlBook.Sheets(1).Range("D" UserNum)) * CSng(Text2.Text)

SumPrice = SumPrice + Price

List1.AddItem "商品名：" xlBook.Sheets(1).Range("B" UserNum) "

數(shù)量：" Text2.Text "

價格：" Price "元"

Exit Do

End If

UserNum = UserNum + 1

Loop

If xlBook.Sheets(1).Range("C" UserNum) = "" Then MsgBox "未找到條形碼為" Text1.Text "的商品"

Else

MsgBox "文件未找到：" ExcelFile

End If

End Sub

Private Sub Command2_Click()

MsgBox "合計：" SumPrice "元"

End Sub

Private Sub Form_Load()

Text2.Text = 1

Command1.Caption = "添加"

Command2.Caption = "合計"

Set xlApp = CreateObject("Excel.Application") '創(chuàng)建EXCEL應(yīng)用類

xlApp.DisplayAlerts = False

List1.Clear

End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

xlApp.Quit '關(guān)閉EXCEL

Set xlApp = Nothing '釋放EXCEL對象

End Sub

這段代碼可以實現(xiàn)你需要的大部分功能了

兩個文本框（1個輸入條形碼，一個輸入數(shù)量），兩個按鈕（一個添加，一個合計），一個列表框（列出商品名，數(shù)量，單價。。。）

不想做刪除物品的，也不想做重復(fù)使用的，需要的話百度hi聯(lián)系

最后廢話一句：excel效率真的很低

用vb.net開發(fā)一個pos收銀系統(tǒng)，要求如下： 課程設(shè)計 ——POS收銀系統(tǒng)

ext1.Text = a

Text2.Text = b

c = Val(Text1.Text) + Val(Text2.Text)

End Sub

我也是剛學(xué)VB，這是我自己做的。不知道能不能幫上你的忙。 隨機數(shù)字（20以內(nèi)）的加法。

本文題目：vb.net收銀系統(tǒng) winform收銀系統(tǒng)
當(dāng)前鏈接：http://m.newbst.com/article8/hihjop.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)頁設(shè)計公司、網(wǎng)站導(dǎo)航、自適應(yīng)網(wǎng)站、網(wǎng)站設(shè)計、微信公眾號、網(wǎng)站維護

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)