Hi SBerthold/9milla,
I eventually just made a callable subroutine to validate/reformat an input. Goal is to make any valid date
(slash delimited) or mmddyy returned as mm/dd/yy. For my purposes, I just want to be sure valid dates are in the range of 01/01/00 to 12/31/99.
On your suggestion...
Oops! when looking at the grid, rows count includes the header. So if rows = 6, then data is only for 5 rows, thus:
If KeyCode = 9 And Not svKey Then
With FG2
If .Col < 3 Then
.Col = .Col + 1
Else
If .Row < .Rows - 1 Then ' exclude header...
Hi HughLerwill,
Thanks for your help and suggestions. They were great!
This is the way I was able to get it done for Tab and Shift Tab to work. Since my form contains other command buttons like, Cancel, Exit, Save, I need to make sure these Tab stop properties are set to False, else, Tab...
Hugh, many thanks! It is working quite well. Right now, we use the left, right, up and down arrows to navigate to the grid. My error in the 2nd request. What changes are needed to use Tab and shift tab to move right and left also, respectively, instead of Control tab to move left or navigate 1...
I am trying to use MSHFlexgrid with textbox to update 1 column. There are 4 columns, namely, member ID, member Name, Interest, Date Joined. This also serves as the row heading. When I start the form, I want the cursor to be on the Date joined, 2nd row. Additionally, how can I prevent the user...
Hi Sberthold,
This is an updated version of sub stdfmtDate_UnFormat(). It works very well and I modified a little to watch out for users typing 32/08/08, for example. Here it is:
Private Sub stdfmtDate_UnFormat(ByVal DataValue As StdFormat.StdDataValue)
'Check and format the input into a...
Hi SBerthold,
Maybe I am but message only appears if datagrid thinks an invalid date is entered, e.g., 080508. If I enter 08/05/08, it is accepted. The simplified code is:
dim tmp as string
tmp = me.datagrid1.text
' code to check for user typing in 32/8/8, 1/32/8 is omitted
if...
I tried BeforeColUpdate before and I get the message: Multiple-step operation generated errors. Check each status value. I just printed ms/315648 (Custom formatting/stddataFormat object). I will give it a try later this morning. I believe it should work for date fields.
Thanks for the...
I created an application using the VB6 Wizard to show an Access table using datagrid. One of the fields is date/time. I want to be able to enter 080508 then convert it to 08/05/08 and store it back to the cell. It would not let me using AfterColUpdate. I get an error message from Datagrid...
Went to the site and found out they were using expired Norton AV. Uninstalled the AV and deleted existing emails/accounts and reinstalled the email accounts again. Problem went away. When I reinstalled the AV, it said I had 1 day left, etc. I instructed the office manager to renew the AV...
I will take a physical look if any hardware is involved by way of firewall. I will also see if I can disable the Windows firewall on both the server and the workstation temporarily together with the AV software and see if the problem goes away. The fellow who set up the lan mentioned sometime...
Our lan has a fileserver (window 2003) and 7 workstations (XP Pro). When using MS Outlook/OE, on my workstation, my email send/receive fails. Error message: Protocol SMTP, Port 25, Secure(SSL): NO. Socket Error: 10061, Err no.0X800CCC0E. Same for POP3, Port: 110. Talked to our ISP and Dell...
Here is a basic sample code you use and modify to your needs:
Private Sub Command1_Click()
' Need to Reference Microsoft ActiveX Data objects 2.1 or higher
Dim myRS As New ADODB.Recordset
Static ConnectStr As String
Dim dbPathName As String, sqlstr as string
dbPathName =...
Dear Colleagues:
Thanks for all your help. I tried using on Keypress and also using a Search button but the suggestion of HughLerwill worked quite well. I am indebted to Tek-tips and I just sent a modest contribution.
I have a combo box created using VB6 with the following items:
Adams
Arlington
Barnes
Bielaski
Carmichael
Iverson
Izrak
When I type B on the combo box, Barnes is shown because Style = 2-drop down list.
When I type I, Iverson shows up. How can I make the combo box highlight Bielaski after...
I have a program written in VB6 to show in a grid/report weekly schedules of laborers. Users (2-3) often leave the program running on their desktop unattended and someone can make unauthorize changes. Under XP, I can invoke the screen saver and after n minutes of inactivity, it can resume with...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.