dennis_ian
New member
- Joined
- Dec 8, 2011
- Messages
- 4
- Programming Experience
- Beginner
Hi good morning.(=
I just recently learned vb and with the help of reading different tutorials, i was able to create my first vb db which i would like to use at our office. Its a counter transaction ticketing system. Finding my way through the different code, i was able to came up with these one.
Public Class Form1
Dim iTicket As Integer
Function getTicket()
iTicket = iTicket + 1
getTicket = iTicket
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
buttonOnClick()
MsgBox("Please proceed at Counter 17.Your ticket is number " & getTicket())
MsgBox("Print your number?")
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
iTicket = 0
End Sub
Private Sub buttonOnClick()
End Sub
But the thing is, even if i google the steps on how to print and even ask other friend how to do it, iam having a hard time making code for printing. Would it be to much if i ask you friends to give me an idea or a sample what code should i put for me to able to finish this project? Ive been with this printing thing for almost a month now and i really wanna finish this project.
Thank you so much in advance.
I just recently learned vb and with the help of reading different tutorials, i was able to create my first vb db which i would like to use at our office. Its a counter transaction ticketing system. Finding my way through the different code, i was able to came up with these one.
Public Class Form1
Dim iTicket As Integer
Function getTicket()
iTicket = iTicket + 1
getTicket = iTicket
End Function
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
buttonOnClick()
MsgBox("Please proceed at Counter 17.Your ticket is number " & getTicket())
MsgBox("Print your number?")
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
iTicket = 0
End Sub
Private Sub buttonOnClick()
End Sub
But the thing is, even if i google the steps on how to print and even ask other friend how to do it, iam having a hard time making code for printing. Would it be to much if i ask you friends to give me an idea or a sample what code should i put for me to able to finish this project? Ive been with this printing thing for almost a month now and i really wanna finish this project.
