Avere la conoscenza di come fare telefonate da un Microsoft Visual Basic.NET ( VB.NET ) applicazione consente di risparmiare tempo se avete bisogno di effettuare chiamate continuamente . VB.NET è un linguaggio di programmazione utilizzato per creare applicazioni mobili , web e desktop. Effettuare chiamate telefoniche da VB.NET possono essere eseguite utilizzando il Telephony Application Programming Interface ( TAPI ) . TAPI dà ai programmatori gli strati necessari per accedere alla telefonia Microsoft DLL ( librerie di collegamento dinamico ) . Telefonia integra i computer con dispositivi come fotocamere e le reti Internet . Cose che ti serviranno
Microsoft Visual Basic Express
Mostra più istruzioni
1

Avviare Microsoft Visual Basic Express , fare clic su " Nuovo progetto ... " nel riquadro di sinistra dello schermo e selezionare "Applicazione Windows Form ". Fare clic su "OK".

2 Fare doppio clic su "Button " sulla " Casella degli strumenti " per aggiungere un nuovo pulsante . Fare doppio clic su " Label " per aggiungere un'etichetta . Aggiungere una seconda etichetta utilizzando lo stesso processo . Fare doppio clic su " TextBox " per aggiungere una casella di testo .
3

doppio clic su " Button1 " per aprire il modulo " Form1.vb " . Copiare e incollare il seguente nella prima riga del modulo :

Imports System.Windows.Forms
4

Copia e incolla il seguente per dichiarare la DLL Tapi32 sotto " Public Class Form1 " ma soprattutto la " " procedura :

Declare Auto Function tapiRequestMakeCall Lib " Button1_Click tapi32.dll "_

( ByVal DestAddress As String , ByVal AppName String, _
< p > CalledParty ByVal come stringa , commento ByVal As String ) As Integer

Const TAPIERR_NOREQUESTRECIPIENT As Short = -2

Const TAPIERR_REQUESTQUEUEFULL As Short = -3

Const TAPIERR_INVALDESTADDRESS As Short = -4

la procedura " Button1_Click " è stato creato quando si fa doppio clic " Button1 " sul modulo .
5

Copia e incolla il seguente all'interno della procedura " Button1_Click " per creare le variabili :

Dim phoneNum As String Dim

As Short

Dim tmpStr As String

La procedura " Button1_Click " è stata creata quando si fa doppio cliccato " Button1 " sul modulo
6

Copia e incolla il seguente per ottenere il numero di telefono inserito nella casella di testo e chiamarlo : .

phoneNum = Trim ( TextBox1.Text ) per

Prova

= tapiRequestMakeCall ( phoneNum , "Dial " , phoneNum , " " ) per

Catch ex As Exception

Label2.Text = " Errore "

End Try
7

Copia e incolla il seguente per verificare la presenza di errori :

< > 0 Then

tmpStr = "Errore "

Select Case

caso TAPIERR_NOREQUESTRECIPIENT

tmpStr = tmpStr & " No finestre applicazione chiamata di telefonia è in esecuzione e nessuno potrebbe essere avviato. "

caso TAPIERR_REQUESTQUEUEFULL

tmpStr = tmpStr & " La coda di richieste pendenti di composizione di telefonia di Windows è piena . "

caso TAPIERR_INVALDESTADDRESS

tmpStr = tmpStr & " Il numero di telefono non è valido. "

Case Else

tmpStr = tmpStr &" errore Unkown ".

End Select

Else

tmpStr = "Selezione "

End If

Label2.Text = tmpStr

End Sub End Class

8

Press "F5" per eseguire il programma , quindi immettere un numero di telefono nella casella di testo e fare clic su " Button1 ".