Symbianize Forum

Most of our features and services are available only to members, so we encourage you to login or register a new account. Registration is free, fast and simple. You only need to provide a valid email. Being a member you'll gain access to all member forums and features, post a message to ask question or provide answer, and share or find resources related to mobile phones, tablets, computers, game consoles, and multimedia.

All that and more, so what are you waiting for, click the register button and join us now! Ito ang website na ginawa ng pinoy para sa pinoy!

VB.NET Programming Corner!

Re: VB.NET Programming Corner! UPDATED!!!

may layout napo ako sir....ang plano ko po kac sir, gagamit sana aq ng ToolStrip..

tapos ang gusto mangyari, halimbawa pinindot ng user ang button na "Add Vendor" na nasa ToolStrip, ung contents lang ng window sa baba ng toolstrip ang magch-change, d na kailangan ng panibagong form para sa "Add Vendor"... pwd kaya un sir??

para sakin pwede yan. para sakin din ikaw lang ang mahihirapan dyan, mas mahirap imanage ang code kung mag kakasama sa isang form.

nung bago ako ganyan din nasa utak ko kasi yun ang pagkakaintindi ko sa mga nagtuturo sa school na maganda compressed. pero hindi pala. mas maganda ang program kung mas madaling maintindihan ang code at imanage para mas madali din sya iturnover sa ibang programmer.
 
Re: VB.NET Programming Corner! UPDATED!!!

I don't want to sound rude, pero maski yung pamangkin ko 3 yrs old alam na bago mka send ng sms eh may load.

:lol: kasi modem ko globe tattoo at sinundan ko ung thread ni sir eric about sms.. akala ko kasi di na need ng load para maka send ng message from the program to mobile..
 
Re: VB.NET Programming Corner! UPDATED!!!

tama po sir.,.puro po kasi naka tabular chart yung mga nkikita kong tutorial., pwd ko po b gawin pa din sa crystal report un? o san po ba pwd?

pwede po yun kahit yung default lang ng vb.net. instead lang na ibind mo sa datasource yung table mo ilagay mo nlng isa isa sa label.
magdecide ka po muna kung alin gagamitin mo.
 
Re: VB.NET Programming Corner! UPDATED!!!

:lol: kasi modem ko globe tattoo at sinundan ko ung thread ni sir eric about sms.. akala ko kasi di na need ng load para maka send ng message from the program to mobile..

bkt? hindi ba niloloadan ang globe tattoo? well if you don't know yes niloadan yon. and if you try to open that SIM card din yan na pwede gamitin sa phone. or yung nasa PHONE na SIM pwede rin ilipat.

anyway i hope hindi kita na offend nagulat lang ako sa tanong mo. if you have more questions post ka lang dito. i learned serial programming right here kay sir eric and now i built 5 projects para sa office ko using that knowledge so stay put marami ka makukuha dito.
 
Re: VB.NET Programming Corner! UPDATED!!!

bkt? hindi ba niloloadan ang globe tattoo? well if you don't know yes niloadan yon. and if you try to open that SIM card din yan na pwede gamitin sa phone. or yung nasa PHONE na SIM pwede rin ilipat.

anyway i hope hindi kita na offend nagulat lang ako sa tanong mo. if you have more questions post ka lang dito. i learned serial programming right here kay sir eric and now i built 5 projects para sa office ko using that knowledge so stay put marami ka makukuha dito.

offend? di naman sir, open minded naman ako eh. :)

uu nga kelangan pala ng load. ung modem ko kasi walang load eh kaya pala. :lol:

sir, meron ka bang sample sourcecode para sa vb.net? :praise:
 
Re: VB.NET Programming Corner! UPDATED!!!

offend? di naman sir, open minded naman ako eh. :)

uu nga kelangan pala ng load. ung modem ko kasi walang load eh kaya pala. :lol:

sir, meron ka bang sample sourcecode para sa vb.net? :praise:


Code:
    Public Function WriteCommand(ByVal oCommand As String)
        Dim TempStr As String = Nothing
        Dim Reply As New StringBuilder
        Try
            If Sport.IsOpen Then Sport.WriteLine(oCommand & Chr(13))
            Thread.Sleep(200)
            If Sport.IsOpen Then
                Dim xdate As DateTime = Now
                While True
                    TempStr = Sport.ReadExisting.ToLower
                    Reply.Append(TempStr.ToLower.Trim)
                    If TempStr.Contains("ok") Or TempStr.Contains("error") Or DateDiff(DateInterval.Second, xdate, Now) > 10 Then
                        Exit While
                    End If
                End While
            End If
        Catch ex As Exception
            Status = "Port is not responding"
            Thread.Sleep(500)
        End Try
        Return Reply.ToString.Replace(vbCrLf & "ok", "").Trim

    End Function
 
