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!

dapat meron kang common fields sa dalawa or maski sampung tables
for example may table kang StudentFile, meron dun StudentID at ibang details gaya ng name, bday, etc
tapos meron kang table na StudentEnrollMent, nandun ang student id, at details ng babayran
common field yung StudentID so pwede mo makuha yung tuition details at names


INNER JOIN sa SQL ang gagamitin mo dyan
read all about it


sir eto po code ko pa check namn po salamat.

#Region "FillListView"
Sub FillListview()
LV.Items.Clear()
myqry = "SELECT AccResult.StudNo,Exercises.ID from AccResult INNER JOIN Exercises ON AccResult.StudNo = Exercises.StudNo ORDER BY AccResult.FirstName,AccResult.YrandSec Asc;"
mycmd = New OleDbCommand(myqry, con)
con.Open()
mydr = mycmd.ExecuteReader
While mydr.Read
With LV
.Items.Add(mydr("StudNo"))
With .Items(.Items.Count - 1).SubItems
.Add(mydr("CNumber"))
.Add(mydr("FirstName"))
.Add(mydr("LastName"))
.Add(mydr("YrandSec"))
.Add(mydr("Exer1"))
.Add(mydr("Exer2"))
.Add(mydr("Exer3"))
.Add(mydr("Exer4"))
.Add(mydr("Exer5"))
End With
End With
End While
con.Close()
End Sub
#End Region


AccResult is the name of my first table and Exercises is the second. my PK for AccResult is StudNo and for Exercises is ID. how can i join this two table to display in ListView.

[AccResult Table] StudNo (PK) CNumber FirstName LastName YrandSec

[Exercises Table] ID (PK) StudNo Exer1 Exer2 Exer3 Exer4 Exer5
 
Last edited:
..Sir Eric! Ask ko lang po kung anu gagawin dito .. Eto po lumalabas..
View attachment 879968

di ka pwede mag connect using Trusted Connection sa ibang computer unless naka domain ka or active directory
trusted connection means kilala ka ng kabilang computer

use sql authentication instead
dun ka mag login sa user at password na naka setup sa sqlserver

ayusin mo ang connection string mo to use sql authentication

- - - Updated - - -

Panu ko po cila icoconect? pwde ko po ba ito gawin sa peer to peer connection po? SQL Connection po sana gagamitin ko hnd odbc..Hnd ko lang po alam kung panu ko itetest yung client sever using sqlconnection po..

pwede naman peer to peer network, sabi ko nga nasa connection string lang yan e
tignan mo connectionstring mo, diba nadyan yung computer name kung saan nakalagay ang sqlserver?

try mo explore

open din firewall dapat para sa sqlserver, tapos sa config ng sqlserver dapat enabled ang tcp/ip
tapos naka enabled at naka run ang sqlserver browser sa services

- - - Updated - - -

sir eto po code ko pa check namn po salamat.

#Region "FillListView"
Sub FillListview()
LV.Items.Clear()
myqry = "SELECT AccResult.StudNo,Exercises.ID from AccResult INNER JOIN Exercises ON AccResult.StudNo = Exercises.ID ORDER BY AccResult.FirstName,AccResult.YrandSec Asc;"
mycmd = New OleDbCommand(myqry, con)
con.Open()
mydr = mycmd.ExecuteReader
While mydr.Read
With LV
.Items.Add(mydr("StudNo"))
With .Items(.Items.Count - 1).SubItems
.Add(mydr("CNumber"))
.Add(mydr("FirstName"))
.Add(mydr("LastName"))
.Add(mydr("YrandSec"))
.Add(mydr("Exer1"))
.Add(mydr("Exer2"))
.Add(mydr("Exer3"))
.Add(mydr("Exer4"))
.Add(mydr("Exer5"))
End With
End With
End While
con.Close()
End Sub
#End Region


AccResult is the name of my first table and Exercises is the second. my PK for AccResult is StudNo and for Exercises is ID. how can i join this two table to display in ListView.

[AccResult Table] StudNo (PK) CNumber FirstName LastName YrandSec

[Exercises Table] ID (PK) StudNo Exer1 Exer2 Exer3 Exer4 Exer5


ano gusto mo i join? yung result ng exams student file?
common sa kanila yung student number diba?
so bakit student no at id ng kung ano yung naka join?

explain kung ano gusto mo lumabas saka sample data pakita mo rin at sample output
 
pano mag best thesis yan, connectionstring mo naka hardcode
sql query mo ang hirap basahin
yung datagridview mo naka numbers ang columns, mag singit ako ng column dyan di na gagana

try mo gawin mas readable ang code mo

xnxa sir eric..yan ksi ang turo sa amin sa school eh..kng ibahin q bka mg tanong cla mg defend kme..hehehe!
pti nga ako nhirapan eh..
ang problema q lng tlga d2 pnu plabasin ung data sa database gmit ang label..grr!..ang hirap
btw sir thank you tlga ha:thumbsup:
 
sir ganito po sana magigigng output

View attachment 879994

myqry = "SELECT AccResult.StudNo,Exercises.ID from AccResult INNER JOIN Exercises ON AccResult.StudNo = Exercises.ID ORDER BY AccResult.FirstName,AccResult.YrandSec Asc;"

nabago ko na sir ung sa AccResult.StudNo = Exercises.StudNo
dapat sir lalabas lang sa listview is
StudNo, Cnumber, FirstName, LastName, YrandSec,Exer1,Exer2,Exer3,Exer4,Exer5

yaan sir salamat po
 
