Nothing

1、加上一行
Msgbox ( val(price.Text )*val(allcount.Text ))
如果你有总价和文本框，如果名叫 总价 可以这样写
总价.text= Format(val(price.Text )*val(allcount.Text )), "#,###,##0.00")

2、你可以使用ADO组件，使用连接字符串
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\db.mdb;Persist Security Info=False"
    Adodc1.CommandType = adCmdTable
    Adodc1.RecordSource = "表名"
    adodc1.Refresh

Nothing

第二个问题可以在程序启动时加载数据库
关于文件地址可以使用下面代码
strdb=App.Path +"\db.mdb"
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+strdb+";Persist Security Info=False"

然后将db.mdb与编译的文件放到同一个文件夹下就可以了

Nothing

应当是这个,VB.Net成VB6不一样了

Application.StartupPath

Nothing

我讲的adodc1是一个数据库控件,你如果用别的数据库连接控件,请参考其他的联接方式,如果不是access格式的数据库,比SQL Server,那么不能实现你把说的功能,其他机器必需安装SQL数据,而且必需配制.