Re: VB.NET Programming Corner! UPDATED!!!

@DoorBreaker,sir eric

What do i need to read for serial programming?
 
Re: VB.NET Programming Corner! UPDATED!!!

@DoorBreaker,sir eric

What do i need to read for serial programming?

ang ginamit ko dyan yung ports namespace


system.io.ports

yun ang "SPort" sa code ko na binigay sa taas.
then yung AT commands nlng kaylangan mo na accepted ng device mo.

apart from that imagination and logic nlng ang kaylangan.
 
Re: VB.NET Programming Corner! UPDATED!!!

pwede po yun kahit yung default lang ng vb.net. instead lang na ibind mo sa datasource yung table mo ilagay mo nlng isa isa sa label.
magdecide ka po muna kung alin gagamitin mo.

panung default? print form po ba un?
 
Re: VB.NET Programming Corner! UPDATED!!!

Here is an ebook for AT commands. although yung ibang commands bka hindi supported ng mga broadband modems like globe tatoo. pero yung basic naman andyan.

yung sa serial port sa msdn nyo nlng tingnan.
 

Attachments

  • GSM%20Developer%20Guide%20-%20GSM%20AT%20Commands%20-%20Rev%20%20A.pdf
    1.2 MB · Views: 17
Re: VB.NET Programming Corner! UPDATED!!!

Code:
    Public Function WriteCommand(ByVal oCommand As String)
        Dim TempStr As String = Nothing
        Dim Reply As New StringBuilder
        Try
            If Sport.IsOpen Then Sport.WriteLine(oCommand & Chr(13))
            Thread.Sleep(200)
            If Sport.IsOpen Then
                Dim xdate As DateTime = Now
                While True
                    TempStr = Sport.ReadExisting.ToLower
                    Reply.Append(TempStr.ToLower.Trim)
                    If TempStr.Contains("ok") Or TempStr.Contains("error") Or DateDiff(DateInterval.Second, xdate, Now) > 10 Then
                        Exit While
                    End If
                End While
            End If
        Catch ex As Exception
            Status = "Port is not responding"
            Thread.Sleep(500)
        End Try
        Return Reply.ToString.Replace(vbCrLf & "ok", "").Trim

    End Function

salamat dito sir.. try ko to. :)
 
Re: VB.NET Programming Corner! UPDATED!!!

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Cursor.Position = New Point(Cursor.Position.X + 17, Cursor.Position.Y + 60)
//THEN PERFORM LEFT CLICK ON THE CURSOR POSITION..

End Sub

Mga sir pa help nmn kung pano po ung mag perform ng left click. thanks.

btw, mag peperform sya ng left click sa form din. :D
 
Last edited:
Re: VB.NET Programming Corner! UPDATED!!!

para sakin pwede yan. para sakin din ikaw lang ang mahihirapan dyan, mas mahirap imanage ang code kung mag kakasama sa isang form.

nung bago ako ganyan din nasa utak ko kasi yun ang pagkakaintindi ko sa mga nagtuturo sa school na maganda compressed. pero hindi pala. mas maganda ang program kung mas madaling maintindihan ang code at imanage para mas madali din sya iturnover sa ibang programmer.

ahhh .... ok lang pla kahit d magkakasama sa isang form ... salamat sa payo boss ...

mei tanung pa sana aq boss, mei log in form kac aq, pano ba ung syntax para makapag search sa database if tama ba ung username at password na na-input ng user??

MS SQL Server 2008 express edition po databse ko ...
 
Last edited:
Re: VB.NET Programming Corner! UPDATED!!!

Report po

rightclick mo yung project mo then add - new item then hanapin mo yung "Report"

natry ko na po yan e.,.di ko xa macustomize..tulad ng lagyan ng picture as banner or header ng ipprint ko.,

at di din nagana pag lalagyan ko ng mga fields na may relational database.,.

panu po ba?
 
Re: VB.NET Programming Corner! UPDATED!!!

