Stop User Moving The Chart Around In MsChart
VB6 SP6
I am using MsChart. I need to allow selections but when this is set to True users can click on the chart and move the plot area around the unplotted area.
Anybody know a way to avoid this
Thanks
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
MSChart - Possible To Drag Out A Box Over Chart && Return X-y Start/stop Values?
Hi. I'm working w/ MSChart in an app that plots x-y data columns as a scatterplot. I want to be able to drag out a box over the plot area and return the drag start and stop values so I can zoom in on the highlighted area. I've already got all the zoom code working (by manually entering values into 4 textboxes) but this way would be more elegant. Any way to do this?
Also, 2 other questions (low priority)......
1.) anybody know how to get rid of the border that goes right from the top of the y-axis to the border the extends vertically from the right edge of the x-axis? I'm talking about the inner border here, not the outer one.
2.) i'm setting a variable to hold the max x-axis value from the plot so the user can't specify a value beyond it. However sometimes this value (randomly) gets replaced w/ the default value of 100 (which I have turned off!). I think this is a random MS bug but am not positive.
Thank you for any suggestions.
Prevent User From Moving Chart
I'm using MSchart in an application.
In the application I allow the user to select points on the chart. So I have to allow selections in the chart property window.
However if a user clicks on the chart, holds the button down, the user can drag the chart around inside the chart window.
And once the user has done that, he/she can now use the right mouse button and resize the chart itself.
I want to be able to allow the user to only select points on the chart. Nothing else.
Any help would be greatly appreciated.
Thanks
MSChart (XY-chart)
Does someone have a code sample for a XY (scatter) chart with custom labels for each data point?
My e-mail address is vdmg@yahoo.com
MSChart Pie Chart
Is there anybody out there familiar enough with the MSChart control to help me create a pie chart with it? I have made a little progress by setting the chart type to a 2D pie and using the following code:
Code:Private Sub Form_Load()
Dim arr(1 To 6) As Double
arr(1) = 0.2
arr(2) = 0.3
arr(3) = 0.1
arr(4) = 0.1
arr(5) = 0.2
arr(6) = 0.1
MSChart1.ChartData = arr
End Sub
I am having troubles with the chart series and labels and such. How do I change a series label from C1 to something else? Whats up with the R1 label? Any help is appreciated.
Overspecialize and you breed in weakness.
Stop Txt Moving
can any1 tell me how u stop txt that is in side a pic box moving ever thing u click in the box
Horizontal Bar Chart With MSChart
Please could somebody tell me if (and how) it is possible to produce a horizontal bar chart using VB6 - I have tried the MSChart control but can only get a vertical bar chart.
My aim is to show the groups on the y axis (e.g. months) and the values extending horizontally on the x axis (e.g. number of sales)
Thanks in advance
Stop A Chart Plotting 0 Values
I am having a problem with excel at the moment. I have a data table with all sorts of data in it. On another sheet I have a data table that is populated using lookups from the previously mentioned. There is also a graph on this sheet based on the table of lookups.
The problem is, the lookups are returning 0 for blank cells!
Does anyone know how I can get round this? I tried having the formula return "" if the value was 0, but it still plotted it as 0, even tho I've got "Plot blank cells" turned off in options.
Pic Box, Object To Stop Moving
what im trying to do is make it so that i have one bit picture box and a pong design interface inside it(this is a final assignment im making a variation of pong) anywho what im trying to do(and tryed everything i've thought of) is to get it so that when you drag the padel down it cannot pass the line at the top or the bottom, and both these lines are drawn, not made at runtime. thanks for help
also after you hit the line you cannot go down or up further then the line, and you can continue moving inside the two lines
Trying To Stop A Form Moving
hi, i am making a program that has docking forms onto the main mdi form. I am trying to make it so that the forms can be docked and undocked. I have so far made a timer that keeps a form in its position all the time but when the user tries to drag the form it flashes and such and then returns to the position wheras i don't want it to move at all, is there any way i can subclass it to stop it moving?
MSChart - Adding Numbers To Chart
Hi,
I'm fairly new to using MSChart. I have developed a chart which works ok but I want to know if it's possible to add the numbers to the chart.
eg. If I have a pie chart, and it's representing 3 different pieces of data (50, 20,5) but when the chart appears these numbers are not shown on the chart. And its not possible to tell the exact numbers been represented.
Is there a function to add these numbers to the chart?
Thanks in Advance
Second Y-Axis On 2D XY Scatter Chart With MSChart
Hi, I am stuck with a problem in MSChart and need urgent help! I need to put a second Y axis to a 2D XY Scatter Chart with VB6. I can put a secondary Y axis to other charttype such as 2D Line/Bar, but I can't make it on a 2D XY chart with all possible way I can think of . Is it possible to do so? I apprieciate any suggestions! Thanks in advance!
My code is:
If booY2 Then
With .Plot.Axis(VtChAxisIdY2)
.AxisTitle.Text = Queries.cmbY2Axis.Text & " " & strY2Unit
.AxisTitle.Visible = True
.AxisTitle.VtFont.style = VtFontStyleBold
.AxisTitle.VtFont.VtColor.Set 0, 0, 255
.AxisTitle.VtFont.Size = 12
.ValueScale.Auto = True
End With
With .Plot.SeriesCollection(3)
.SecondaryAxis = True
.LegendText = Queries.cmbY2Axis.Text
With .Pen.VtColor
.Blue = 255
.Green = 0
.Red = 0
End With
End With
End If
MSchart Secondary Axis In XY Chart
All I want to do is to display in a XY Mschart the secondary Y axis and bind some series to it. here is the code.
Private Sub Command2_Click()
Dim a(1 To 365, 1 To 4) As Integer
Dim i As Integer
For i = 1 To 365
a(i, 1) = i
a(i, 2) = 80
a(i, 3) = i
a(i, 4) = 50
Next i
MSChart1.ToDefaults
With MSChart1
.chartType = VtChChartType2dXY
.ChartData = a
.ShowLegend = True
.Plot.UniformAxis = False
.Plot.Axis(VtChAxisIdX).ValueScale.Auto = False
.Plot.Axis(VtChAxisIdX).ValueScale.MajorDivision = 13
.Plot.Axis(VtChAxisIdX).ValueScale.Maximum = 390
.Plot.Axis(VtChAxisIdX).ValueScale.Minimum = 0
'.Plot.SeriesCollection(1).SecondaryAxis = True
.Plot.Axis(VtChAxisIdY).ValueScale.Auto = False
.Plot.Axis(VtChAxisIdY).ValueScale.MajorDivision = 10
.Plot.Axis(VtChAxisIdY).ValueScale.Maximum = 100
.Plot.Axis(VtChAxisIdY).ValueScale.Minimum = 0
.ColumnLabel = " apsou"
End With
End Sub
It displays 2 series. I want to display the 2nd Y axis and the 2nd serie to be binded into 2nd axis. Please help.
'.Plot.SeriesCollection(1).SecondaryAxis = True
also what this does?
MsChart: Line Chart Problem
I am producing a series of line charts. The problem arises where there is a missing value (or a value outside the min/max value range). In this case the line jumps the the bottom or top of the chart. What I require is the ability to leave gaps in the line when this occurs so that the trend is still visible but the fact that there are missing (or suspect) values is shown. This feature is possible in Excel but I have not been able to find anything similar in VB6.
Mschart... Graphing Two Lines On The Same Chart
I am trying to graph to sets of data on the same chart. These two lines fall within the same range, however set two has many more data points than data set one (greater resolution). I want to be able to show both graphs with their respective data points on one graph. Is that possible? In other words, how can I manipulate the row property to show different data sets with different row counts?
MultiType In Single MSchart Chart
I need to plot values in a MSchart with first data viewed in a single bar and next n datas in stacked Bar,sample pic in attachment.
Trouble When Creating Chart Using MsChart
hii all gurus,
I can't make chart using mschart component.,
I can make this using excel,
-Using xy scatter chart type,
-Make two series, each series has its x values and y values
i use this value : series1 : x = 10 & 20 and y = 80 & 60
: series2: x = 25 & 20 and y = 75 & 50
that will make two line crossed, and creating a center/cross point.
how make this using mschart ?, i dont know how to use its property, i 've tried several times but always failed...
i dont know how to make and enter that series (series1 & series2).
if you know some, please teach me something.... i'd really appreciate it , i've stuck for weeks...
Thank You Very Much...,
have a nice weekend,
Ganero.
How Do I Make A Shape Stop Moving?
I have a shape(Shape1) that you can move with the arrow keys....how do i make the Shape1 cease to move when a certain event happens, even though the arrow keys are still pressed?
thanks for any help!
ListView - Stop Icons Moving
Hi,
I'm using a listview control in the Icon mode, to display a control panel for my application. The only problem is that when a user clicks an icon, when you move the mouse it moves the icon as well.
Is there any way to stop the user moving the icon?
Stop Maximized Form From Moving
I am using a picturebox as a container to act as a mdiparent because only 1 midparent is allowed when I need 2. When I maximize a "child" form, the title bar is still visible which enable the user to move the max form. I get an error when I set moveable=false during runtime. Is there any way to stop the maxed form from moving? Thanks.
How Do I Stop Flickering In Moving Graphics?
I haven't dealt with graphics in vb before, but I know of a common graphics method to reduce/eliminate flicker in animations called double-buffering.
The flicker is caused from clearing the old frame before drawing the new one. To counter this problem you actually would have 2 picture boxes (or whatever you're using) the first one is the visible one that will display the animation. On the second buffer, you do the calculations for the next frame and place all the objects there, then once the frame is ready for display you change the image on the visible buffer to that of the second buffer.
Since I haven't done this in vb before I'm not to helpful in the code department, but hopefully you'll find this method usefull.
Trying To Stop Moving Past Last Record
I am writing a database with a number of tables with forms atttached to each table. I have placed navigation buttons on each form to move to first, last, next, previous. I have set up the code associated with the buttons as "public sub" so it is available for each form to use.
This was working OK except that when I used the NEXT button at the last record it would open a new blank record & keep opening a new blnak record on each click.
To over overcome this I put in an If statement to check if it had moved to a new record. To do this I used the following:
If Me!NewRecord Then ..... etc
Now I get an error "Invalid use of Me key word" I suspect it is because I am using ME in a public sub
How do I overcome the problem of moving passed the last record and still have the coding available to all forms?
The Code is below.
Thnaks for any help.
Public Sub Next_Record_Click()
On Error GoTo Err_Next_Record_Click
DoCmd.GoToRecord , , acNext
If Me!NewRecord Then
' If new record move back to previous
DoCmd.GoToRecord , , acNext
' Send message
MsgBox "This is the last record", , "No More Records"
End If
Exit_Next_Record_Click:
Exit Sub
Err_Next_Record_Click:
MsgBox Err.Description
Resume Exit_Next_Record_Click
End Sub
How To Plot Chart VS Date From Access (using MSChart Or Anything)
I have an access table with two column name columnA and columnB. I want to plot columnA VS columnB. For this I use MSChart. It works fine normally but if column B contains date, then the curve shows nothing!! I attach my code now
Code:
Private Sub Form_Load()
Dim con As ADODB.Connection
Set con = New ADODB.Connection
Dim dbfullpath As String
dbfullpath = "maintb.mdb"
con = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & dbfullpath & ";Persist Security Info=False"
con.Open
Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
Dim strSQL As String
strSQL = "SELECT * FROM aa"
rs.CursorLocation = adUseClient
rs.Open strSQL, con, adOpenDynamic, adLockOptimistic
MSChart1.chartType = VtChChartType2dXY
Set MSChart1.DataSource = rs
rs.Close
Set rs = Nothing
con.Close
Set con = Nothing
End Sub
Secondary Y-Axis On 2D XY Scatter Chart With MSChart?
Hi, I am stuck with a problem in MSChart and need urgent help! I need to put a second Y axis to a 2D XY Scatter Chart. I can put a secondary Y axis to other charttype such as 2D Line/Bar, but I can't make it on a 2D XY chart with all possible way I can think of . Is it possible to do so? I apprieciate any suggestions! Thanks in advance!
My code is:
If booY2 Then
With .Plot.Axis(VtChAxisIdY2)
.AxisTitle.Text = Queries.cmbY2Axis.Text & " " & strY2Unit
.AxisTitle.Visible = True
.AxisTitle.VtFont.style = VtFontStyleBold
.AxisTitle.VtFont.VtColor.Set 0, 0, 255
.AxisTitle.VtFont.Size = 12
.ValueScale.Auto = True
End With
With .Plot.SeriesCollection(3)
.SecondaryAxis = True
.LegendText = Queries.cmbY2Axis.Text
With .Pen.VtColor
.Blue = 255
.Green = 0
.Red = 0
End With
End With
End If
MSChart - Dynamic Display Of Data In Bar Chart
Hi,
Can anyone please help me with mschart. The requirement is to display temperature values which increases every few milliseconds in the form of a bar chart.
I need a method to display the bar chart column gradually increase every few milliseconds to show the temperature fluctuations.
I have currently used a timer and an array of temperature values for achieving this functionality but the vb form is flickering. Please help as this is urgent!!
Thanks
How To Chart Data Into MSchart From Flexgrid Control??
hi all,
I have develpoed an applications used for sales statistics, it generates reports on a FlexGrid control like : Sales of Items / Clients and such like.
After finishing the codenig and testing everything is ok,
I couldn't find a way to send this numbers from the flexgrid to MSChartControl.
Can anyone help me,
Thnks in Advance
How To PROPERLY Display All The Caption Of A MSChart Pie Chart
Hi all,
I'm using MSchart control (a Pie chart) on my report. The pie chart has many differences categories on it (i.e: cake=40%,water=35%,....etc). It's working fine but when let say there are 2 categories (i.e: cake=1% and water=0.5%) next to each other that have very small percentage on the Pie, THEN the 2 categories labels overlapped each other and I CAN NOT read the label. Is there anyone encountered this issue yet? if anyone know how to solve this problem, please let me know.
Also, Does the MSChart control have any dependency on the MS Office. Do the Clients need to have MS Office install in order to use MSChart correctly.
Thanks alot
Edited by - qdnguyen2 on 8/14/2003 3:33:20 PM
MSChart - Moving The Mouse Over A 2D Line
MSChart - 2D line gragh question
You can move a mouse over the top of one of the 2D lines in an MSChart and a little box appears (like a tool tip) and it displays the name of that 2D line.
I have seen it work in another VB program but I have no idea of the code, could somebody help me please?
Thanks
Moving A Chart To A Different Sheet
Hi everyone!
I'm Triyng to move a chart from my VB application to a sheet in the excel.workbook which i'm working. This code I use:
objHoja.Application.ActiveChart.Location xlLocationAsObject, objLibro.Sheets(2).Name
But the chart don't move to he sheet(2). It appears in the fisrt one (sheet(1)).
Does anybody know how to solve this?
Thanks a lot!!
Stop Item Dragging/moving In ListView
Is there any way you can stop the user from moving the item position in a listview?? I need them to stay the same as i added them first by code, with them being fixed for the user and not allowing any movement of item position!
thanks!
Stop A Moving Image Drawing Over Other Lines...
I have the following code which moves a little image control across the form, but what happens when it moves across slowly is it sort of half draws over lines that I have on the form....how can i get it so that it doesnt draw over the other lines and leaves them intact....so that it doesnt leave this kind of trail.....
VB Code:
Private Sub Timer1_Timer()If Image2.Left < 9240 Then Image2.Left = Image2.Left + 1'only move the picture one space over if it isnt alreadt at the desired locationEnd IfEnd Sub
How To Stop Cursor Keys Moving Focus ?
I am writing a program where an object can be moved round the screen. I first did this using command buttons and then wanted to add the option of using the keyboard cursor keys.
KeyAscii and/or KeyCode worked for most keys but not the cursor keys which didn't seem to generate any events. I got something working using an API call (GetAsyncKeyState).
The bit which still bugs me is that when the user presses the cursor keys, as well as moving the on-screen object, it also moves focus round the various command buttons.
Can anyone suggest how to stop this happening ?
Horizontal Line Mixed With Chart Dots In Mschart
Hi every1.
I have an app that displays a chart (mschart Type2dXY) with some values in YYs against time in XXs.
I just would like that the chart could display one or two horizontal lines in a specific YY value along all the chart.
How can I achiev that?
Like this:
Y^
/
/ ________________this is the line I want to display
/ . . . . .
/ . . . . .
/ . . .
/_______________>
X
Can someone help me please?
Thanks.
Edited by - brutALL on 10/5/2003 7:50:45 AM
Mschart Disable Moving Plot-area
hi,
is there a way to configure the mschart control,
so that the size and position of the plot-section within the chart cannot be changed interactively, but without disabling the series-selection-possibilities.
i need this, because whenever i don't precisiously pick a series-data-point the whole plot-section moves around.
hope anyone knows a solution
andi
Moving Excel Chart/Shape???
I have the following code that generates an Excel chart on the worksheet that is passed to it. The creating of the chart works fine but I am having trouble moving the chart where I want to after it is created. I am passing several different worksheets through this code and it bugs out after the first sheet because I have not been able to find an effective way telling it which chart/shape I want to move. Right now I have the shape index manually coded in but only works for the first chart. Any suggestions would be helpful.
CODE
Public Function addHeaderFooter(ByVal wrksheet As Excel.Worksheet, ByVal headerText As String, ByVal footerText As String)
With wrksheet
.PageSetup.Zoom = False
.PageSetup.CenterHeader = headerText
.PageSetup.CenterFooter = footerText
.PageSetup.Orientation = xlLandscape
.PageSetup.LeftMargin = (0.5)
.PageSetup.RightMargin = (0.5)
End With
End Function
Public Function createChart(ByRef excelapp As Excel.Application, ByRef wrksheet As Excel.Worksheet, _
ByVal startRow As Integer, ByVal endRow As Integer)
Dim eChart As Excel.Chart
Dim chartName As String
With wrksheet
Set eChart = wrksheet.Parent.Charts.Add
With excelapp
.ActiveChart.ChartType = xlLineMarkers
.ActiveChart.SetSourceData wrksheet.Range("G" & (startRow) & ":G" & (endRow) & ", " & "E" & (startRow) & ":E" & (endRow) & "")
.ActiveChart.SeriesCollection(1).XValues = wrksheet.Range("B" & (startRow) & ":B" & (endRow) & "")
.ActiveChart.SeriesCollection(1).Values = wrksheet.Range("G" & (startRow) & ":G" & (endRow) & "")
.ActiveChart.SeriesCollection(1).Name = "=""CWT"""
.ActiveChart.SeriesCollection(2).Values = wrksheet.Range("E" & (startRow) & ":E" & (endRow) & "")
.ActiveChart.SeriesCollection(2).Name = "=""WEIGHT"""
.ActiveChart.Location xlLocationAsObject, wrksheet.Name
.ActiveChart.SeriesCollection(2).AxisGroup = 2
chartName = .ActiveChart.Name
End With
'INCREASING SIZE OF CHART
With excelapp
.ActiveChart.PlotArea.Select
With excelapp.Selection
.Width = 300
.Height = 130
End With
End With
'ADDING TITLE TO CHART
With excelapp.ActiveChart
.HasTitle = True
.ChartTitle.Characters.Text = "CWT"
.Axes(xlValue, xlPrimary).HasTitle = True
.Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "CWT"
.Axes(xlValue, xlSecondary).HasTitle = True
.Axes(xlValue, xlSecondary).AxisTitle.Characters.Text = "Weight"
End With
'ADDING LEGEND TO CHART
With excelapp
.ActiveChart.HasLegend = True
.ActiveChart.Legend.Position = xlLegendPositionBottom
End With
'MOVING CHART BELOW FINAL LINE OF DATA
With wrksheet.Shapes(2)
.Top = wrksheet.Rows(endRow + 3).Top
.Left = wrksheet.Columns(1).Left
End With
'MOVING CURSOR BACK TO FIRST CELL
With wrksheet
.Cells(7, 1).Select
End With
Set eChart = Nothing
End With
End Function
Making A Label Stop Moving When It Hits A Certain Point[solved]
I have a long Label, it shows text, I want it to scroll slowly, but how do I make it stop at a certain point, If I do
VB Code:
Private Sub tmrAbout2_Timer() DoEvents LblAbout.Top = LblAbout.Top - 10 DoEventsIf LblAbout.Top <= 0 Then tmrAbout2.Enabled = FalseEnd Sub
Then it stops when the top of the label hits the top of the form/frame, I want it to scroll through the top of the frame, Its fine if I dont put an If then but it keeps going forever.
Using MsChart MouseOver Event To Display The Contents Of Array That Populated Chart
I want to be able to view the data that has populated the Graph control by using a Mouseover event as the PointSelected Event does not work if I have a lot of data points on my graph - MouseOver would be much nicer anyway. Currently I use something like this:
Private Sub ActiveChart_MouseMove(Button As Integer, Shift As Integer, X As Single, y As Single)
On Error Resume Next
Dim lngZeroXAxis As Long
Dim lngEndOfXAxis As Long
Dim lngLengthOfXAxis As Long
'XCoordinate at intersection with YAxis
lngZeroXAxis = 1230
'XCoordinate at end of graph
lngEndOfXAxis = 11895
'Length of graph
lngLengthOfXAxis = lngEndOfXAxis - lngZeroXAxis
Select Case X
Case Is <= lngZeroXAxis
txtXCoordinate = 0
Case Is >= lngEndOfXAxis
txtXCoordinate = 0
Case Else
'Display contents of datapoint selected in two dimentional array
txtXCoordinate = m_PreservedXAxisData(0, CInt((X - lngZeroXAxis) / (lngLengthOfXAxis / m_lngTimescale)))
End Select
'Display X Coordinate
Text1 = X
'Display Y Coordinate
txtYCoordinate = y
End Sub
Here m_PreservedXAxisData is a two dimensional array and m_lngTimescale=1
Problems are that depending on the scale of the graph lngZeroXAxis & lngEndOfXAxis change
There must be a better approach than this! Can someone please help?
How Do I Stop The Scaling Of My App When The User Changes DPI?
I have a visual basic game. The interface window is not designed to be stretched, all the graphics and text are placed exactly where i want them for proper appearance, as you would expect.
It all runs great until someone changes the dpi of their system under the control panel with display/advanced/dpi. Then my window size changes, the placement of my fonts changes...it all gets scaled along with windows as a whole.
Is there a way to lock down font size, and placement of controls regardless of those the dpi settings of windows?
Stop User From Keying
how do i stop a user from entering more than a number of char in a textbox?
ie if number is a variable =5
means that user can only keying 5 chars at most and being 'block' after that in the textbox...but with the focus still set on the textbox.
How Can I Stop The User From Closing My App?
Hi all!
---> Well, by this I don't mean to stop the user from closing my APP with Alt+F4!
While ago I was trying to close a program in win2k (with the task manager when pressing Ctrl Alt Del), and it told me "permission dinied". I want to know how to do that so that the windows wouldn't let the user to close my program with Task Manager.
any ideas?
How Do I Stop The Scaling Of My App When The User Changes DPI?
I have a visual basic game. The interface window is not designed to be stretched, all the graphics and text are placed exactly where i want them for proper appearance, as you would expect.
It all runs great until someone changes the dpi of their system under the control panel with display/advanced/dpi. Then my window size changes, the placement of my fonts changes...it all gets scaled along with windows as a whole.
Is there a way to lock down font size, and placement of controls regardless of those the dpi settings of windows? I have set my form and the picture controls to use pixels (as opposed to twips) but it seems like it doesn't respect that in some cases.
And this isn't just at runtime. if I change my dpi (for from the default 96 to say, 120 ("large fonts")) the next time I load the vb project everything is scaled up. How can I get vb to respect the absolute placement of my controls. as I mentioned I set everything to pixels, but some controls like text and images dont have an option to denote scalemode, and even though I set my root form to pixelmode it still gives its height and width in twips...is there a place to set the app to pixels globally?
Thanks for any insight,
Pete
http://www.littleshinyobjects.com
MsCHART User Control
What is the easiest way in which to give the end-user controll over the format / properties of an msChart object??
ty
rt
How Can I Stop A Loop From User Input?
I have a loop that exports results from a query to an Excel worksheet. Anyone that has used this method before knows how slow it can be. How can I stop the process of exporting if I wish.
I have caped the max exports at 500 becuase it could take a real long time if I let it go much higher.
processing is a form that tells you at what position you are at and percent complete of export. During export the program won't let you set focus on anything, I assume it is because of the label.refresh.
Well thanks for any help
This is the loop that I am using.
Code:
Do While Not rs.EOF
lCol = 1
For Each fld In rs.Fields
oExcel.ActiveSheet.Cells(lRow, lCol) = fld.Value
lCol = lCol + 1
If rs.RecordCount < 500 Then
processing.Label2.Caption = Round((rs.AbsolutePosition / rs.RecordCount) * 100) & " Percent Done."
processing.Label2.Refresh
processing.Label3.Caption = "Working on Record " & rs.AbsolutePosition & " of " & rs.RecordCount
processing.Label3.Refresh
Else
processing.Label2.Caption = Round((rs.AbsolutePosition / 500) * 100) & " Percent Done."
processing.Label2.Refresh
processing.Label3.Caption = "Working on Record " & rs.AbsolutePosition & " of 500."
processing.Label3.Refresh
End If
Next
lRow = lRow + 1
If rs.AbsolutePosition >= 500 Then
Exit Do
End If
rs.MoveNext
Loop
Stop User From Paste Text
how to stop user from paste text into textbox , combobox etc..
how 2 disable "Paste" in right click menu n CTRL + V short cut key
Stop User Prompt Excel
In my excel project I want my program to delete sheets. However, the user is always prompted. Is there anyway to over ride this?
Thanks
Shook1s
Stop User Typing To Combo
How do I stop users typing into text of the combo box?
I need the following:
When the form is opened, the list will be loaded in the combo which is sorted and combo.text should be the same as the first item of the list. (THIS WORKS OK)
The user should only be able to choose one of the items from the list. The user should not be able to type or paste text into combo.text. (THIS IS WHERE I HAVE GOT A PROBLEM)
Thanks.
Stop User Using Arrow Keys
How do I stop the user from being able to use the arrow keys on a combo box?
Would I have to capture the keypress in the combo box somewhere?
Edited by - andy99 on 9/26/2003 5:46:54 AM
|
TRACKER
