jackgreat88的个人资料 - RAT

jackgreat88 jackgreat88

关注数: 4 粉丝数: 0 发帖数: 142 关注贴吧数: 1

再求解：如何用vb实现excel导入access 谢谢cbm666老师，但是我还是没有实现将excel里面的内容导入access。大家多多指教啊。

cbm666老师，麻烦给解决个问题。如何用vb程序将excel数据导入到access数据库中？最好能给我一个实例，谢谢啦。

大家帮忙给看看这个控件dbfind如何使用啊？做毕业设计的时候用到了一个dbfind控件，不知道如何使用，上网也找不到相关的资料，请高手帮忙给讲解一下，这个控件的一些属性，常用的方法，最重要的是连接数据库那一块，最好用代码实现。谢谢！

如何删除指定表中的指定纪录。比方，我有两个表，之间有关联，我要删除一个表中的指定（满足条件的）纪录。请问如何写。比如说我用的sql语句是"delete 预存临时 from 预存临时,员工" & _ " where 预存临时.员工id=员工.员工id"怎么改一下，从预存临时里面删除纪录。我做的时候出错，提示说请指定包含删除纪录的表？？？不明白，请高手指点。

火车车次大家帮个忙吧，最近火车不是提速了吗？车次、时间都有变化，谁能给提供一个最新的查询网址，或者告诉我唐山到秦皇岛的往返车次啊，谢谢了。

无效外部过程为了使代码不重复，我添加了一个标准模块，在连接数据库时，用到app.path,执行的时候，报错误说，无效外部过程，错误指示app.请问这是怎么回事啊？

第一天学c#，就出错了！第一天学c#，就出错了！按照书上抄了个控制台应用程序，static void Main(string[] args) { //output text to the screen. Console.WriteLine("the first app in beginning c# programming!"); Console.ReadKey(); }运行不了，出错：帮定句柄无效。请问高手这是怎么回事啊？

datagrid控件问题！点击Datagrid控件中的一条记录，在文本框中显示该条记录，能用代码实现吗？

format用法问题！大家好，我想问一下format的用法。比如说：z=58.24用了format，变成58.24%把数百分化怎么整！

vb里的按钮问题！我的程序有两个窗体，每一个窗体都用loadpicture加上了背景图案，当我unload一个窗体，show另一个窗体的时候，突然发现窗体的按钮一个按钮出现异常，不是一片白，就是显示另一个窗体的背景图的一小块。这是怎么回事啊？我都快晕死了！

关于datagrid不能时时更新的问题。为什么datagrid不能时时更新呢，我修改数据后，并没有更新，再一次打开才显示出来。这是怎么回事。我已经用了datagrid.Refresh，还是不行。求各位赐教！！！！！

关于随机数的问题，请cmb老师帮帮忙。我想通过点击窗体的cmdtest按钮，在txtsource文本框里随机调出（显示）数据库中的一条记录的一个字段的值。cmdtest按钮能重复使用。我是这样写的程序，但是不能实现。大家给看看，谢谢了。我想通过先随机获取一个id值，然后通过id值去调用那条记录。 Private Sub cmdtest_Click() Dim sql As String Static count As Integer Dim recount As Integer rs.Open "select * from word", conn, adOpenKeyset, adLockPessimistic recount = rs.RecordCount Randomize '初始化随机数生成器。 count = Int((count * Rnd) + 1) + 1 ' 产生 1 到 recount 之间的随机数。 sql = "select * from word where id=" & count conn.Execute sql txtsource.Text = rs.Fields("vbs") 'vbs是表中的一个字段名 rs.Close: Set rs = Nothing End Sub

随机数怎么回事，刚发的贴被删了？再写一次。我想通过点击窗体的cmdtest按钮，在txtsource文本框里随机调出（显示）数据库中的一条记录的一个字段的值。cmdtest按钮能重复使用。我是这样写的程序，但是不能实现。大家给看看，谢谢了。我想通过先随机获取一个id值，然后通过id值去调用那条记录。Private Sub cmdtest_Click()Dim sql As StringStatic count As IntegerDim recount As Integer rs.Open "select * from word", conn, adOpenKeyset, adLockPessimistic recount = rs.RecordCount Randomize '初始化随机数生成器。 count = Int((count * Rnd) + 1) + 1 ' 产生 1 到 recount 之间的随机数。 sql = "select * from word where id=" & count conn.Execute sql txtsource.Text = rs.Fields("vbs") 'vbs是表中的一个字段名 rs.Close: Set rs = Nothing End Sub

1 下一页