Click here to Skip to main content
15,867,568 members
Home / Discussions / Visual Basic
   

Visual Basic

 
SuggestionRe: DataView Sort Pin
Richard Deeming17-Sep-20 21:36
mveRichard Deeming17-Sep-20 21:36 
GeneralRe: DataView Sort Pin
jkirkerx18-Sep-20 7:56
professionaljkirkerx18-Sep-20 7:56 
GeneralRe: DataView Sort Pin
jkirkerx18-Sep-20 8:00
professionaljkirkerx18-Sep-20 8:00 
GeneralRe: DataView Sort Pin
Gerry Schmitz18-Sep-20 8:10
mveGerry Schmitz18-Sep-20 8:10 
GeneralRe: DataView Sort Pin
Richard Deeming20-Sep-20 23:38
mveRichard Deeming20-Sep-20 23:38 
GeneralRe: DataView Sort Pin
jkirkerx21-Sep-20 6:07
professionaljkirkerx21-Sep-20 6:07 
QuestionRun multiple SSH commands without disconnecting Pin
droidman16-Sep-20 1:56
droidman16-Sep-20 1:56 
Questioni have tried the code above . it works fine. but it only shows the breakdown of the costs. i want the label to show the total cost as well. what more should i add to the code?? please help</pre> Pin
Rikansha kumar10-Sep-20 22:10
Rikansha kumar10-Sep-20 22:10 
Private Sub btnTotalCost_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnTotalCost.Click

        lblTotalCost.Text = "YOU HAVE ORDERED:" & vbNewLine

        lblTotalCost.Text = lblTotalCost.Text & "ROOM TYPE" & vbNewLine & "--------" & vbNewLine

        If radLuxury.Checked Then
            lblTotalCost.Text = lblTotalCost.Text & "Luxury = $210" & vbNewLine
        ElseIf radSuperior.Checked Then
            lblTotalCost.Text = lblTotalCost.Text & "Superior = $150" & vbNewLine
        Else
            lblTotalCost.Text = lblTotalCost.Text & "Standard = $110" & vbNewLine
        End If

        lblTotalCost.Text = lblTotalCost.Text & vbNewLine & "MEAL OPTIONS" & vbNewLine & "--------" & vbNewLine

        If chkBufferBreakfast.Checked Then
            lblTotalCost.Text = lblTotalCost.Text & "Buffer Breakfast = $40" & vbNewLine
        End If
        If chkBufferDinner.Checked Then
            lblTotalCost.Text = lblTotalCost.Text & "Buffer Dinner = $60" & vbNewLine
        End If

        lblTotalCost.Text = lblTotalCost.Text & vbNewLine & "AMENITIES" & vbNewLine & "--------" & vbNewLine

        If chkInternet.Checked Then
            lblTotalCost.Text = lblTotalCost.Text & "Internet = $10" & vbNewLine
        End If
        If chkEntertainment.Checked Then
            lblTotalCost.Text = lblTotalCost.Text & "Entertainment = $20" & vbNewLine
        End If
        If chkSpaServices.Checked Then
            lblTotalCost.Text = lblTotalCost.Text & "Spa Services = $50" & vbNewLine
        End If



        
    End Sub

Rant[REPOST]: i have tried the code above . it works fine. but it only shows the breakdown of the costs. i want the label to show the total cost as well. what more should i add to the code?? please help</pre> Pin
Richard Deeming10-Sep-20 22:22
mveRichard Deeming10-Sep-20 22:22 
QuestionVB6 Pin
Devam Dani28-Aug-20 16:26
Devam Dani28-Aug-20 16:26 
AnswerRe: VB6 Pin
Dave Kreskowiak28-Aug-20 18:49
mveDave Kreskowiak28-Aug-20 18:49 
AnswerRe: VB6 Pin
CHill607-Sep-20 4:18
mveCHill607-Sep-20 4:18 
AnswerRe: VB6 Pin
Eddy Vluggen8-Sep-20 10:42
professionalEddy Vluggen8-Sep-20 10:42 
GeneralRe: VB6 Pin
CHill609-Sep-20 22:57
mveCHill609-Sep-20 22:57 
GeneralRe: VB6 Pin
Eddy Vluggen10-Sep-20 12:41
professionalEddy Vluggen10-Sep-20 12:41 
QuestionWhy Data Visualization is important? Pin
Member 1492367226-Aug-20 7:54
Member 1492367226-Aug-20 7:54 
AnswerRe: Why Data Visualization is important? Pin
Dave Kreskowiak26-Aug-20 10:51
mveDave Kreskowiak26-Aug-20 10:51 
QuestionLoop DataTable per assegnare valori alle rows non ci riesco Pin
Fabrizio Leoncini21-Aug-20 0:33
Fabrizio Leoncini21-Aug-20 0:33 
AnswerRe: Loop DataTable per assegnare valori alle rows non ci riesco Pin
Dave Kreskowiak21-Aug-20 6:28
mveDave Kreskowiak21-Aug-20 6:28 
GeneralRe: Loop DataTable per assegnare valori alle rows non ci riesco Pin
Fabrizio Leoncini21-Aug-20 21:31
Fabrizio Leoncini21-Aug-20 21:31 
GeneralRe: Loop DataTable per assegnare valori alle rows non ci riesco Pin
Eddy Vluggen22-Aug-20 10:01
professionalEddy Vluggen22-Aug-20 10:01 
GeneralRe: Loop DataTable per assegnare valori alle rows non ci riesco Pin
CHill6025-Aug-20 2:17
mveCHill6025-Aug-20 2:17 
GeneralRe: Loop DataTable per assegnare valori alle rows non ci riesco Pin
Eddy Vluggen25-Aug-20 15:19
professionalEddy Vluggen25-Aug-20 15:19 
QuestionExcel vba creating a timer through doevents Pin
Mat 25720-Aug-20 3:42
Mat 25720-Aug-20 3:42 
AnswerRe: Excel vba creating a timer through doevents Pin
Dave Kreskowiak20-Aug-20 4:31
mveDave Kreskowiak20-Aug-20 4:31 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.