xnxa sir eric..yan ksi ang turo sa amin sa school eh..kng ibahin q bka mg tanong cla mg defend kme..hehehe!
pti nga ako nhirapan eh..
ang problema q lng tlga d2 pnu plabasin ung data sa database gmit ang label..grr!..ang hirap
btw sir thank you tlga ha:thumbsup:

ayaw ko basahin mga code na ganyan kagulo e, para kang nag share ng sakit ng ulo

thats why i always encourage clarity ng code

- - - Updated - - -

sir ganito po sana magigigng output

View attachment 879994

myqry = "SELECT AccResult.StudNo,Exercises.ID from AccResult INNER JOIN Exercises ON AccResult.StudNo = Exercises.ID ORDER BY AccResult.FirstName,AccResult.YrandSec Asc;"

nabago ko na sir ung sa AccResult.StudNo = Exercises.StudNo
dapat sir lalabas lang sa listview is
StudNo, Cnumber, FirstName, LastName, YrandSec,Exer1,Exer2,Exer3,Exer4,Exer5

yaan sir salamat po

pwede mo naman kasi i test yung query mo sa query builder ng access
drag n drop naman yun at makikita mo na yung sql statement
at pwede mo na i paste sa code mo kapag ok na yung data na lumabas
 
sir eric paano po code dto

EXAMPLE
asdfgh
asdfg
asdf
asd
as
a

sa listbox po yan :help:

magandang exercise yan para sa mga nag uumpisa, para matuto kayo mag isip. try mo muna i code maski yung flow lang
 
magandang exercise yan para sa mga nag uumpisa, para matuto kayo mag isip. try mo muna i code maski yung flow lang

sir eric ito ba sinasabi nyo

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
For n = 1 To Int(TextBox2.Text)
ListBox1.Items.Add(TextBox1.Text)
Next
 
sir eric ito ba sinasabi nyo

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
For n = 1 To Int(TextBox2.Text)
ListBox1.Items.Add(TextBox1.Text)
Next

dimo ba pinatakbo? bakit di mo alam?
parepareho lang labas sa listview mo dyan

try mo ulit
 
explain mo na mabuti gusto mo gawin, step by step

step1: maglalagay ako ng kahit anong text sa textbox1
step2: sa textbox2 nman ay maglalagay ako ng number kung ilang row sa listbox ang madidisplay nya
step3: then pagkatapos pipindutin ko na ang add button pra madisplay na ang mga text sa listbox

so dapat ganito ung output
EXAMPLE
text = "asdfgh" row= "5"

asdfgh
asdfg
asdf
asd
as
a
 
Mga boss, pa help naman po....

Paano po ilagay ang .exe program(supporting netframework 3.5 version) in a certain project in vb.net?

Maraming Salamat po.
 
step1: maglalagay ako ng kahit anong text sa textbox1
step2: sa textbox2 nman ay maglalagay ako ng number kung ilang row sa listbox ang madidisplay nya
step3: then pagkatapos pipindutin ko na ang add button pra madisplay na ang mga text sa listbox

so dapat ganito ung output
EXAMPLE
text = "asdfgh" row= "5"

asdfgh
asdfg
asdf
asd
as
a

so meron kang loop na n, base sa input sa textbox
alam mo na mag add ng item sa listview, so ok na yan
ang kulang nalang ay basic string manipulation gaya ng
Substring
at konting math

ang substring kukuha ng string umpisa sa gusto mo at kung gaano kahaba
so try mo aralin ang substring, baka sakaling makatulong sayo
http://www.dotnetperls.com/substring-vbnet
 
Gud Day Sir Eric, pa help sana ako about DataTable.

meron akong datatable from database ang result ay

Code:
Gasoline Expenses 3000
Mortuary Assitant 15000
Registration 1000

pero ang gusto ko sana gawin pagdating sa datagridview ang pag display ang ganito.

Code:
Gasoline Expenses      Mortuary Assitant          Registration - Column
3000                         15000                          1000 - rows

posible ba yan sir?
 
Last edited:
Gud Day Sir Eric, pa help sana ako about DataTable.

meron akong datatable from database ang result ay

Code:
Gasoline Expenses 3000
Mortuary Assitant 15000
Registration 1000

pero ang gusto ko sana gawin pagdating sa datagridview ang pag display ang ganito.

Code:
Gasoline Expenses      Mortuary Assitant          Registration - Column
3000                         15000                          1000 - rows

posible ba yan sir?

aralin mo PIVOT
 
HI sir!..hehe!

ask sana ako if panu mg palabas nang data through LISTVIEW gamit ung OLEDB at kng e click mo xa lalabas xa sa txtbox pra ma update

thnx poh:help::help:
 
View attachment 154423
master @ericgmejia paano po yang gawin nag search search na ako hirap kasi.
change color for every combobox item
ito po yung condition ko
if combobox1.text = "Allow" then
combobox1.forecolor = color.black
else
combobox1.forecolor = color.red

ayaw gumana nyan e. help naman sir

tnx :D
 

Attachments

  • rYGJI.png
    rYGJI.png
    9.9 KB · Views: 5
Last edited:
View attachment 880631
master @ericgmejia paano po yang gawin nag search search na ako hirap kasi.
change color for every combobox item
ito po yung condition ko
if combobox1.text = "Allow" then
combobox1.forecolor = color.black
else
combobox1.forecolor = color.red

ayaw gumana nyan e. help naman sir

tnx :D

parang gumagana naman based sa screenshot mo. ang condition mo eh pag hindi "Allow" red color. tama naman ah
 
Back
Top Bottom