Visualizzazione dei risultati da 1 a 6 su 6
  1. #1
    Utente di HTML.it
    Registrato dal
    Jul 2009
    Messaggi
    12

    Visual Basic evento pressione touch screen

    Salve a tutti ho un piccolo problemino, avete idea di come si possa sappere se un qualsiasi punto del mio pannello touch screen è premuto?
    Grazie
    Stefano

  2. #2
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,480
    Parliamo di VB.NET?

    Ad occhio dovrebbe essere equivalente ad un evento del mouse ...
    No MP tecnici (non rispondo nemmeno!), usa il forum.

  3. #3
    Utente di HTML.it
    Registrato dal
    Jul 2009
    Messaggi
    12
    Il linguaggio si chiama WinWrap Basic ed è un simil visual basic... attraverso il software di sviluppo posso creare degli script, il pannello gira su windows CE io purtroppo in materia non sono tanto ferrato...

  4. #4
    Utente di HTML.it L'avatar di oregon
    Registrato dal
    Jul 2005
    residenza
    Roma
    Messaggi
    36,480
    Originariamente inviato da gts
    Il linguaggio si chiama VBA ed è un simil visual basic...
    So cos'è il VBA ... basta dirlo all'inizio ...

    Cosa intendi con "pannello"?

    Con cosa hai sviluppato lo script VBA ? Lo hai fatto per Windows CE ?
    No MP tecnici (non rispondo nemmeno!), usa il forum.

  5. #5
    Utente di HTML.it
    Registrato dal
    Jul 2009
    Messaggi
    12
    scusa ho sbagliato a scrivere il linguaggio, con un software di sviluppo industriale, lo script non l'ho ancora scritto ti posto un esempio di uno già esistente

    '#Language "WWB-COM"
    Option Explicit
    Const ProjectName As String = "PIPPO3"
    Const FileOutputPanelPath As String = "\FlashDrv\PIPPO\PIPPO2\"
    Const FileOutputPCPath As String = "PIPPo4\"
    Const Separator As String = ";"

    Sub Main()
    Dim iFileNum As Integer
    Dim sFilename As String

    If GetVariableValue("PIPPO_8") = True Then

    If Len(Dir$(FileOutputPanelPath)) > 0 Then
    sFilename = FileOutputPanelPath & sFilename
    ElseIf Len(Dir$(FileOutputPCPath)) > 0 Then
    sFilename = FileOutputPCPath & sFilename
    End If

    iFileNum = FreeFile()

    If Len(Dir$(sFilename)) = 0 Then
    Open sFilename For Output As #iFileNum
    Else
    Open sFilename For Append As #iFileNum
    End If

    Print #iFileNum, GetCurrentRecord("PIPPO_12")

    Close #iFileNum

    SetVariableValue("Pippo_9", False)

    End If

  6. #6
    Utente di HTML.it
    Registrato dal
    Jul 2009
    Messaggi
    12
    Per pannello intento proprio un pannello "monitor" grazie.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.