Click here to Skip to main content
15,797,330 members
Home / Discussions / Visual Basic
   

Visual Basic

 
GeneralRe: listbox mass edit Pin
Dave Kreskowiak11-Jun-23 5:52
mveDave Kreskowiak11-Jun-23 5:52 
GeneralRe: listbox mass edit Pin
Member Alienoiz11-Jun-23 6:02
Member Alienoiz11-Jun-23 6:02 
GeneralRe: listbox mass edit Pin
Member Alienoiz10-Jun-23 10:53
Member Alienoiz10-Jun-23 10:53 
GeneralRe: listbox mass edit Pin
Ralf Meier10-Jun-23 11:52
professionalRalf Meier10-Jun-23 11:52 
GeneralRe: listbox mass edit Pin
Richard MacCutchan10-Jun-23 22:23
mveRichard MacCutchan10-Jun-23 22:23 
AnswerRe: listbox mass edit Pin
Richard MacCutchan10-Jun-23 22:11
mveRichard MacCutchan10-Jun-23 22:11 
AnswerRe: listbox mass edit Pin
Andre Oosthuizen13-Jun-23 0:59
mveAndre Oosthuizen13-Jun-23 0:59 
GeneralRe: listbox mass edit Pin
Member Alienoiz13-Jun-23 2:03
Member Alienoiz13-Jun-23 2:03 
@Andre Hi..thanks..im still not alble to make the listbox mass edit..i must use the myMp3.Write() in each condition statement so tthat it writes only the selected tags one by one...
This is what im trying
VB
<pre>Dim fils = ListBox1.SelectedItems
                For Each item In fils

                    If CheckBox1.Checked = True Then
                        myMp3.ID3v2Tag.Title = TextBox1.Text
                        myMp3.Write()
                    End If

                    If CheckBox2.Checked = True Then
                        myMp3.ID3v2Tag.Artist = TextBox2.Text
                        myMp3.Write()
                    End If


                    If CheckBox3.Checked = True Then
                        myMp3.ID3v2Tag.Album = TextBox3.Text
                        myMp3.Write()
                    End If


                    If CheckBox4.Checked = True And TextBox4.Text <> "" Then
                        On Error Resume Next
                        myMp3.ID3v2Tag.Year = Short.Parse(TextBox4.Text)
                        myMp3.Write()

                    End If
                    If CheckBox5.Checked = True And TextBox5.Text <> "" Then
                        On Error Resume Next
                        myMp3.ID3v2Tag.TrackNum = Short.Parse(TextBox5.Text)
                        myMp3.Write()

                    End If
                    If CheckBox6.Checked = True Then
                        myMp3.ID3v2Tag.Comments = TextBox6.Text
                        myMp3.Write()
                    End If

                    If CheckBox7.Checked = True Then
                        If ComboBox1.Text = "01 - User" Then
                            myMp3.ID3v2Tag.Genre = TextBox7.Text
                            myMp3.Write()
                        Else
                            myMp3.ID3v2Tag.Genre = ComboBox1.Text
                            myMp3.Write()
                        End If

                    End If
                Next


i also tried:
VB
<pre>Dim fils = ListBox1.SelectedItems
                For Each item In fils

                    myMp3.Read(FolderBrowserDialog1.SelectedPath & "\" & ListBox1.SelectedItem)


                    If CheckBox1.Checked = True Then
                        myMp3.ID3v2Tag.Title = TextBox1.Text
                        myMp3.Write()
                    End If

                    If CheckBox2.Checked = True Then
                        myMp3.ID3v2Tag.Artist = TextBox2.Text
                        myMp3.Write()
                    End If


                    If CheckBox3.Checked = True Then
                        myMp3.ID3v2Tag.Album = TextBox3.Text
                        myMp3.Write()
                    End If


                    If CheckBox4.Checked = True And TextBox4.Text <> "" Then
                        On Error Resume Next
                        myMp3.ID3v2Tag.Year = Short.Parse(TextBox4.Text)
                        myMp3.Write()

                    End If
                    If CheckBox5.Checked = True And TextBox5.Text <> "" Then
                        On Error Resume Next
                        myMp3.ID3v2Tag.TrackNum = Short.Parse(TextBox5.Text)
                        myMp3.Write()

                    End If
                    If CheckBox6.Checked = True Then
                        myMp3.ID3v2Tag.Comments = TextBox6.Text
                        myMp3.Write()
                    End If

                    If CheckBox7.Checked = True Then
                        If ComboBox1.Text = "01 - User" Then
                            myMp3.ID3v2Tag.Genre = TextBox7.Text
                            myMp3.Write()
                        Else
                            myMp3.ID3v2Tag.Genre = ComboBox1.Text
                            myMp3.Write()
                        End If

                    End If
                Next

GeneralRe: listbox mass edit Pin
Andre Oosthuizen13-Jun-23 3:43
mveAndre Oosthuizen13-Jun-23 3:43 
GeneralRe: listbox mass edit Pin
Member Alienoiz13-Jun-23 23:44
Member Alienoiz13-Jun-23 23:44 
GeneralRe: listbox mass edit Pin
Ralf Meier14-Jun-23 2:37
professionalRalf Meier14-Jun-23 2:37 
GeneralRe: listbox mass edit Pin
Member Alienoiz14-Jun-23 3:23
Member Alienoiz14-Jun-23 3:23 
GeneralRe: listbox mass edit Pin
Ralf Meier14-Jun-23 3:35
professionalRalf Meier14-Jun-23 3:35 
GeneralRe: listbox mass edit Pin
Member Alienoiz14-Jun-23 3:38
Member Alienoiz14-Jun-23 3:38 
GeneralRe: listbox mass edit Pin
Ralf Meier14-Jun-23 7:34
professionalRalf Meier14-Jun-23 7:34 
GeneralRe: listbox mass edit Pin
Andre Oosthuizen14-Jun-23 6:02
mveAndre Oosthuizen14-Jun-23 6:02 
GeneralRe: listbox mass edit Pin
Richard MacCutchan14-Jun-23 6:15
mveRichard MacCutchan14-Jun-23 6:15 
GeneralRe: listbox mass edit Pin
Ralf Meier14-Jun-23 7:31
professionalRalf Meier14-Jun-23 7:31 
GeneralRe: listbox mass edit Pin
Richard MacCutchan14-Jun-23 7:37
mveRichard MacCutchan14-Jun-23 7:37 
GeneralRe: listbox mass edit Pin
Member Alienoiz14-Jun-23 9:18
Member Alienoiz14-Jun-23 9:18 
GeneralRe: listbox mass edit Pin
OriginalGriff14-Jun-23 9:21
mvaOriginalGriff14-Jun-23 9:21 
GeneralRe: listbox mass edit Pin
Member Alienoiz14-Jun-23 9:38
Member Alienoiz14-Jun-23 9:38 
GeneralRe: listbox mass edit Pin
Ralf Meier14-Jun-23 8:46
professionalRalf Meier14-Jun-23 8:46 
GeneralRe: listbox mass edit Pin
Member Alienoiz14-Jun-23 9:40
Member Alienoiz14-Jun-23 9:40 
GeneralRe: listbox mass edit Pin
Ralf Meier14-Jun-23 10:01
professionalRalf Meier14-Jun-23 10:01 

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.