求web应用的vb代码
要求：实现使用ASP.NET AJAX Control Toolkit中的Calendar控件，实现弹出式日历，让用户选择输入的功能。
网上找了下，都是C# 的，有没有vb的？
如果不用AJAX，使用其它控件或代码能实现以上功能的也可以。
谢谢了！
hans_qian@hotmail.com
非常感谢。
已经发给你了，注意查收。
my97控件
......
Option Explicit
Private Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal nDrive As String) As Long
Private Sub Form_Load()
Label1.Caption = ""
Dim X As Integer, I As Integer, R As String, h As Integer, str As String, J As ......
我用VB做了串口通信程序,接收的数据如果长为一则是握手信号或结束信号，长为21为数据信号，程序运行正常后，把里面的Msgbox语句删除，数据长度的检测就出错了，不知道为什么？代码如下：
Private Sub MSComm1_OnComm()
Dim Arr() As Byte
Select Case MSComm1.CommEvent
Case comEvReceive '...有接受事件发生
bufcoun ......
昨天就在这问题上研究了一整天，而且还叫上了用DELPHI的同事一起研究，但是似乎还是没实现。有高手能解决否？
问题很简单，就是去掉标题栏的图标，不是很傻的删除或者使图标透明，好了废话不多说，看图就知道了。
原图：
不是这个效果1：
不是这个效果1：
最终应该的效果：
VBGOOD同题讨论链接：
http://www.vbgoo ......
在VB中，自动生成的树控件如图：我想在控件中按住SHIFT键选择Folders下面的文件。
代码如下：
Try
If ParentCategoryNode.Text = "Folders" Then
If e.Shift Then
For i = 0 To ParentCategoryNode.Nodes.Count - 1
[colo ......
Private Sub Form_Load()
MSComm1.CommPort = 1
MSComm1.Settings = "9600,N,8,1"
MSComm1.PortOpen = True
MSComm1.InputMode = comInputModeBinary
MSComm1.RThreshold = 1
Dim a As Long
End Sub
Private Sub MSComm1_OnComm()
Dim BytesReceived() As Byte
Dim buffer As String
&nb ......
最新文章 : vb