小编JMK*_*JMK的帖子

使用Microsoft Access的VBA - 检查对象是否存在

我正在使用VBA与Microsoft Access.

我正在将对象设置为WebBrowserControl中有时存在的项目,有时不存在.

Dim myWebBrowser As Object
Dim myItemInsideWebpage As Object

Set myWebBrowser = Me.WebBrowser0.Object
Set myItemInsideWebpage = myWebBrowser.Document.GetElemendById("myDiv")
Run Code Online (Sandbox Code Playgroud)

如果'myDiv'存在,那真棒,如果不是我想让Access让我知道所以我可以处理它.

ms-access vba activex webbrowser-control

9
推荐指数
1
解决办法
5万
查看次数

VB6中的公共属性,朋友和公共变量有什么区别

好的,所以我理解离子VB6,类中的封装属性可以属于以下三种类别之一:

  • 公共财产
  • 朋友
  • 公共变量

这些以及它们与C#等更现代的语言中的公共和私有属性相比有何区别?

vb6 encapsulation class

9
推荐指数
1
解决办法
1万
查看次数

将文本从word文件复制到新单词

我正在从word文件中读取文本并从readed文本中替换一些文本.

var wordApp = new Microsoft.Office.Interop.Word.Application();
object file = path;

object nullobj = System.Reflection.Missing.Value;

var doc = wordApp.Documents.Open(ref file, ref nullobj, ref nullobj,
                                                 ref nullobj, ref nullobj, ref nullobj,
                                                 ref nullobj, ref nullobj, ref nullobj,
                                                 ref nullobj, ref nullobj, ref nullobj);
 doc.ActiveWindow.Selection.WholeStory();

doc.ActiveWindow.Selection.Copy();

IDataObject data = Clipboard.GetDataObject();
var text =data.GetData(DataFormats.Text);
Run Code Online (Sandbox Code Playgroud)

所以我有来自原始word文件的文本,现在我需要它传递给一个不存在的新word文件(New Text).

我试过了

 ProcessStartInfo startInfo = new ProcessStartInfo();
 startInfo.FileName = "WINWORD.EXE";
 Process.Start(startInfo);
Run Code Online (Sandbox Code Playgroud)

这将打开新的word文件,这个文件没有物理保存在文件系统中,这很好.但我不确定如何将文本值传递给这个新文件.

更新

运行上面的代码后,我尝试了

 var wordApp = new Microsoft.Office.Interop.Word.Application();            
 var doc = wordApp.ActiveDocument;
Run Code Online (Sandbox Code Playgroud)

提出 "此命令不可用,因为没有文档打开."

.net c# ms-word .net-4.0 office-interop

9
推荐指数
2
解决办法
1万
查看次数

使用时为什么会出现内存不足错误?

我有以下方法,将a转换BitmapImageSystem.Drawing.Bitmap:

public static Bitmap BitmapImageToBitmap(BitmapImage bitmapImage)
{
    Bitmap bitmap;

    using (var ms = new MemoryStream())
    {
        var encoder = new JpegBitmapEncoder();
        encoder.Frames.Add(BitmapFrame.Create(bitmapImage));
        encoder.Save(ms);

        bitmap = new Bitmap(ms);
    }

    return bitmap;
}
Run Code Online (Sandbox Code Playgroud)

每当我尝试使用返回的Bitmap对象时,我都会收到以下错误:

发生OutOfMemoryException - 内存不足.

但是,每当我用这个替换代码时:

public static Bitmap BitmapImageToBitmap(BitmapImage bitmapImage)
{
    var ms = new MemoryStream();

    var encoder = new JpegBitmapEncoder();
    encoder.Frames.Add(BitmapFrame.Create(bitmapImage));

    encoder.Save(ms);

    return new Bitmap(ms);
}
Run Code Online (Sandbox Code Playgroud)

这很好用.不过,我敢肯定,我应该用作为MemoryStream对象实现IDisposable.这里发生了什么?

c# memorystream using

9
推荐指数
1
解决办法
2115
查看次数

在VBA中连接字符串

我正在使用VBA维护用Microsoft Access编写的应用程序.

我正在浏览我的代码并且刚刚注意到我已经下意识地将字符串与加号(+)符号连接在一起而不是符号.我用VB6编写代码已经有几年了.这会导致任何问题吗?

一切似乎都很好,只需要几分钟就可以解决,我只是好奇我是否在技术上做错了什么.

vb6 ms-access vba string-concatenation

8
推荐指数
1
解决办法
1万
查看次数

在VBA(Microsoft Access)中加粗Label的"Caption"属性的一部分

如何在Microsoft Access标签的标题中加粗某个单词?

如果有帮助,文本本身存储在Microsoft Access表中.

一个例子如下.我有一个带有标签的Microsoft Access表单,Form_Load()如果我将此标签的caption属性设置为DLookup查询中返回的值,如下所示:

Private Sub Form_Load()

    Me.Label0.Caption = DLookup("Field1", "Table1", "[ID] = 1")

