Nachdem das Wissen , wie man Telefongespräche von einem Microsoft Visual Basic.NET ( VB.NET) machen Anwendung können Sie Zeit sparen , wenn Sie Anrufe kontinuierlich vornehmen müssen. VB.NET ist eine Programmiersprache verwendet , um mobile , Web-und Desktop-Anwendungen zu erstellen. Telefonieren von VB.NET kann unter Verwendung der Telephony Application Programming Interface ( TAPI) werden. TAPI gibt den Programmierern die Schichten notwendig, um die Microsoft Telephony DLLs ( Dynamic Link Libraries ) zugreifen . Telefonie integriert Computern mit Geräten wie Kameras und Internet -Netzwerke. Things You
Microsoft Visual Basic Express
brauchen anzeigen Weitere Anweisungen
1

Starten Sie Microsoft Visual Basic Express, klicken Sie auf " Neues Projekt ... " auf der linken Seite des Bildschirms und wählen Sie "Windows Forms-Anwendung. " Klicken Sie auf " OK".
2

Doppelklicken Sie auf "Button " auf der " Toolbox ", um einen neuen Button hinzufügen. Doppelklicken Sie auf " Etikett ", um eine Beschriftung hinzuzufügen . In einer zweiten Markierung unter Verwendung der gleichen Verfahren . Doppelklicken Sie auf " TextBox " , um ein Textfeld hinzuzufügen.
3

Doppelklicken Sie auf " Button1 ", um die " Form1.vb "-Modul zu öffnen. Kopieren Sie den folgenden in der ersten Zeile des Moduls:

Imports System.Windows.Forms
4

Kopieren Sie den folgenden , um die DLL TAPI32 unter " Public Class erklären Form1 " , aber oberhalb der " Button1 "-Verfahren :

Declare Auto Function tapiRequestMakeCall Lib" TAPI32.DLL "_

(ByVal DestAddress As String , ByVal AppName As String , _
< p > ByVal CalledParty As String , ByVal Kommentar As String ) As Integer Const

TAPIERR_NOREQUESTRECIPIENT As Short = -2

Const TAPIERR_REQUESTQUEUEFULL As Short = -3

Const TAPIERR_INVALDESTADDRESS As Short = -4

" Button1 " Prozedur wurde erstellt, wenn Sie " Button1 " auf Ihrem Formular - doppelt angeklickt .
5

Kopieren Sie den folgenden in der " Button1 "-Verfahren zu schaffen Ihre Variablen : Dim

phoneNum As String Dim

TResult> As Short

Dim tmpStr As String

" Button1 " Prozedur wurde erstellt, wenn Sie -double geklickt " Button1 " auf Ihrem Formular
6

Kopieren Sie den folgenden , um die Telefonnummer in das Textfeld eingegeben bekommen und nennen es : .

phoneNum = Trim ( TextBox1.Text )

Versuchen

TResult> = tapiRequestMakeCall ( phoneNum , "Dial " , phoneNum , "")

Fang ex As Exception

Label2.Text = " error "

End Try
7

Kopieren Sie den folgenden auf Fehler überprüfen :

Wenn TResult> < > 0 Then

tmpStr = "Error"

Select Case TResult>

Fall TAPIERR_NOREQUESTRECIPIENT

tmpStr = tmpStr & " Keine Fenster Telefonie Wählanwendung läuft und keiner konnte gestartet werden. "

Fall TAPIERR_REQUESTQUEUEFULL

tmpStr = tmpStr & " Die Warteschlange der anstehenden Windows Telephony Einwahl -Anfragen ist voll. "

Fall TAPIERR_INVALDESTADDRESS

tmpStr = tmpStr & " Die Telefonnummer ist nicht gültig. "

Case Else

tmpStr = tmpStr & " Unbekannte Fehler. "

End Select Else

tmpStr = " Wählen"

End If

Label2.Text = tmpStr

End Sub End Class

8

Press "F5" um das Programm auszuführen , dann geben Sie eine Telefonnummer in das Textfeld ein und klicken Sie auf " Button1. "