Developer technologies | VB
An object-oriented programming language developed by Microsoft that can be used in .NET.
Done! I Did It. Thank You.
Progressbar with Percentage Problem
![](data:image/svg+xml, %3Csvg xmlns='http://www.w3.org/2000/svg' height='64' class='font-weight-bold' style='font: 600 30.11764705882353px "SegoeUI", Arial' width='64'%3E%3Ccircle fill='hsl(51.2, 53%, 14%)' cx='32' cy='32' r='32' /%3E%3Ctext x='50%25' y='55%25' dominant-baseline='middle' text-anchor='middle' fill='%23FFF' %3EMS%3C/text%3E%3C/svg%3E)
Michele Signo
1
Reputation point
I downloaded a file from this post https://social.msdn.microsoft.com/Forums/vstudio/en-US/5d3eee65-730b-488f-a858-a341b8d61714/progressbar-with-percentage-label?forum=vbgeneral at the bottom of the page the link for RmCustProgressBar1 but I have problems.
I am new in this field and I find myself in difficulty, I have already looked for two days on the internet and I have not found anything or at least that is understandable within my reach. I downloaded a file for a new ProgressBar in 3d, but I no longer have the option of [Step] and [PerformStep], how can I add these two properties? Please help me, I've been running after it for days....
Developer technologies | VB
-
LesHay 7,146 Reputation points2022-09-25T19:24:38.637+00:00 Hi
What is the problem?
Do you want to have a ProgressBar that reflects the percentage of some operation? or, do you have some other ProgressBar 3D?
Are you aware of how to use a standard ProgressBar? Certainly the one in your link is very straightforward - do you have a problem trying it out? If so, what problem? -
Michele Signo 1 Reputation point
2022-09-25T23:10:29.957+00:00 Public Sub righeNere()
Dim row_count As Integer = DataGridView1.Rows.Count
RmCustProgressBar1.MaxValue = row_count
RmCustProgressBar1.Step = 1
Dim currencyManager1 As CurrencyManager = CType(DataGridView1.BindingContext(DataGridView1.DataSource), CurrencyManager)
For Each rw As DataGridViewRow In DataGridView1.Rows
If rw.Cells(2).Style.BackColor = Color.Gold Or rw.Cells(3).Style.BackColor = Color.Gold Or rw.Cells(4).Style.BackColor = Color.Gold Or rw.Cells(5).Style.BackColor = Color.Gold Or rw.Cells(6).Style.BackColor = Color.Gold Or rw.Cells(7).Style.BackColor = Color.Gold Then
rw.Visible = True
Continue For
ElseIf rw.Cells(2).Style.BackColor = Color.White Or rw.Cells(3).Style.BackColor = Color.White Or rw.Cells(4).Style.BackColor = Color.White Or rw.Cells(5).Style.BackColor = Color.White Or rw.Cells(6).Style.BackColor = Color.White Or rw.Cells(7).Style.BackColor = Color.White Then
currencyManager1.SuspendBinding()
rw.Visible = False
currencyManager1.ResumeBinding()
RmCustProgressBar1.PerformStep()
End If
Next
End SubI would like to see the percentage advance in the ProgressBar while BackGroundWorker does the work, here is the code:
Sign in to comment