End Sub
Run Code Online (Sandbox Code Playgroud)

我的文字如下:

敏捷的棕色狐狸跳过了懒狗

我想鼓励懒惰这个词.这可能吗?如果是这样,我该怎么做?

谢谢

vba label

8
推荐指数
1
解决办法
2万
查看次数

Excel 97-2003的正确`XlFileFormat`枚举是什么

关于Excel VBA Interop,XlFileFormat保存Excel 97-2003电子表格的正确枚举是什么?

官方MSDN文档在这里,但我无法弄清楚从正确的选择是什么.

谢谢

excel vba interop

8
推荐指数
1
解决办法
1万
查看次数

IntelliJ IDEA是否具有"Ctrl"+"K","Ctrl"+"D"等效?

我已经习惯了Visual Studio的Ctrl+ K,Ctrl+ D快捷方式来快速整理我的C#代码,在Intellij IDEA for Java中是否有相同的功能?

java intellij-idea

8
推荐指数
1
解决办法
8255
查看次数

使用.Net来校正图像

我一直在寻找一种可靠的方法,以便在.Net中修改图像,并且没有太多运气.

在我使用Aforge的那一刻.这是一个痛苦,因为我正在使用WPF,所以我使用的图像是BitmapImage对象,而不是Bitmap对象,这意味着我需要从BitmapImage对象开始,将其保存到内存流,创建一个新的Bitmap对象从内存流中,经过去偏移过程,将去偏移的图像保存到新的内存流,然后从所述内存流创建一个新的BitmapImage对象.不仅如此,但是纠偏不是很好.

我正在尝试读取扫描到扫描仪中的一张纸的OMR数据,因此我需要依赖于每次都在同一坐标上的特定OMR盒,因此需要可靠的偏斜校正.

所以我现在正在使用Aforge,我在.Net中找不到任何其他用于图像校正的免费/开源库,我发现的所有内容都是昂贵的或者在C/C++中.

我的问题是存在其他免费/开源库,有助于.Net中的图像校正吗?如果是这样,他们叫什么,如果不是我应该如何处理这个问题?

编辑:例如,假设我有以下页面:

初始图像

注意:这仅用于说明目的,但实际图像确实在页面的每个角落都有一个黑色矩形,这可能会有所帮助.

当我打印出来并将其扫描回我的扫描仪时,它看起来像这样:

扫描图像

我需要去掉这张图片,这样我的盒子每次都在同一个地方.在现实世界中,有很多盒子,它们更小并且靠得很近,所以准确性很重要.

我目前的方法是大量无效的痛苦:

using AForge.Imaging;
using AForge.Imaging.Filters;
using System.Drawing;
using System.Drawing.Imaging;
using System.IO;
using System.Windows.Media.Imaging;

public static BitmapImage DeskewBitmap(BitmapImage skewedBitmap)
{
    //Using a memory stream to minimise disk IO
    var memoryStream = BitmapImageToMemoryStream(skewedBitmap);

    var bitmap = MemoryStreamToBitmap(memoryStream);
    var skewAngle = CalculateSkewAngle(bitmap);

    //Aforge needs a Bppp indexed image for the deskewing process
    var bitmapConvertedToBbppIndexed = ConvertBitmapToBbppIndexed(bitmap);

    var rotatedImage = DeskewBitmap(skewAngle, bitmapConvertedToBbppIndexed);

    //I need to convert the image back to a non indexed format to …
Run Code Online (Sandbox Code Playgroud)

.net image-processing

8
推荐指数
1
解决办法
5270
查看次数

绑定到POCO列表时,指定的强制转换无效

好的,我有以下观点:

<?xml version="1.0" encoding="utf-8" ?>
<ContentPage xmlns="http://xamarin.com/schemas/2014/forms"
             xmlns:x="http://schemas.microsoft.com/winfx/2009/xaml"
             x:Class="BoomSauce.MainPage">
  <ListView ItemsSource="{Binding Model.MyPocos}">
    <ListView.ItemTemplate>
      <DataTemplate>
        <Label Text="{Binding MyString}"></Label>
      </DataTemplate>
    </ListView.ItemTemplate>
  </ListView>
</ContentPage>
Run Code Online (Sandbox Code Playgroud)

此视图的BindingContext是以下ViewModel:

public class MainViewModel
{
    public MainModel Model { get; set; }
}
Run Code Online (Sandbox Code Playgroud)

这是MainModel:

public class MainModel
{
    public List<MyPoco> MyPocos { get; set; }
}
Run Code Online (Sandbox Code Playgroud)

这是MyPoco:

public class MyPoco
{
    public string MyString { get; set; }
    public int MyInt { get; set; }
}
Run Code Online (Sandbox Code Playgroud)

这是App()中发生的事情

MainPage = new MainPage();

var viewModel = new MainViewModel
{
    Model = …
Run Code Online (Sandbox Code Playgroud)

c# xaml xamarin xamarin.forms

8
推荐指数
1
解决办法
3219
查看次数