mga bosing tanong ko lang sana kung anung controls ang gamit niya d2? sa screen shot attached..
 

Attachments

  • controls.png
    controls.png
    15.9 KB · Views: 8
Re: VB.NET Programming Corner! UPDATED!!!

Private Sub Contact_No_TextBox_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Contact_No_TextBox.KeyPress
If e.KeyChar <> ChrW(Keys.Back) Then
If Char.IsNumber(e.KeyChar) Then

Else
MessageBox.Show("Invalid Input! Numbers Only.", "Error Message", MessageBoxButtons.OK, MessageBoxIcon.Error)
e.Handled = True
End If
End If
End Sub


panu po ba ako mag aallow ng iba pang characters dito? kasi numbers lang ang tinatanggap ng codes na to.,gusto ko po sana iallow din ang "-"


Private Sub Contact_No_TextBox_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Contact_No_TextBox.KeyPress
If e.KeyChar <> ChrW(Keys.Back) Then
If Char.IsLetter(e.KeyChar) Then

Else
MessageBox.Show("Invalid Input!Letters Only.", "Error Message", MessageBoxButtons.OK, MessageBoxIcon.Error)
e.Handled = True
End If
End If
End Sub


dito naman po di pwd ang "SPACE"

suggestion naman po..TIA
 
Re: VB.NET Programming Corner! UPDATED!!!

Private Sub Contact_No_TextBox_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Contact_No_TextBox.KeyPress
If e.KeyChar <> ChrW(Keys.Back) Then
If Char.IsNumber(e.KeyChar) Then

Else
MessageBox.Show("Invalid Input! Numbers Only.", "Error Message", MessageBoxButtons.OK, MessageBoxIcon.Error)
e.Handled = True
End If
End If
End Sub


panu po ba ako mag aallow ng iba pang characters dito? kasi numbers lang ang tinatanggap ng codes na to.,gusto ko po sana iallow din ang "-"


Private Sub Contact_No_TextBox_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Contact_No_TextBox.KeyPress
If e.KeyChar <> ChrW(Keys.Back) Then
If Char.IsLetter(e.KeyChar) Then

Else
MessageBox.Show("Invalid Input!Letters Only.", "Error Message", MessageBoxButtons.OK, MessageBoxIcon.Error)
e.Handled = True
End If
End If
End Sub


dito naman po di pwd ang "SPACE"

suggestion naman po..TIA


Ito tol try mo, accept niya ang "-" at numbers pero di ko nilgyan ng msgbox..

Private Sub txtContact_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles txtContact.KeyPress
If IsNumeric(e.KeyChar()) = True Or Asc(e.KeyChar) = 8 Or Asc(e.KeyChar) = 45 Then
Exit Sub
Else
e.KeyChar = ""
End If
End Sub
 
Re: VB.NET Programming Corner! UPDATED!!!

Private Sub Contact_No_TextBox_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Contact_No_TextBox.KeyPress
If e.KeyChar <> ChrW(Keys.Back) Then
If Char.IsNumber(e.KeyChar) Then

Else
MessageBox.Show("Invalid Input! Numbers Only.", "Error Message", MessageBoxButtons.OK, MessageBoxIcon.Error)
e.Handled = True
End If
End If
End Sub


panu po ba ako mag aallow ng iba pang characters dito? kasi numbers lang ang tinatanggap ng codes na to.,gusto ko po sana iallow din ang "-"


Private Sub Contact_No_TextBox_keypress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles Contact_No_TextBox.KeyPress
If e.KeyChar <> ChrW(Keys.Back) Then
If Char.IsLetter(e.KeyChar) Then

Else
MessageBox.Show("Invalid Input!Letters Only.", "Error Message", MessageBoxButtons.OK, MessageBoxIcon.Error)
e.Handled = True
End If
End If
End Sub


dito naman po di pwd ang "SPACE"

suggestion naman po..TIA

sir ask ko lng kung isasave mo yan sa database? kung isasave mo naman eh naka parameters ka? kasi kung hindi Prone yan sa SQL INJECTION...
--'DROP TABLE:slap::slap:
patay ka...:clap::clap:
 
Re: VB.NET Programming Corner! UPDATED!!!

patulong naman po sa mysql query ko.attendance system po kasi thesis ko.problema ko po kung pano madedetermine na nakaabsent na yung estudyante ng 3 consecutive dates.pano po yung query kapag sa date po?salamat po..
 
Back
Top Bottom