📄 using_vb.html
字号:
<html>
<head>
<title>DNS Control - Samples(Using with VB)</title>
</head>
<body bgcolor="white">
<table border="0" cellpadding="0" cellspacing="0" width="980"><tr>
<td width="14%" valign="top">
<!--index-->
<img src="ostro_logo.gif" alt="OstroSoft Logo" width="170" border="0" hspace="0" vspace="0"><p>
<table border="5" cellpadding="0" cellspacing="0" bordercolor="silver" width="100%"><tr><td>
<table border="0" cellpadding="2" cellspacing="0" width="100%">
<tr><td>
<a href=http://www.ostrosoft.com/><font face="arial,helvetica,verdana" size="2"><b>Corporate</b></font></a>
</td></tr>
<tr><td>
<font face="arial,helvetica,verdana" size="2"><b>Products</b></font>
<table border="0" cellpadding="0" cellspacing="0">
<tr><td> <a href=http://www.ostrosoft.com/ostronet.html><font face="arial,helvetica,verdana" size="2">Internet Tools</font></a></td></tr>
<tr><td> <a href=http://www.ostrosoft.com/formoed.html><font face="arial,helvetica,verdana" size="2">FormoEd</font></a></td></tr>
<tr><td> <a href=http://www.ostrosoft.com/smtp.html><font face="arial,helvetica,verdana" size="2">SMTP control</font></a></td></tr>
<tr><td> <a href=DNS.html><font face="arial,helvetica,verdana" size="2">DNS control</font></a></td></tr>
<tr><td><table border="0" cellpadding="0" cellspacing="0"><tr><td> </td><td>
<font face="arial,helvetica,verdana" size="1"><a href="DNS.html">Main page</a></font><br>
<font face="arial,helvetica,verdana" size="1"><a href="writing_control.html">Writing DNS control</a></font><br>
<font face="arial,helvetica,verdana" size="1"><a href="using_vb.html">Using with VB</a></font><br>
<font face="arial,helvetica,verdana" size="1"><a href="using_asp.html">Using with MTS/COM+</a></font><br>
<font face="arial,helvetica,verdana" size="1"><a href="using_office.html">Using with VBScript</a></font><br>
<font face="arial,helvetica,verdana" size="1"><a href="FAQ.html">DNS FAQ</a></font><br>
</td></tr></table></td></tr>
<tr><td> <a href=http://www.ostrosoft.com/whois.html><font face="arial,helvetica,verdana" size="2">WhoIs control</font></a></td></tr>
<tr><td> <a href=http://www.ostrosoft.com/oswinsck.html><font face="arial,helvetica,verdana" size="2">oswinsck.dll</font></a></td></tr>
<tr><td> <a href=http://www.ostrosoft.com/backtrace.asp><font face="arial,helvetica,verdana" size="2">Backtrace</font></a></td></tr>
<tr><td> <a href=http://www.ostrosoft.com/buy.html><font face="arial,helvetica,verdana" size="2">Buy on-line</font></a></td></tr>
<tr><td> <a href=http://www.ostrosoft.com/download.html><font face="arial,helvetica,verdana" size="2">Download</font></a></td></tr>
</table>
</td></tr>
<tr><td>
<a href=http://www.ostrosoft.com/login.asp><font face="arial,helvetica,verdana" size="2"><b>Customer Support</b></font></a>
</td></tr>
<tr><td>
<a href=http://www.ostrosoft.com/vb><font face="arial,helvetica,verdana" size="2"><b>Editorial</b></font></a>
</td></tr>
</table>
</td></tr></table>
<!--end index-->
</td>
<td width="1%"> </td>
<td valign="top">
<!--content-->
<center><font face="arial,helvetica,verdana" size="5">DNS Control - Samples(Using with VB)</font><p>
<font face="arial,helvetica,verdana" size="2">
<b><a href="DNS.html">Main page</a>
<a href="writing_control.html">Writing DNS control</a>
<a href="using_vb.html">Using with VB</a>
<a href="using_asp.html">Using with MTS/COM+</a>
<a href="using_office.html">Using with VBScript</a>
<a href="FAQ.html">DNS FAQ</a></b></center><p>
<font color="#008040">Description: </font>Sample program using DNS control<br>
<font color="#008040">Minimum requirements: </font>Visual Basic 5<br>
<font color="#008040">Download: </font><a href="using_vb.zip">source code</a><br>
<font color="#008040">Screenshot:</font><br>
<img src="using_vb.jpg" alt="DNS Control - using with VB"><br>
<font color="#008040">Project: </font>Standard EXE<br>
<font color="#008040">Controls: </font>txtIP (textbox), txtName (textbox), cmdToIP (button), cmdToName (button), DNS1 (DNS control)<br>
<font color="#008040">Code:</font><br>
Private Sub cmdToIP_Click()<br>
txtIP = DNS1.NameToAddress(txtName)<br>
End Sub<br>
<br>
Private Sub cmdToName_Click()<br>
txtName = DNS1.AddressToName(txtIP)<br>
End Sub
</font>
<!--end content-->
</td>
</tr>
<tr><td></td><td valign="top" colspan="2" align="center"><br><font face="arial, geneva" size="1">
<script language="javascript">
function showPrivacy() {
winHelp = window.open('http://www.ostrosoft.com/privacy.html', null, 'left=100,top=100,height=260,width=400,status=no,toolbar=no,menubar=no,location=no,resizable=yes,scrollbars=yes');
}
</script>
<b>Copyright © 1996-2001 OstroSoft. All rights reserved.</b> <a href=mailto:info@ostrosoft.com><i><b>info@ostrosoft.com</b></i></a><br><a href="javascript:showPrivacy();" onmouseover="window.status='Privacy statement'; return true" onmouseout="window.status=''; return true">Privacy statement</a></font></td></tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -