Visual Basic Code , VB.NET Code, VB Code
  Home   :  Code   :  Forums   :  Submit   :  Mailing List   :  About   :  Contact


A1 is my favorite VB site...


A1 is my favorite VB site...

Author
Message
MarkGriffeth
MarkGriffeth
Forum God
Forum God (2.8K reputation)Forum God (2.8K reputation)Forum God (2.8K reputation)Forum God (2.8K reputation)Forum God (2.8K reputation)Forum God (2.8K reputation)Forum God (2.8K reputation)Forum God (2.8K reputation)Forum God (2.8K reputation)

Group: Forum Members
Posts: 7, Visits: 273
and I will tell you why. It seems like every-other VB site I come across has it's VB 6 and earlier code mixed with the VB.NET and later code. If it's not that, you have to do all kinds of crazy stuff just to download a snippet of code. I can not stand that, and it drives me up the walls. I am happy to join this site. This site has already provided me with a huge amount of useful code. I am here to stay. Thank you for creating this site.

                                                                                                            -Mark

#include <love.h>

Keithuk
Keithuk
Forum God
Forum God (297K reputation)

Group: Moderators
Posts: 1.9K, Visits: 5.5K
Welcome to A1vbcode Mark.

Well I don't find A1vbcode the best VB site for one reason. When you reply to a topic on all the other 25 VB forums that I use is you can't see the previous posts to copy and paste text. You have to have 2 browsers open.

The other thing is posting code

Public Function IsOsVista() As Boolean

    ' Declare local vars...
    Dim lMajor As Long
    Dim lMinor As Long
  
 ' Retrieve the actual info...
    GetWindowsVersion lMajor, lMinor
  
    ' Check which OS we're on and Assign Global vars... You'll only have to call
    ' the function once this way...
  
    ' OS is Vista
If (lMajor = 6) Then
    IsOsVista = True
    m_IsVista = True
    m_IsXp = False
    m_IsW2K = False
    Me.Caption = "Vista True"
  
        ' OS is XP
ElseIf (lMajor = 5) And (lMinor >= 1) Then
    IsOsVista = False
    m_IsVista = False
    m_IsXp = True
    m_IsW2K = False
    Me.Caption = "XP True"
    ' OS is W2K
ElseIf (lMajor = 5) And (lMinor = 0) Then
    IsOsVista = False
    m_IsVista = False
    m_IsXp = False
    m_IsW2K = True
    Me.Caption = "Win2k True"
End If

End Function

as against

Public Function IsOsVista() As Boolean

    ' Declare local vars...
    Dim lMajor As Long
    Dim lMinor As Long
   
 ' Retrieve the actual info...
    GetWindowsVersion lMajor, lMinor
   
    ' Check which OS we're on and Assign Global vars... You'll only have to call
    ' the function once this way...
   
    ' OS is Vista
If (lMajor = 6) Then
    IsOsVista = True
    m_IsVista = True
    m_IsXp = False
    m_IsW2K = False
    Me.Caption = "Vista True"
   
        ' OS is XP
ElseIf (lMajor = 5) And (lMinor >= 1) Then
    IsOsVista = False
    m_IsVista = False
    m_IsXp = True
    m_IsW2K = False
    Me.Caption = "XP True"
    ' OS is W2K
ElseIf (lMajor = 5) And (lMinor = 0) Then
    IsOsVista = False
    m_IsVista = False
    m_IsXp = False
    m_IsW2K = True
    Me.Caption = "Win2k True"
End If

End Function

This is Mark's way around it. Mark's Syntax.zip. Its a pity Mark's code doesn't work on other forums.

You will find that forums that use VB6 and VB.Net separate these two languages in different sub forums. I won't tell you which is the best VB forum on the web, I presume you have found it.  Wink

Keith

I've been programming with VB for 17 years. Started with VB4 16bit Pro, VB5 Pro, VB6 Pro/Enterprise and now VB3 Pro. But I'm no expert, I'm still learning.

steve7680768
steve7680768
Forum God
Forum God (567 reputation)Forum God (567 reputation)Forum God (567 reputation)Forum God (567 reputation)Forum God (567 reputation)Forum God (567 reputation)Forum God (567 reputation)Forum God (567 reputation)Forum God (567 reputation)

Group: Forum Members
Posts: 1, Visits: 3
That sounds a bit awkward...

VCP-410 | 350-001 | 640-802 | 642-813

Joey
Joey
Forum God
Forum God (16K reputation)Forum God (16K reputation)Forum God (16K reputation)Forum God (16K reputation)Forum God (16K reputation)Forum God (16K reputation)Forum God (16K reputation)Forum God (16K reputation)Forum God (16K reputation)

Group: Forum Members
Posts: 72, Visits: 46

Well I don't find A1vbcode the best VB site for one reason. When you reply to a topic on all the other 25 VB forums that I use is you can't see the previous posts to copy and paste text. You have to have 2 browsers open.

Looks like they fixed that problem. If you scroll down on the reply page, you now can see the last 10 posts for each thread.

Edited
6/12/2010 by Joey
Keithuk
Keithuk
Forum God
Forum God (297K reputation)

Group: Moderators
Posts: 1.9K, Visits: 5.5K
Joey (6/12/2010)
Looks like they fixed that problem. If you scroll down on the reply page, you now can see the last 10 posts for each thread.

Yes in a fasion Joey if you click the the + on the bar. To see all the posts in that topic you have to open in a new window. Wink

Keith

I've been programming with VB for 17 years. Started with VB4 16bit Pro, VB5 Pro, VB6 Pro/Enterprise and now VB3 Pro. But I'm no expert, I'm still learning.

GO


Similar Topics


Reading This Topic


Login
Existing Account
Email Address:


Password:


Social Logins

Select a Forum....

















A1VBCode Forums


Search