text2怎么不被清空???????????????????????????????

text1和text2都有不同的内容在的,现在的问题是,把鼠标移到text1的时候,text2的内容被清空了。 我的想要的效果是这样的,不管光标在text2那的位置,复制text1内容的时候,被复制的那个字符就在text2的那个位置上。 以下是代码: VB code Private Sub Text1_DblClick() Text2.Text = Text1.SelText End Sub Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Intege...

作者: wanmeikakaxi 发布时间: 06-11

在vb中如何导入excel等数据库数据

最近在写一个vb程序,需要将excel数据库内的数据导入vb中,但是我不知道怎么做,希望各位高手帮我解答一番,谢谢

作者: Fane1991 发布时间: 06-11

窗体最大化 并隐藏任务栏问题

Private Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, ByVal nCmdShow As Long) As Long Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Private Const SW_HIDE = 0 Private Const SW_NORMAL = 1 Private Sub Command1_Click() Dim StartWindow As Long D...

作者: yejian520 发布时间: 06-11

VB连access问题

Dim rs As New ADODB.Recordset Dim Cnn As New ADODB.Connection Private Sub Command1_Click() Dim strsql As String Dim rs As New ADODB.Recordset Set rs = New ADODB.Recordset Dim Cnn As New ADODB.Connection Set Cnn = Nothing Cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb;Persist Security Info=False" Cnn...

作者: wyy407760818 发布时间: 06-11

VB如何限制右键功能和其他快捷键

VB如何限制右键功能和其他快捷键 如:CTRL+P 还有就是我利用WEBBROWSER 控件 打开网页 然后利用GOBACK控制后退功能,但是当我第一次打开网页时,GOBACK这个功能是无效的,我一点就程序出错。 请问这个要怎么解决

作者: yujianron 发布时间: 06-11

生僻汉字的数据库处理问题

今天碰到一个棘手的问题。 我这有一个新人的人名用了一个非常生僻的汉字,这个字我也发不上来(粘贴上到这里时为空)。字的写法是这样的:邱字左边的丘没有了上面的一撇。 好不容易地把这个字给找了出来,可以输入到accecc库表中,但在上传到sql2005时,VB的上传程序出错,停在这个人名的数据更新上。 rs("人名")=rs1("人名") 这一句出错 用VB的提示框msgbox这个人名时,这...

作者: tang688 发布时间: 06-11

查询多个MDB,将结果合并显示

父文件夹中有若干子文件夹,每个子文件夹中都有一个MDB,这些MDB的数据结构都一样,只是数据记录不同。 根据条件对若干子文件中的MDB进行查询,每个MDB重查询的结果合并起来一同显示在MSHFlexGrid控件中。 请各位大哥大虾出手相助,最好附源码,万分感谢。

作者: etie 发布时间: 06-11

vb编写的程序ADO不能使用

VB编写的一个程序,引用了ADO控件,在本机安装VB6.0的环境下可以正常使用,在其他没有安装VB6.0的机器上(XP)不能正常运行,提示ADO错误;本机将VB6.0卸载,也提示ADO错误。网上搜了不少资料,都没有解决问题。希望高手帮忙。

作者: tszsc 发布时间: 06-11

vb调用存储过程之后,怎样将存储过程的结果放入到MSFlexGrid控件中?

'数据库连接如下 Dim objcn As New ADODB.Connection On Error GoTo dealerror Dim constr As String constr = "Provider=SQLOLEDB.1;server=" & thissever & ";database=" & thisdatabase & ";User Id=" & thisseverid & ";Password=" & thisseverpwd & ";timeout=120" If objcn.State = adStateOpen Then objcn.Close objcn.Open constr 'sql中存在的存储过程如下: creat...

作者: halo005 发布时间: 06-11

Textbox 选定文本 编辑 存储

利用TextBox来接受用户的输入并存入数据库。想增加文本格式编辑的功能,比如用户可以对选定的文本进行加粗,改变字体大小颜色的功能,方便显示,请问几个问题? 1是利用Textbox能否实现对选定文本的格式进行编辑并显示呢?如果不行,用别的文本编辑控件可以实现么? 2是具体如何实现呢? 3是用户输入的不同格式的文本能原样存入Access数据库么?

作者: sunyangguan 发布时间: 06-11