AnsweredAssumed Answered

Visual Basic IDN.bas error

Question asked by designer6 on Nov 10, 2008
Latest reply on Nov 10, 2008 by designer6

Like • Show 0 Likes0
Comment • 1

Hi Guys,

I am trying to compile the idn.bas file but i keep getting this error message.

"Statements is not valid in a namespace". I added the file visa23.vb to the project instead of visa32.bas from the lib. I wonder that's the problem

I am using Microsoft Visual Studio 2008

Regards,
V

No one else has this question

Outcomes

1 Reply

designer6 Nov 10, 2008 3:09 PM
Mark Correct
Correct Answer
Hi Guys,

I got the code conversion between VB6 to Visual Basic.net working

Option Strict Off
Option Explicit On
Module idn

     Public Sub Main()
          Dim defrm As Integer 'Session to Default Resource Manager
          Dim vi As Integer 'Session to instrument
          Dim strRes As New VB6.FixedLengthString(200) 'Fixed length string to hold results

          ' Open the default resource manager session
          Call viOpenDefaultRM(defrm)

        Call viOpen(defrm, "TCPIP::IP_Address::inst0::INSTR", 0, 0, vi)

          ' Initialize device
          Call viVPrintf(vi, "*RST" & Chr(10), 0)

          ' Ask for the device's *IDN string.
          Call viVPrintf(vi, "*IDN?" & Chr(10), 0)

          ' Read the results as a string.
          Call viVScanf(vi, "%t", strRes.Value)

          ' Display the results
          MsgBox("Result is: " & strRes.Value, MsgBoxStyle.OKOnly, "*IDN? Result")

          ' Close the vi session and the resource manager session
          Call viClose(vi)
          Call viClose(defrm)

     End Sub
End Module
Like • Show 0 Likes0
Actions

Visual Basic IDN.bas error

Outcomes

Related Content

Recommended Content